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The IBM System/ 360 Telecommunication Access Method 
(TCAM) allows high-level, device -independent communi- 
cation with telecommunications equipment. This program 
provides a flexible message control language that can be 
used to achieve installation-oriented message control. 

This publication describes the internal logic of TCAM. It 
identifies and discusses the parts of the program that 
perform specific functions and relates these parts to the 
program listing. It is directed to the IBM customer 
engineers and system engineers, who need information on 
the internal organization and logic of TCAM in order to 
provide program maintenance. 

In order to understand the logic of TCAM , the reader must 
have a general understanding of IBM System/360 operating 
system. In addition, the following are prerequisite publi- 
cations: 

• IBM System/360 OS TCAM Concepts and Facilities, 
GC 30-2022, to gain familiarity with the overall concepts 
and structure of TCAM . 

• IBM System/ 360 OS TCAM Programmer's Guide, 
GC 30-2024, to learn how to construct and modify a 
TCAM message control program and a TCAM- 
compatible application program. 

In addition, the IBM System/360 OS System Control 
Blocks publication, GC28-6628, provides co-requisite infor- 
mation on system control blocks used by TCAM. 

• The information relating to the Time Sharing Option 
(TSO) in this manual is preliminary and should be used 
accordingly. 




PREFACE 

The Organization and Use of the TCAM Program Logic Manual section of 
this book defines the audience for which this program logic manual was 
intended, explains hew the book is organized, and suggests how the 
reader might best familiarize himself with its contents. In order to 
understand the logic of TCAM, the reader must have a general 
understanding of System/360 OS- In addition, the following 
prereguisite publications are applicable: 

• 11^ Sjstem/36J) OS TCAM Concepts and Facilities, Order No. GC30- 
2022, to gain familiarity with the overall concepts and structure 
of TCAM. 

• IM Sy.stem/36 OS TCAM Programmer's Guide, Order No. GC 30- 2 024, to 
learn how to construct and modify a TCAM MCP and a TCAM-compatible 
application program* 

The IBM System/3 60 OS System Control Blocks publication, Order No. 
GC28-6628, provides corequisite information on system control blocks 
that are used by TCAM. 

The information relating to the Time Sharing Option (TSO) in thin manual 
is preliminary and shouid be used accordinalv. 



First Edition (January 1971) 

This edition applies to release 20.0 of IBM System/360 
Operatinq System. 

The contents cf this publication are subject ot change from 
time to time. Changes will be reflected in periodically 
updated editions. Before using this publication, consult the 
latest System/360 SRL- Newsletter , GN20-0360, for the editions 
that are applicable and current. 

Bequests for copies of IBM publications should be made to 
your IBM representative or to the IBM branch office serving 
your locality. 

A form is provided at the back of this publication for your 
comments. If the form is missing, comments may be addressed 
to IBM Corporation, Publications Center, Dept. E01, P. 0. Box 
12275, Research Triangle Park, North Carolina 27709. 

© Copyright International Business Machines Corporation 1971 



CONTENTS 



Organization and Use of the TCAM Proqram Loqic Manual xxiii 

SECTION 1: INTRODUCTION 25 

Purpose of tcam 25 

System Structure 25 

System Generation 27 

TCAM lacro Definitions 27 

^CAM Resident Modules 27 

TCAM Support Modules 27 

TCAM transient Modules 27 

System Nucleus Modules 28 

The wessa'qe Control Proqram in the System 28 

Assemblinq and Linkaqe Editinq a Messaqe Control Proqram 28 

Execution of a Messaqe Control Proaram 28 

The Application Proqram in the System 30 

*ssemblinq and Linkage Editinq an Application Proqram 30 

Execution of an Application Proqram 30 

Relationship of the OS Dispatcher to TCAM 31 

The TCAM Dispatcher 32 

Elements, Queues, and Subtasks 32 

The Ready Queue 36 

"Principle of Tpost and Twait 37 

TCAM Control Areas 37 

TCAM Address Vector Table 38 

Invitation list 38 

Termname ^able 41 

Terminal Table 42 

Sinqle Entry 43 

Group Entry 44 

Distribution Entry 44 

Cascade Entry 45 

Process Entry 45 

Loqtype Entry 46 

Line Entry 46 

Option Table 46 

Option Characteristics Table 47 

Device Characteristics Table 47 

Special Characters Table 47 

Translation Tables 49 

Resource Control Block 50 

Subtask Control Block 51 

Oueue Control Block 52 

line Control Block 52 

Station Control Block 52 

Channel Proqram Block 53 

Element Request Block 53 

Process Control Block 54 

Operator Control Address vector ^able 54 



in 



Selected Options 54 

Operator Control 55 

Application Program Processing 55 

Line Queuing Options 55 

Message Oueuing Options 56 

Logging ^6 

Checkpoint/Restart 57 

TCAM as a Startable Procedure 57 

Error Recovery Procedures 57 

SubtasV Trace 5 8 

Cross Reference Table 58 

TCAM in a Multiprocessing Environment 58 

Time Sharing Option 59 

Module Attributes 59 

SECTION 2: METHOD OF OPEPA^tqN 61 

T.ogic of TCAM 61 

^he Disk Message Queue Initializer 62 

Initialization of a Message Control Program 62 

Functions of T^PO 63 

"^unctions of the Open Routines 63 

Preparation of Communications Lines for Transmission 64 

Functions of READY 6U 

Svstem Control 64 

"^unctions of the TCAM Dispatcher 64 

Functions of the AQCTL SVC 102 Routine 69 

Message Handling in a Message Control Program 73 

Line Management 74 

A Receive Operation 74 

A Send Operation 76 

Buffer Management 77 

Buffer Reguesting and Allocating 80 

Functions of Puffer Association 83 

Deallocating Buffers 84 

Functions of Buffer Return 84 

Message Handling Routines 84 

Functions of the User Interface Routine 85 

"^unctions of STAPTMtt 85 

^unctions of the Incoming Group of a Message Handler 86 

Functions of the Outgoing Group of a Message Handler 87 

Queue Management 89 

^Tonreusable Disk Oueuing 89 

Reusable Disk Oueuing 101 

Main Storage Oueuing 104 

Main Storage Oueuing with Disk Backup 104 

Special Queuing Considerations 104 

Queuing Management Poutines 105 

Disk I/O Management Routines 108 

Multiple Arm Support 112 

Special Message Handling Functions 112 

Hold function 112 

Cancel Message Function 113 

Lock Function 114 

Initiate Function 115 

Summary of Message Flow 116 

iv 



Closedown of a Message Control Program 116 

Functions of the MCP Closedown Processing and Closedown 

Completion Routines 
Close routines 
Application Program Processing 

Application Program Initialisation and Termination 

application Proqram - Initialization Functions 

wessaae Control Proqram - Initialization Functions 

Application Proqram - Termination functions 

Message Control Program - Termination Functions 
Application Proqram Input/Output Functions 

Input Functions of an Ap-olication Program 

Output Functions of an Application Proqram 
Message Retrieval 
Compatible QTAM 

Compatible QTAM GET/PUT Support 

Compatible QTAM Message Retrieval Support 
Functions of the Network Control Facilities 

Interface with Operator Control 

Network Control with an Application Program 
Operator Control 

Processing Standard Operator Control Commands 
Processing System Console Commands 
Processing Special Application Proaram Commands 
Operator Control/Checkpoint Interface 
Operator Control Processing Routines 
Checkpoint 

Function of the Checkpoint Executor 
The Fnvironment checkpoint Routines 
The Incident Checkpoint Routines 
^he CKREO Checkpoint Routines 
Error Recovery Procedures 

Message Handling with Time Sharing Option Support 
^SO Tine Management Support 
TSO Buffer Management Support 
TSO Oueue Management Support 
TSO MCP Closedown Processing Support 

SECTION 3: PROGRAM ORGANIZATION 
System Service Routine 

Disk Message Oueue Initializer 
Initialization Routines 
link Routine 

WTOR Interpreter Routine 
INTRO GFTMAIN Routine 
^ermnaie Table Sort Routine 
Attach Routine 

Disk Message Queues Open Routines 
Checkpoint Open Routine 
Checkpoint Disk Allocation Routine 
Checkpoint Disk Initialization Routine 
Checkpoint/Restart from Environment Record Routine 
Checkpoint/Restart from Incident and CKREQ Records Routine 
Checkpoint Continuation Restart Routine 



116 


117 


117 


118 


118 


118 


120 


120 


120 


120 


120 


121 


125 


125 


125 


128 


128 


128 


128 


129 


130 


131 


132 


132 


132 


133 


134 


136 


139 


139 


141 


im 


142 


143 


144 


145 


145 


145 


148 


148 


149 


151 


152 


153 


153 


155 


157 


158 


159 


160 


161 



Checkpoint Continuation restart subroutine 163 

Line Group Open Poutines 164 

Open Error Handler 167 

Start-up Message Routine 168 

Ready Routine 170 

System Control Routines 171 

^CAM Dispatcher 171 

TCAM Dispatcher with Subtask Tra-ce 178 

AOCTL SVC 102 Pontine 178 

Post Pending Routine 182 

Message Handling - line Management Routines 183 

Leased Peceive Scheduler 183 

Dial deceive Scheduler 184 

Local Peceive Scheduler 186 

Send Scheduler 187 

Send Scheduler for Leased Lines and No TSO 188 

Send Scheduler with No TSO 189 

Buffered Terminal Scheduler 189 

Activate-I/O Generator Subtask 191 

Activate-I/O Generator Subtask p or BSC Lines 192 

Activate-I/O Generator Subtask for Start/Stop Lines 193 
Activate-T/O Generator Subtask for Leased and Start/Stop 

Lines and No TSO 193 
Activate-T/O Generator Subtask for a QTAM Compatible System 194 

Line "Hind Appendage 195 

Line End Appendage for BSC Lines 197 

Line End Appendage for Start/Stop Lines 197 
Line End appendage for Leased and Start/Stop Lines 

and No TSO 198 

Line End Appendage for a QTAM Compatible System 199 

Attention Poutine 199 

Attention Handler 200 

Line I/O Interrupt Trace Poutine 200 

Time Delay Subtask 201 

System Delay Subtask 204 

Stop Line T/o Subtask 206 

Message Handling - Puffer Management Modules 207 

Buffer Management Module 207 

Transparent Transmission CCW Building Poutine 209 

PCI Appendage 210 

Message Handling - Control Poutines 211 

User Interface Poutine 211 

Peturn Interface Poutine 212 

STAPTMH Subtask 212 

Incoming/Outgoing Message Delimiter Poutine 215 

Message Handling - Functional Poutines 219 

Date and Time Provision Poutine 219 

Output Seguence Number Provision Poutine 220 

Locate Option Field Address Poutine 221 

Message Limit Pontine 222 

Input Seguence Number Insertion Poutine 223 

Skip Forward and Scan Poutine 225 

Skip to Character Set Poutine 230 

Line Control Insertion Poutine 232 

Address Finder Poutine 236 

vi 



Oriqin Routine 237 

Multiple Insert/Remove Routine 238 

Unit Request Interface Routine 242 

Remove at Offset Routine 243 

operator Control Interface Routine 246 

Cutoff Messaqe transmission Routine 246 

Lookup Terminal Entry Routine 248 

translate p uffer Routine 249 

Screen Routine 251 

Skip Backward Routine 25? 

Insert at offset Routine 254 

Line Control Initialization Routine 260 

Counter Routine 262 

Multiple Insert at Offset Routine 263 

Checkpoint Request Routine 265 

EOB/ETB Handlinq Subtask 266 

Unit Request Routine 267 

T.oa Seqment Routine 267 

Messaqe Handlinq - Functional Subroutines 268 

Insert Data Routine 268 

Ruffer Step Routine 271 

Binary Search Routine 272 

Termname Table Code 273 

Messaqe Handlinq - Euffer Disposition Modules 273 

Buffer Disposition Subtask 273 

Cancel Messaqe Routine 274 

Operator awareness Messaqe Router 275 

Hold/Release terminal Routine 276 

Create an Error w e ssaqe Routine and Subtask 277 

Redirect a Messaqe Routine 2^8 

Messaqe Generation Routine 279 

Loq Messaqe Routine 280 

Loq Scheduler 280 

Multiple Routinq Subtask 281 

Lock Routine 283 

Unlock Routine 283 

Distribution List Subtask 284 

Cascade List Subtask 284 

Messaqe Handlinq - Queue Manaqement Routines 285 

Destination Scheduler 285 

Destination Scheduler - Main Storaqe Queuinq Only 287 

Destination Scheduler - Disk Queuina Only 288 

CPR Initialization 290 

C^B Initialization - Main Storaqe Oueuinq Only 292 

CPB Initialization - Disk Queuinq Only 293 

EXC^ Driver 295 

E1TCP Driver for a Sinqle CV^ 296 

Disk End ^pperdaqe 297 

Disk End Apperdaqe for a Sinqle CPB 298 

Reusability-Copy Subtask 298 

Messaqe Control Proqram Termination Routines 302 

Resident Closedown Completion 302 

Nonresident Closedown Completion Routine 302 

MCP Closedown Processinq Routine 303 

Line Group Close Routines 304 

checkpoint Close Routine 306 



vn 



Message Queues Close Routine 306 

Application Program Initialisation and termination Foutines 307 

GET/PUT and FEAD/WPTTE Open Executor 307 

GET/POT and FEAD/WPTTE Close Executor 309 

Open/Close Subtask 310 

Application Proaram I/O Foutines 312 

Get Scheduler 312 

GE^/FEAD Poutine 313 

Check Poutine 315 

Get Scheduler FIEO Poutine 316 

PTTT/WPT'TE Poutine 316 

Put Scheduler 317 

Application Program Message Retrieval - Point Pouting 318 

Point Routine 318 

Application Program Compatible Q^AM Foutines 319 

GET Compatible Poutine 319 

pht Compatible Poutine 320 

Retrieve Service Poutine 321 

Petrieve Scheduler 322 

Application Program Network Control Routines 323 

Operator Control/Application Program Interface Routine 323 

TCOPY Service Poutine 325 

QCOPY Service Poutine 325 

TCHNG Service Routine 326 

T COPV Service Routine 327 

Password Scrambler Routine 328 

Operator Control Routines 328 

Resident Operator Control Module 328 

operator Control Control Module - Toad 329 

Operator Control Control Module - Load 1 330 

Operator Control Control Module - load 2 331 

operator Control Control Module - Load 3 332 

Operator Control Control Module - Load 4 333 

operator Control Control Module - Load 5 333 

TCAM Command Scheduler - SVC 34 334 

Modify Options Routine 335 

Copv Line Information Routine 337 

Copv terminal Information Routine 338 

Copy LCB Information Poutine 339 

Copv OCR Information Routine 341 

Copy Held Terminals Routine 342 

Copy invitation T ist Entry Routine 343 

Copy operator Control terminal Routine 345 

Change Control Terminal Routine 346 

Change Terminal Routine 347 

Alter Trace Status Routine 349 

Stop/Resume Terminal transmission Poutine 350 

Start line Poutine 352 

Stop Line Routine 354 

Modify Poll Routine 357 

Modify Intense Routine 358 

Change Interval Type Routine 360 

MCP Closedown Processing Routine 362 

ICHNG Processing Routine 362 



vin 



On-line ^est Interface "Routine 364 

Copy Invitation list Status Routine 365 

Operator Control work Area CSEC^ 367 

DEBT7G Service Aid Router 367 

Checkpoint Routines 369 

Checkpoint Executor 369 

Environment Checkpoint "Routine 371 

Checkpoint Oueue Manaqer 372 

Checkpoint Disk 7/0 Routine 372 

Checkpoint Notification and Disposition Routine 373 

Checkpoint Disk End Appendaqe 374 

Build Incident Record for MH Routine 375 

Application Program/Checkpoint Interface Routine 375 

Ruild Incident Record for TCHTG Routine 377 

incident checkpoint for Operator Control Routine 378 

Build CK*E0 Disk Record Routine 379 

Checkpoint - No Available Core Routine 379 

checkpoint - No Incident Records Routine 380 

Error Recovery Procedure Routines 381 

Start-Stop ERP Control Module 381 

Read/Write Unit Check and Unit Exception ERP Module 383 

^on-operational Control Unit ERP Module 384 
Unit Check for Non-read, Non-write, and Non-poll 

CCWs ERP Module 384 
Auto Poll and Read Response to Poll Unit Check and Unit 

Exception ERp Module 385 

Error Post and Second Level CCW Return Module 385 
Unit Check and Unit Exception on T?ead/Write CCWs for Audio 

and 2260 Local Devices ERP Module 386 

Start-Stop Channel Check ERP Module 387 

Closedown Terminal Statistics Recordinq Module 388 

BSC ERP Control Module 388 
BSC Pead/Write Eauipment Check r Lost Data, Intervention 

Required, and Unit Exception ERP Module 390 
BSC Read/Write Data Check, Overrun, and Command Reiect 

ERP Module 391 

BSC Second Level CCW Return Module 392 

BSC Error Post Module 39 3 

BSC Channel Check ER^ Module 393 

Time Sharinq Option Routines 394 

^SO Attention Routine 394 

TSO Carriaqe Subroutine 396 

Time Sharinq Destination Scheduler 397 

t'SO ^lOC Edit Routine 398 

TSO I0FALT Routine 399 

^SO Fan qup Routine 400 

TSI^PUT Routine 402 

^so Loqon Routine 404 

TSO Messaqe Generation Routine 407 

TSOUTPUT Routine 408 

STARTMH Subtask for TCAM-^SO Mixed 412 

TSO Simulated Attention Routine 415 

TSO Abend Interface Routine 417 

TSO INMSG/CUTMSG linker 418 



IX 



TSO Asynchronous Time Delay Removal Pontine 419 

Time Sharinq Scheduler 420 

^CAM Flowcharts 427 

SECTION 4: MICROFICHE DIRECTORY 897 

SECTION 5: DATA AREA LAYOUTS 911 

TCAM Control Block Linkages 9.11 

Linkages from a ^CAM Buffer "Prefix 913 

Address Vector Table 915 

Terminal Table 940 

Termname Table 945 

Option Table 946 

Option Characteristics Table 947 

Device Characteristics ^able 948 

Special Characters Table 949 

Resource Control Block 951 

Oueue Control Block 951 

Subtask Control Block 956 

Element Request *lock 957 

Line Control Elock 957 

Station Control Block 964 

Channel Program Block 969 

Data Control Plock 973 

Data Extent Block 982 

Data Event Control Block 985 

OS I/O Device Characteristics Table 986 

Buffer Prefix 987 

Disk Data Area 991 

Application Procrram Data Areas 992 

Process Control Block 992 

Data Extent Block for Application Proqrams 995 

Access Method Work Area 996 

Process Entry Work Area 1000 

operator Control Data Areas 1003 

Operator Control Address vector T'able 1003 

Command Input Buffer 1007 

Checkpoint Data Areas 1008 

Checkpoint Elements 1008 

Checkpoint work Area 1009 

Checkpoint Disk Pecords 1015 

Parameter Lists for the Message Handling Macro Expansions 1037 

SECTION 6: DIAGNOSTIC AIDS 1039 

SCB Error Word Usage by Module 1039 

LCB Status Byte Usage by Module 104^ 

formatted ^CAM Dump 1045 

Trace Tables 1077 

Subtask Trace Table 1077 

Line Input/Output Interrupt Trace Table 1078 

Format of the Subtask Trace Table Control Block 1077 

Format of a Subtask Trace T'able Entry 1078 

Cross Reference Table 1079 

f'able of Message Origins 1080 

Table of Cross-Ref erences Between TCAM Modules 1088 



TCAM Linkages Between Macro Expansion and Modules 
Table of Register Usage by Module 



Appendix A: 
Appendix B: 
Appendix C: 
Appendix D: 

GLOSSARY 

INDEX 



List of TCAM Modules by Library 

List of TCAM Queues and QCBs 

List of Relative Priorities in TCAM 

TCAM Channel Programs and TP Operation Codes 



1108 
1 1 15 

1171 
1187 
1195 
1199 

1307 

1323 



ALPHABETIC LISTING OF TCAM MODULES BY CSECT NAME 

IEDAYA TSO Attention Routine 

TEDAYC TSO Carriage Subroutine 

IEDAYD Time Sharing Destination Scheduler 

IEDAYE TSO TIOC Edit Routine 

TEDAYF TSO IOHALT Routine 

IEDAYH TSO Hangup Routine 

TEDAYI TSINPUT Routine 

IEDAYL TSO Logon Routine 

IEDAYM TSO Message Generation Routine 

IEDAYO TSOUTPUT Routine 

IEDAYR STARTMH Subtask for TCAM-TSO Mixed 

TEDAYS TSO Simulated Attention Routine 

IEDAYT TSO Abend Interface Routine 

IEDAYX TSO INMSG/OUTMSG -Linker 

IEDAYY TSO Asychronous Time Delay Removal Routine 

IEDAYZ Time Sharing Scheduler 

IEDQAA STARTMH Subtask 

TEDQAC Date and Time Provision Routine 

IEDQAD Output Sequence Number Provision Routine 

IEDQAE Locate Option Field Address Routine 

IEDQAF Insert Data Routine 

IEDOAG Message Limit Routine 

IEDQAH Input Sequence Number Insertion Routine 

IEDQAI Skip Forward and Scan Routine 

IEDQAJ Skip to Character Set Routine 

IEDQAK Line Control Insertion Routine 

lEDQAL Address Finder Routine 

IED0AM Origin Routine 

IEDQAN Multiple Insert/Remove Routine 

IEDQAO Unit Reguest Interface Routine 

IEDQAP Remove at Offset Routine 

IEDQAQ Operator Control Interface Routine 

TEDQAR Cancel Message Routine 

IEDQAS Hold/Release Terminal Routine 

IEDQAT Create an Error Message Routine and Subtask 

TE.DQATTN Attention Routine 

IEDQATJ Cutoff Message Transmission Routine and Subtask 

IEDQAV Lookup Terminal Entry Routine 



394 
396 
397 
398 
399 
400 
402 
404 
407 
408 
412 
415 
417 
418 
419 
420 
212 
219 
220 
221 
268 
222 
223 
225 
230 
232 
236 
237 
238 
242 
243 
246 
274 
276 
277 
199 
246 
248 



xi 



IEDQAW 
IEDQAX 
IEDQAY 
IEDQAZ 
IEDQAO 
IEDQA1 
TEDQA2 
IEDQA3 
T EDO, A 4 
TEDQA5 
IEDQA6 
TEDQA7 
IEDQA8 
TEDQBA 
TEDQBB 
IEDQBC 
TEDOBD 
IEDQ^E 
IEDQBF 
IEDQBG 
IEDOBL 
IEDQBT 
TEDQBW 
IEDQBT 
IEDQBY 
TEDQBZ 
IEDQCA 
TEDQCF 
IEDQCG 
TEDQCH 
TEDQCI 
TEDQCJ 
TEDQCK 
IEDQCL 
TEDQCM 
TEDQCN 
TEDQCO 
IEDQCP 
IEDQCQ 
TEDOCU 
IEDQCV 
IEDQCW 
IEDQCX 
IEDQC7 
IEDQCO 
IEDQC1 
IEDQC2 
IEDQC3 
IEDQC5 
IEDQC6 
IEDQEC 
TEDQES 
IEDQET 

IEDQETJ 



Translate Buffer Routine 

Buffer Step Routine 

Screen Routine 

Redirect a Message Routine 

Skip Backward Routine 

Binary Search Routine 

Insert at Offset Routine 

Dynamic Translation Routine 

Incoming/Outgoing Message Delimiter Routine 

Forward Routine 

Line Control Initialization Routine 

Counter Routine 

Multiple Insert at Offset Routine 

Multiple Routing Subtask 

Checkpoint Reguest Routine 

Distribution List Subtask 

Buffer Disposition Subtask 

Lock Routine 

Unlock Routine 

Cascade List Subtask 

Message Generation Routine 

EOB/ETB Handling Subtask 

Unit Reguest Routine 

Log Segment Routine 

Log Message Routine 

Log Scheduler Routine 

Resident Operator Control Module 

Modify Options Routine 

Copy Line Information Routine 

Copy Terminal Information Routine 

Copy LCB Information Routine 

Copy QCB Information Routine 

Copy Held Terminals Routine 

Copy Invitation List Entry Routine 

Copy Operator Control Terminal Routine 

Change Control Terminal Routine 

Change Terminal Routine 

Alter Trace Status Routine 

Stop/Resume Terminal Transmission Routine 

Start Line Routine 

Stop Line Routine 

Modify Poll Routine 

Modify Intense Routine 

Change Interval Type Routine 

MCP Closedown Processing Routine 

ICHNG Processing Routine 

On-Line Test interface Routine 

Copy Invitation List Status Routine 

Operator Control Work Area CSECT 

DEBUG Service Aid Router 

Put Scheduler 

Retrieve Service Routine 

Operator Control/Application Program Interface 

Routine 

Open /Close Subtask 



249 
271 
251 
278 
253 
272 
254 
256 
215 
257 
260 
262 
263 
281 
265 
284 
273 
283 
283 
284 
279 
266 
267 
267 
280 
280 
328 
335 
337 
338 
339 
341 
342 
343 
345 
346 
347 
349 
350 
352 
354 
357 
358 
360 
362 
362 
364 
365 
367 
367 
317 
321 

323 
310 



Xll 



TEDQEW Get Scheduler 312 

IEDQEZ Get Scheduler FIFO Routine 316 

IEDQE1 TCOPY Service Routine 325 

IEDQE2 QCOPY Service Routine 325 

TED0E3 TCHNG Service Routine 326 

TEDQE4 ICOPY Service Routine 327 

IEDQE6 Password Scrambler Routine 328 

IEDQE7 Retrieve Scheduler 322 

IEDQFA CPB Initialization Module 290 

IEDQFA1 CPB Initialization - Main Storage Only Queuing 292 

IEDQFA2 CPB Initialization - Disk Only Queuing 293 

IEDQGA Buffer Management Module 207 

IEDQGT Transparent Transmission CCW Building Routine 209 

TEDQHG Time Delay Subtask 201 

TEDQHI System Delay Subtask 204 

IEDQHK Stop Line I/O Subtask 206 

IEDQHM Destination Scheduler 284 

IEDQHM1 Destination Scheduler - Main Storage Only Queuing 287 

IEDQHM2 Destination Scheduler - Disk Only Queuing 288 

IEDQKA Activate-I/O Generator Subtask 191 

IEDQKB Activate-I/O Generator Subtask for BSC Lines 192 

IEDQKC Activate-I/O Generator Subtask for Start/Stop Lines 193 

IEDQKD Activate-I/O Generator Subtask for Leased and 

Start/Stop Lines and No TSO 193 

IEDQKE Activate-I/O Generator Subtask for a QTAM- 

Compatible System 194 

IEDQLM Return Interface Routine 212 

TEDQNA Resident Closedown Completion Module 302 

IEDQNA2 Nonresident Closedown Completion Module 302 

XEDQNB Application Program/Checkpoint Interface Routine 375 

IEDQND Ready Routine 170 

TEDQNF Checkpoint Executor Routine 369 

TEDQNG Build Incident Record for MR" Routine 375 

TEDQNH Build Incident Record for TCHNG Routine 377 

IEDQNJ Incident Checkpoint for Operator Control Routine 378 

IEDQNK Environment Checkpoint Routine 371 

IEDQNM Build CKREQ Disk Record Routine 379 

TEDQNO Checkpoint Queue Manager 372 

TEDQNP Checkpoint Disk I/O Routine 372 

IEDQNQ Checkpoint Notification and Disposition Routine 373 

IEDQNR Checkpoint - No Available Core Routine 379 

IEDQNS Checkpoint - No Incident Records Routine 380 

IEDONX Operator Awareness Message Router 275 

IEDQOA Link Routine 148 

IEDQOB WTOR Interpreter Routine 149 

IEDQOG INTRO GETMAIN Routine 151 

IEDQOM Termname Table Sort Routine 152 

IEDQOS Attach Routine 153 

IEDQTNT Termname Table Code 273 

IEDQUI User Interface Routine 211 

IEDQXA Disk Message Queue Initializer 145 

IGC0010D Operator Control Control Module - Load - SVC 104 329 

IGC0110D Operator Control Control Module - Load 1 330 

IGC0210D Operator Control Control Module - Load 2 331 

IGC0310D Operator Control Control Module - Load 3 332 



Xlll 



IGC0410D Operator Control Control Module - Load 4 333 

IGC0510D Operator Control Control Module - Load 5 333 

IGC102 AQCTL SVC 102 Routine 178 

IGC1303D TCAM Command Scheduler - SVC 34 334 

IGE0004G Start/Stop ERP Control Module 381 

IGE0104G Read/Write Unit Check and Unit Exception ERP Module 383 

IGE0204G Non-operational Control Unit ERP Module 384 

IGE0304G Unit Check for Non-read, Non-write, and Non-poll 

CCWs ERP Module 384 

IGE0404G Auto Poll and Read Response to Poll Unit Check and 

Unit Exception ERP Module 385 

IGE0504G Error Post and Second Level CCW Return Module 385 

IGE0604G Unit Check and Unit Exception on Read/Write CCWs for 

Audio and 2260 Local Devices ERP Module 384 

TGE0804G Start/Stop Channel Check ERP Module 387 

IGE0904G Closedown Terminal Statistics Recording Module 388 

IGE0004H BSC ERP Control Module 388 

IGE0104H BSC Read/Write Equipment Check, Lost Data, Intervention 

Required, and Unit Exception ERP Module 390 

1GE0204H BSC Read/Write Data Check, Overrun, and Command Reject 

ERP Module 391 

TGE0404H BSC Second Level CCW Return Module 392 

TGE0504H BSC Error Post Module 393 

IGE0804H BSC Channel Check ERP Module 393 

IGG019Q0 Line I/O Interrupt Trace Routine 200 

TGG019Q1 Local Receive Scheduler 186 

TGG019Q2 Line End Appendage for BSC Lines 197 

IGG019Q3 Line End Appendage for Start/Stop Lines 197 

IGG019Q4 Line End Appendage for Leased and Start/Stop Lines 

and No TSO 198 

IGG019Q5 Line End Appendage for a QTAM-Compatible System 199 

IGG019Q6 Send Scheduler for Leased Lines and No TSO 188 

IGG019Q7 Send Scheduler with No TSO 189 

IGG019Q8 Checkpoint Continuation Restart Subroutine 163 

IGG019RA Checkpoint Disk End Appendage 374 

IGG019RB TCAM Dispatcher 171 

IGG019RC EXCP Driver 295 

IGG019RD Buffered Terminal Scheduler 189 

TGG019R* 1 EXCP Driver for a Single CPB 296 

IGG019RG GET/READ Routine 313 

IGG019RH GET Compatible Routine 319 

IGG019RI PUT/WRITE Routine 316 

IGG019RJ PUT Compatible Routine 320 

IGG019RK Disk End Appendage for a Single CPB 298 

IGG019RL Check Routine 315 

IGG019RM Point Routine 318 

IGG019RN PCI Appendage 210 

IGG019RO TCAM Dispatcher with Subtask Trace 178 

IGG019RP Reusability-Copy Subtask 298 

IGG019RQ Post Pending Routine 182 

TGG019R0 Line End Appendage 195 

IGG019R1 Dial Receive Scheduler 184 

IGG019R2 Disk End Appendage 297 

IGG019R3 Leased Receive Scheduler 183 

IGG019R4 Send Scheduler 187 

xiv 



TGG019R5 Attention Handler 200 

IGG019R6 Start-up Message Routine 168 

TGG01930 Disk Message Queues Open Routine - Load 1 153 

IGG01931 Disk Message Queues Open Routine - Load 2 154 

TGG01933 Open Error Handler 167 

TGG01934 Disk Message Queues Open Routine - Load 3 154 

TGG01935 Line Group Open Routine - Load 1 164 

IGG01936 Line Group Open Routine - Load 2 165 

IGG01937 Line Group Open Routine - Load 3 165 

IGG01938 Line Group Open Routine - Load 4 166 

IGG01939 Line Group Open Routine - Load 5 166 

IGG01940 Line Group Open Routine - Load 6 166 

IGG01941 Checkpoint Open Routine 155 

IGG01942 Checkpoint Disk Initialization Routine 158 

IGG01943 Checkpoint/Restart from Environment Record Routine 159 

IGG01944 Checkpoint/Restart from Incident and CKREQ Records 

Routine 160 

TGG01945 Checkpoint Continuation Restart Routine 161 

IGG01946 GET/PUT and READ/WRITE Open Executor - Load 1 307 

IGG01947 GET/PUT and READ/WRITE Open Executor - Load 2 307 

IGG01948 Line Group Open Routine - Load 7 166 

IGG01949 Checkpoint Disk Allocation Routine 157 

IGG02030 Disk Message Queues Close Routine 307 

IGG02035 Line Group Close Routine - Load 1 304 

IGG02036 Line Group Close Routine - Load 2 305 

IGG02041 Checkpoint Close Routine 306 

IGG02046 GET/PUT and READ/WRITE Close Executor - Load 1 309 

IGG02 GET/PUT and READ/WRITE Close Executor - Load 2 310 



xv 



FLOWCHARTS 

A A. STARTMH Subtask 427 

AC. Date and ^ime Provision Routine 430 

AD. Output Sequence Number Provision Routine 431 

AE. Locate Option Field Address Routine 432 
A 1 *. Insert. Data Routine 433 
AG. Message limit Routine 435 
AH. Input Sequence Number Insertion Routine 436 
A T . Skip "Forward and Scan Routine 437 
AJ. Skip to Character Set Routine 440 
A*. Line Control Insertion Routine 441 
Al. Address Finder Routine 444 
AM. Oriqin Routine 445 
AN. Multiple Insert/Remove Routine 446 
AO. Hnit Request Interface Routine 448 
AT?. Remove at Cffset Routine 449 
AO. Operator Control Interface Routine 451 
A 1 ?. Cancel Message Routine 452 
AS. Hold/Release terminal Routine 453 
A*". Create an Error Message Routine and Subtask 458 
An. Cutoff Messaqe transmission Routine 459 
av. Lookup Terminal Entry Routine 460 
AW. translate Buffer Routine 461 
AT. Ruffer Step Routine 462 
AY. Screen Routine 463 
A?. Redirect a Messaqe Routine 464 
AO. Skip Backward Routine 465 
A1. Rinarv Search Routine 466 
A?. Insert at cffset Routine 467 
A3. Dynamic Translation Routine 468 
A4. Incominq/Outgoinq Messaqe Delimiter Routine 469 
A5. Forward Routine 470 
A*. Line Control Initialisation Routine 471 
A.7. Counter Routine 473 
AS. Multiple Insert at Offset Routine 474 

BA. Multiple Routinq Subtask 475 

BB. Checkpoint Request Routine 476 
RC. Distribution list Subtask 477 

BD. Buffer Disposition Subtask 478 
RE. Lock Routine 480 

BE. Unlock Routine 481 
BG. Cascade List Subtask 482 
BL. Messaqe Generation Routine 483 
BT. EOB/ETR Handlinq Subtask 484 
BW. nnit Request Routine 488 
BX. Loq Seqment Routine 489 
BY. Loq Messaqe Routine 490 
R7. Loq Scheduler Routine 491 
CA. Resident Operator Control Module 493 
CR. Modify Options Routine 494 
CG. Copy Line Information Routine 497 
CR. Copy Terminal Information Routine 498 
CI. Copy LCB Information Routine 499 



xvi 



CiT. Copv OCT? Information Routine 500 

CK. Copy Held Terminals Pontine 501 

CI. Copy Invitation list Entry Routine 502 

CM. Copy operator Control Terminal Pontine 504 

C*t. Change Control Terminal Routine 505 

CO. Change Terminal Foutine 506 

CP. Alter Trace Status Foutine 509 

CO.. Stop/Resume Terminal transmission Foutine 511 

CU. start line Routine 512 

CV. Stop Line Foutine 516 

cw. Modify Poll Foutine 518 

CX. Modify Intense Foutine 519 

C7. Chanqe Interval Type Routine 521 

CO. MCP Closedown Processing "Routine 522 

C1. ICHNG Processing Foutine 524 

C2. On-line Test Interface Foutine 527 

C3. Copy Invitation list status Foutine 529 

Cf>. DEBUG Service Aid Router 530 

EP. AOCTI SVC 102 Routine (IGC1021 532 

EC. Put Scheduler 533 

ES. Retrieve Service Foutine 534 

ET. Operator Control/Application Program Interface Foutine 535 

EU. Open/Close Subtask 536 

EW. Get Scheduler 537 

E7, . Get Scheduler FIFO Routine 540 

El. TCOPY Service Routine 541 

E2. QCOPY Service Routine 542 

E3. TCHNG Service Routine 543 

E4. TCOPY Service Foutine 544 

E6. Password Scrambler Routine 545 

E7. Retrieve Scheduler 546 

FA. C*R Initialization 547 

FA1. CPB Initialization - Main storage Oueuing Only 571 

FA2. CPB Initialization - Disk Queuing Only 586 

GA. Buffer Management Module , 608 

GT. Transparent Transmission CCW Building Routine 614 

HG. Time Delay Subtask 617 

HI. System Delay Subtask 620 

HK. Stop Line T/O Subtask 622 

HM. Destination Scheduler 623 

HM1. Destination Scheduler - Main Storage Oueuing Only 633 

HM2. Destination Scheduler - Disk Queuing Only 641 

JC. Start/Stop EFP Control Module (TGE0004G) 648 

JD. Read/Write Unit Check and Unit Exception ERP 

Module (IGE0104G) 650 

JE. Non-operational Control Unit ERP Module (TGE0204G) 652 

Jt 1 . Unit Check for Non-read, Mon-write, and Non-poll 

CCWs ERP Module (IGE0304G) 653 

JG. Auto Poll and Read Response to *>oll Unit Check and Unit 

Exception ERP Module (TGE0404G) 654 

JH. Error Post and Second Level CCW Return Module (IGF0504G) 655 

JT. Unit Check and Unit Exception on Read/Write CCWs for 

Audio and 2260 local Devices ERP Module (IGE0604G) 656 

JJ. Start/Stop Channel Check ERP Module (TGE0804GV 657 



xvii 



JK. Closedown Terminal Statistics Recordinq Module (IGE0904G) 658 

JL. BSC ERP Control Module (IGE0004H) 659 

JM. BSC Pead/Write Eauipment Check, Lost Data, Intervention 

Peguired, and Unit Exception ERP Module (TGE0104F) 661 

JN. BSC Pead/Write Data Check, Overrun, and Command 

Peiect EPP Module (IGE0204H) 663 

,70. BSC Second Level CCW Peturn Module (IGE040UW) 665 

IP. BSC Error Post Module (IGE0504H) 666 

JO. BSC Channel Check EPP Module (TGE0804F) 667 

KA. Activate-T/O Generator Subtask 668 

LA. Open Error Handler (IGG01933) 670 

LB. Disk Message Queues Open Poutine-Load 1 (IGG01930) 671 

LC. Disk Message Queues Open Poutine-Load 2 (IGG01931) 672 

LD. Disk Message Queues Open Poutine-Load 3 (IGG01934) 673 

LE. Line Grcup Open Poutine-Load 1 (IGG01935) 674 

LP. Line Group Open Poutine-Load 2 (IGG01936) 675 

LG. Line Group Open Poutine-Load 3 (IGG01937) 676 

LP. Line Group Open Poutine-Load 4 (IGG01938) 677 

LT. Line Grcup Open Poutine-Load 5 (IGG01939) 678 

LJ. Line Grcup Open Poutine-Load 6 (IGG01940) 679 

LK. Line Group Open Poutine-Load 7 (IGG01948) 680 

LM. Peturn Interface Poutine 681 

L1. Disk Message Queues Close Poutine (TGG02030) 682 

L4. Line Group Close Poutine-Load 1 (IG002035) 683 

L^. Line Grcup Close Poutine-Load 2 (TGG02036) 684 

L6. Checkpoint Close Routine (IGG02041) 685 

17. GET/PUT and *EAD/WRITE Open Executor-Load 1 (IGG01946) 686 

L8. GET/ptit and PEAD/WRITE Open Executor-Load 2 (IGG01947) 687 

L9. GET/PTTT and READ/WPT^E Close Executor-Load 1 (IGG02046) 688 

L10. GET/PUT and READ/WRI^E Close Executor-Load 2 (TGG02047) 689 

ma. Checkpoint Open Poutine (IGG01941) 690 

MB. Checkpoint Disk Initialization Poutine (IGG01942) 691 

ME. Checkpoint/Pestart from Environment Record 

Routine (IGG01943) 693 

MG. Checkpoint/Restart from Incident and CKPEQ Records Poutine 

(IGG01944) 696 

MJ. Checkpoint Continuation Restart Poutine (IGG01945) 700 

MM. Checkpoint Disk Allocation Routine (IGG01949) 703 

NA. Resident Closedown Completion Routine 705 

NA2. Nonresident Closedown Completion Poutine 706 

NB. Application Program/Checkpoint Interface Poutine 707 

ND. Ready Poutine 709 

ne . Checkpoint Executor Routine 711 

NG. "Ruild Incident Record for MP Routine 712 

WH. Build Incident Record for TCHNG Routine 713 

N.7. incident Checkpoint for Operator Control Routine 714 

NF. Environment Checkpoint Poutine 715 

NM. Build CKPEQ Disk Record Routine 718 

^0. Checkpoint Queue Manager Routine 719 

NP. Checkpoint Disk 7/0 Poutine 720 

NQ. Checkpoint Notification and Disposition Routine 723 

Np. Checkpoint - No Available Core Routine 726 

ns. Checkpoint - No Incident Records Poutine 727 

NT. Termname Table Code 728 



XVlll 



* T X. 


NZ . 


0* . 


0*. 


OG. 


OM. 


OS. 


00. 


01. 


Q2. 


03. 


ou. 


0^. 


06. 


0*7. 


OR. 


^A. 


BB. 


V C. 


TD. 


■"F. 


RG. 


Rfl. 


RT . 


BJ. 


RK. 


RT.. 


PM. 


FN. 


BO. 


pp. 


BO. 


BO. 


P1 . 


R2. 


B3. 


pa. 


P5. 


PS. 


T'NT # 


UT. 


YA. 


YA. 


YC. 


YD. 


YE. 


IF. 


YH. 


II. 


YL. 


IM. 


YO. 


YR. 



Operator Awareness Message "Router 729 

TCAW Command Scheduler - SVC 34 (TGC1303D) 731 

Link Routine 732 

WTOR Interpreter Boutine 733 

IWTBO GERMAIN Boutine 738 

Termname Table Sort Boutine 739 

Attach Boutine 740 

Line I/O Interrupt Trace Boutine (IGG019Q0) 741 

Local Beceive Scheduler (IGG019Q1) 742 

Line End Appendaqe for BSC Lines (IGG01902) 743 

Line End Appendaqe for Start/Stop Lines (IGG019O3) 756 
Line End Appendaqe for Leasee! and Start/Stop Lines and 

No TS0 (IGG019Q4) 765 
Line End Appendaqe for a OTAM-Compatible System (IGG019Q5) 

Send Scheduler for Leased Lines and No ^SO (IGG019Q6) 779 

Send Scheduler with No TSO (IGG019Q7) 780 

Checkpoint Continuation Restart Subroutine (TGG019O8) 782 

Checkpoint Disk End Appendaqe (IGG019PA) 783 

m CAM Dispatcher (IGG019P?) 784 

EYCP Driver (IGG019RC) 786 

buffered Terminal Scheduler (IGG019RD) 792 

EXC^ Driver for a Sinqle CPB (IGG019FE) 795 

GET/BEAD Boutine (IGG019RG) 796 

Get Compatible Boutine (IGG019BH) 800 

PUT/WBTTE Boutine (TGG019BT) 803 

Put Compatible Boutine (IGG019RJ) 804 

Disk End Appendaqe for a Sinqle CPP (TGG019RK) 805 

Check Boutine (IGG019B7) 806 

Point Boutine (IGG019R1M 807 

PCI Appendaqe (IGG019PN) 808 

TCAM Dispatcher with Subtask Trace (IGG019BO) 810 

Reusability-Copy Subtask (TGG019RP) 812 

Post ^endinq Boutine (IGG019B.O) 823 

Line End Appendaqe (IGO019B0) 824 

Dial deceive Scheduler (IGG019R1) 838 

Disk End Appendaqe (TGG019P.2) 840 

Leased Beceive Scheduler (IGG019B3) 841 

Send Scheduler (TGG019B4) 842 

Attention Hanaiinq Boutine (TGG01QB5} 844 

Start-up Messaqe Poutine (IGG019B6) 845 

Attention Boutine 848 

tTser Interface Boutine 349 

Disk wessaqe Oueue Initializer 850 

^SO Attention Routine 852 

TSO Carriaqe Subroutine 854 

Time Sharinq Destination Scheduler 857 

tso TT.0C Edit Boutine 858 

TSO TOPALT Boutine 862 

TSO Fanqup Routine 863 

TSTNPtTT Boutine 864 

1*50 Loqon Boutine 866 

tso Message Generation Routine 868 

TSOTJTPtTT Boutine 871 

STAPTMH Subtask for TCAM-tsc Mixed 874 



xix 



YT. 
7X. 
YY. 

YZ. 
71. 
7?. 
7 3 . 
74. 
75. 
26, 



TSO Si 

^so ab 

TSO TN 
I'SO AS 
Time S 
Operat 
Operat 
operat 
Operat 
Operat 
Operat 



mulated Att 
end Interfa 
MSG/OHTMSG 
ynchronous 
harinq Sche 
or Control 
or Control 
or Control 
or Control 
or Control 
or Control 



ention Routine 

ce Routine 

Linker 

^ime Delay Bemoval Routine 

duler 

Control Module - Load (IGC0010D.) 

Control Module - Load 1 (IGC0110D) 

Control Module - Load 2 (TGC0210D) 

Control Module - Load 3 (TGC0310D). 

Control Module - Load 4 (TGC0410D) 

Control Module - Load 5 (TGC0510D) 



879 
881 
882 
883 
884 
8 89 
891 
892 
893 
894 
895 



xx 



"FIGURES 

1. Physical Orqanization of TCAfl 26 

2. TCAM OCB Linkaqe 33 
^ . Priority of Subtasks on a OCB 3^ 

4. Passinq Elements to a OCB 34 

5. t'CAM Dispatcher Pnaloqy 35 

6. Pointers from an Invitation List to the Termname Table 43 

7. Pointers from the Termname Table to the Terminal Table 44 
B. Relationships amonq the AVT, the ^ermname Table, 

the Terminal Table, and the DCT 49 

Q. Example of a Special Characters ^able Entry 49 
10. "Relationships among the LCB, DCB, SCT, and 

Translation Tables 49 

11- "Resource Control Block SO 

12. format of a Full STCB 51 

13. General format of a OCB 52 

14. "Format of an EBB 53 

15. Linkage from the Beady Queue to Subtask Code 65 

16. Pointers durinq a "Ready Queue TTpdate 66 

17. Linkaqe from Beqister 1 when a Subtask Gains Control 67 

18. "Formats for Different Types of STCBs 69 

19. Format of a Cross-Partition Data Movement Parameter list 71 

20. Formats of an ECB POST Parameter List 71 

21. Format of a Parameter list to Flaq the TCB of a TSO Proqram 73 

22. A Beceive Scheduler STCB in an LCB on the Beady Queue 75 

23. nnit Control area 78 

24. Buffer Units chained to Form loqical Buffers 79 

25. Effect of an EBB on Buffer Hnit Linkaqe 81 

26. Buffers Prepared to Beceive Data 82 

27. Assiqnment of Disk ^essaqe Queues Data Set Belative 

Becord Numbers Across Three volumes 90 

28. Disk Oueuinq a ^hree-Unit Buffer 93 

29. Disk Oueuinq an Eiqht-TTnit Buffer 94 

30. Disk Oueuinq the Second Buffer of a Wessaqe 95 

31. Disk Oueuinq a One-Dnit Wessaqe 96 

32. Disk Queuinq Pointers 97 

33. Example of Two Oueue-Back Chains 99 

34. Disk Oueuinq - FIFO and FFFO Pointers 102 

35. Zones for Servicinq and Dpdatinq a Beusable Disk 

*!essaqe Queues Data Set 103 

36. "format of an LCB and a Destination OCB after Tine Open Time 106 

37. "*ormat of a Send Priority LCB and Destination QCB 

after a "Pull Message Has Been Received 107 
3 8. Linkaqe amonq Storaqe Areas in the MCP ard an Application 

Proqram after Initialization 119 



xxi 



HOLDOUT 1 CHARTS 

1- Initialization of a Message Control Program 1237 

2. Functions of Open Disk Message Queues Data Set 1239 

?. functions of Checkpoint Open 1241 

4. Functions of line Group Open 1243 

^. functions of the BEADY Macro Expansion ard Routine 1245 

6. Summary of the Dispatching Functions of the TCAM Dispatcher 1247 

7. Summary of the Queuing Functions of the TCAM Dispatcher 1249 

8. ^CAM Message *low 1251 
Q . functional Flow in a Receive Operation 1253 

10. Functional Flow in a Send operation 1255 

11. Functions of an Initial Buffer Reguest in a Receive Operation 1257 

12. functions of an Initial Buffer Reguest in a Send Operation 1259 

13. Functions *cf Buffer Return 1263 

14. ^low of Buffers through a Message Handler 1265 
1^. Nonreusable Disk Queuing Functions of the Destination 

Scheduler Routine 1267 

16. Functional Flow when Receiving from a line 1269 

17. functional Flow when Sending to a Line 1277 

18. functional Flow for MCPCLOSE and Closedown Completion 12B3 

19. functional Flow of the DCB Closedown Procedure 1285 
?0. Initialization Functions in an Application Program 1287 

21. Termination Functions in an Application Program 1289 

22. Functional Flow of Bow Data is Massed from the MCP to an 

application Procrram 1291 

^3. functional Flow of Bow Data is Passed from an Application 

Program to the MCP 1293 

24. Application Program Interface with operator Control 1295 

25. Application Program Network Control Facilities 1297 

26. Functional Flow of operator Control 1299 

27. Functional ^low of the Checkpoint Routines 1301 

28. Control Flow of the Environment Checkpoint Routines 1303 
?9. linkage among the Start-Stop frp Modules 1305 
30. Linkage among the BSC FRP Modules 1305 



xxn 



Organization and Use of the TCAM Program Logic Manual 

This seven-part publication covers the internal logic of the IBM 
System/360 OS Telecommunications Access Method (TCAM) . The TCAM PLM 
is directed to the IBM customer engineers and system engineers who 
provide program maintenance and who need information on the internal 
organization and logic of TCAM. 

Section 1 is the Introduction to the TCAM system. The general 
information presented in the Introduction is basic to an understanding 
of TCAM. This information places TCAM in the proper perspective to 
the Operating System (OS) and points out the special concepts and 
control areas used by TCAM in order to operate as a component of OS. 

Section 2, the Method of Operation section, describes the functional 
flow of each operation in a TCAM system. When possible, the 
operations are discussed in seguential order by time of occurrence as 
a message is being processed by TCAM. Each discussion is accompanied 
by Method of Operation diagrams, which depict the operation. (These 
diagrams are foldout charts and are located between Appendix D and the 
Glossary at the back of this manual.) The main-line processing 
operations are discussed in the following order: 

1. Disk message gueue initialization 

2. Initialization of a Message Control Program (MCP) 

3. Message handling in an MCP 

4. Closedown of an MCP 

The other functional operations occur intermittently with the main- 
line processing and except for system control, are discussed after the 
MCP sections. System control is discussed after the MCP 
initialization section. These operations include: 

1 . System control 

2. Application program processing 

3. Operator Control processing 

4. Checkpoint processing 

5. Error recovery procedures 

6. Time Sharing Option interface 

Section 3 covers the program organization and operation, both in 
textual descriptions and in flowcharts. Each TCAM module is described 
within its functional area of operation. The functional areas are 
organized exactly as in the Method of Operation section and thus allow 
the reader to relate actual modules to general functions. When a 
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module name ends in two letters or in one or two letters followed by 
a number, the flowchart identification is the same as those 
characters. When multiple flowcharts are necessary for a module, 
these two or three characters are followed by a dash and then a number 
(HM1-1) . When a module name ends in twc numbers, the flowchart 
identification is arbitrarily assigned. 

The information on a TCAM-TSO mixed environment is located in two 
places in Section 3. When a TCAM module contains logic necessary to 
identify that TSO is in operation and to activate special TSO 
routines, that module description and flowchart describe the tests. 
The special TSO routines that operate under the TCAM Dispatcher, but 
that perform TSO-only functions, are described in a section devoted 
solely to TSO routines. There is also a general discussion of the 
m CAM-TSO interface in Section 2. 

Section 4 is the TCAM Microfiche Directory. This directory is a list 
of all TCAM modules. Each entry contains the corresponding entry 
point or entry points, its generic name, its flowchart identification, 
and its CSECT name. 

Section 5 is a composite of the data areas that are used by TCAM. 
Each data area is described in terms of purpose, internal references, 
allocation, and initialization. Both a visual and a tabular 
description of the DSECT for each area are also given, where 
applicable. 

Section 6 contains tables of information to aid in debugging and 
analyzing the activity of TCAM. 

The seventh section consists of information to aid in the use of TCAM. 
This information is in four appendixes: a list of TCAM gueues and 
OCEs, a list of TCAM modules by library, a list of TCAM relative 
priorities, and the TCAM channel programs. 
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SECTION 1: TNTBODUCTION 



This section provides general information describing the purpose, 
organization, and internal operation of the Telecommunications Access 
Method (TCAM) , and its relationship to the operating system. 



PUPPCSE OF TCAM 

TCAM is a component of the IBM System/360 Operating System. The 
primary purpose of TCAM is to provide a high-level access method to 
communicate with telecommunications eguipment while maintaining the 
greatest possible amount of device independence. In addition to 
supporting the transfer of data (messages) between both local and 
remote terminals and the system, TCAM provides a high-level, flexible 
message control language that can be used tc direct the processing of 
the data. By using the TCAM macro instructions, installation-oriented 
message control is achieved. 



SYSTEM STRUCTURE 

TCAM operates under OS MFT or MVT in System/360 Model 40 or above 
processors. The minimum main storage reguirement is 128K bytes. In 
addition to the system timer and normal OS reguirements, TCAM reguires 
a 2701, 2702, or 2703 on a multiplexer channel (unless only the 7770 
or 2260 local terminals are used, in which case the 7770 or 2848 is 
attached to the channel) . Secondary storage for libraries and main or 
secondary storage for gueuing are also reguired. 

This section describes the various parts of TCAM and explains what 
they are, where they come from, how they get into the system, their 
relationships to each other, and how they pass control back and forth. 

Figure 1 shows the steps necessary to begin processing in the TCAM 
environment. 
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SYSTEM GENERATION 

When TCAM is called for durinq a system generation procedure (via the 
ASCMETH operand in the DATAMGT system qeneration macro instruction) , 
the TGAM modules are included in four libraries: SYS1.MACLIB, 
SYS 1. TELCMLIB, SYS1.SVCLTB, and SYS1 . IINKLIB . An Attention routine 
and a Type I SVC module (the AOCTL SVC 102 routine) are incorporated 
in the Supervisor Nucleus (SYS 1 . NUCLEUS) . Usinq these modules, the 
user can assemble, linkaqe edit, and execute TCAM messaqe control and 
application proqrams. 

TCAM Ma c ro Definitions 

The operatinq system macrc definition library (SYS1 . MACLIE) includes 
the macro definitions necessary for the assembly of TCAM messaqe 
control and application proqrams. 

TCAM Resident Modules 

When performinq a system qeneration to include TCAM, the user must 
define a special library area named SYS1 . TELCMLIB . Durinq the 
qeneration run, modules that can later be linkaqe edited with messaqe 
control and application cbiect modules are copied from SYS1.CQ548 into 
SYS1 . TELCMLIB . In this publication, these modules are defined as the 
TCAM resident modules* Appendix A contains a list of the modules in 
SYSt. TELCMLIB. 

TCAM Support Modules 

Durinq the system qeneration run, all modules that are loaded into 
main storaqe by the various system open executors and the TCAM open 
and close executors are copied from SYS1.CQ548 into SYS1.SVCLIE. The 
TCAM Dispatcher, the Command Scheduler, the Type IV SVC modules, and 
the Error Recovery Procedure routines are also placed in SYS1.SVCLIB. 
In this publication, these modules are defined as TCAM suppor t 
modules* ApDendix A contains a list of the TCAM support modules in 
SYS1.SVCLTB. 

The Error Recovery Procedure routines and the TCAM open and close 
routines can, at the option of the user at system qeneration, be 
resident or transient durinq proqram execution. In either case, these 
routines reside in SYS1.SVCLIB. 

TCAM Transient Modules 

At system qeneration time, modules that can be called into main 
storaqe for a limited lenqth of time durinq the execution of a TCAM 
messaqe ccntrcl or application proqram are copied from SYS1.CQ548 into 
SYS1 .LINKLTB. In this publication, these modules are defined as TCAM 
transient modules. Appendix A contains a list of the modules in 
SYS1.IINKLIB. 

The Operator Control, Checkpoint, and On-line Test routines stored 
in SYS1.LINK1IE can optionally be specified to be resident durinq 
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t>rogram execution. However, in this publication they are defined as 
transient modules. 

System Nucleus Modules 



At system generation time, the Attention routine and the AQCTL SVC 102 
routine (a Type I SVC) are copied from SYS1.CQ5U8 into SYS1 . NUCLEUS. 
Tn this publication these two modules are defined as the system 
nucleus modules. 



THE MESSAGE CONTPC1 PEOGBAM IN THE SYSTEM 

Assembling and linkage Editing a Message Control Program 

The user codes the TCAM macro instructions necessary to design a 
message control program. When these instructions are entered for 
assembly, the output of this assembly includes: several tables and 
control blocks, linkages to TCAM resident and support routines, 
message handler (MH) macro instruction expansions, and any user- 
written routines that were included. 

The assembled obiect module is then linkage edited to include the 
referenced resident routines from SYS1 .TELCMLIB. These resident 
routines are the MCP routines used to process header information, to 
translate from one transmission code to another, to direct messages to 
the proper lines and gueues, to manage system resources, etc. 

The resulting load module is stored in a system library to be 
loaded for execution. 

Execution of a Message Control Program 

The TCAM message control program (MCP) is normally executed as the 
highest priority task in the highest priority partition or region in 
the system. The OS Initiator/Terminator routine loads and transfers 
control to the MCF. The first TCAM macro instruction executed must be 
TNTEO. The initial functions of INTSC are to establish the TCAM 
Address Vector Table (AVT) , addressability and entry linkages for the 
MCP, the Cross-Feference Table, the Channel Program Elock (CPB) pool, 
the buffer unit pool, and main storage gueues. TNTBO also attaches 
the Operator Control, EE Common Write, and On-line Test tasks and 
provides override of some TNTRO parameters via the Write to Operator 
with Reply (WTOE) Interpreter routine. These functions are discussed 
in detail under Functions of INTPO in the Method of Operation section 
of this publication. 

The MCP runs under the control of the OS task management routines. 
It is scheduled and dispatched according tc the priorities included in 
the Task Control Block (TCB) in the partition in which it is being 
executed. The MCP includes: 

1. The obiect module output from the assembly of the user's code. 

2. The resident routines linkage edited with the assembly output. 
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In order to understand the operation of an MCP, it is necessary to 
become acquainted with the use of save areas in the MCP and the way in 
which control is passed from one level of operation to another. Five 
save areas are located at the beqinninq of the AVT, which is assembled 
at the beqinninq of the MCP. The MCP is that portion of the user's 
CSECT that contains the INTBO, OPEN, BEADY, and CLOSE macros, the MH 
routines and macrc expansions, and constant areas. 

Save area manaqement occurs when a subroutine returns to the 
routine that called it. A save area "belonqs" to a routine when that 
routine sets reqister 13 to point to the save area, A subroutine of 
the routine can then store the reqisters of the routine in the 
specified save area. If a routine does net call a subroutine, it does 
not have a save area, since it does not modify the contents of 
reqister 13. 

TCAM maintains four 18-word save areas and one 10-word save area 
in the AVT. After the standard entry linkaqe of a routine that uses 
save area manaqement, certain words of the save area contain specific 
addresses: 

• The second word of the save area points to the address of the save 
area for the callinq routine. 

• The third word of the save area for the callinq routine has the 
address of the save area for the called routine. 

• Beqister 13 has the address of the save area for the called 
routine. 

Durinq the standard exit linkaqe of a routine that uses save area 
manaqement, the save area address for the callinq routine is restored 
from the second word of the save area for the called routine. The 
reqisters of the callinq routine are also restored from this area, and 
the callinq routine can reqain control. 

As stated previously, when OS Job Manaqement initiates an MCP, the 
MCP qains control at the INTBO macrc expansion. In performinq 
standard entry linkaqes, the INTRO macro expansion sets reqister 13 to 
point to the first field of the AVT, AVTSAVE1, which is the save area 
that belonqs to the MCP. When the functions of the BEADY macro are 
executed, the MCP calls the TCAM Dispatcher. The TCAM Dispatcher 
performs standard entry linkaqe, savinq the reqisters of BEADY in 
AVTSAVE1 and settinq reqister 13 to point to the Dispatcher save area, 
AVTSAVE2. 

Boutines, subroutines, and subtasks use the AVTSAVE3 and AVTSAVE4 
save areas if they need to perform save area manaqement. 

When a disabled routine, an appendage, qains ccntrcl, it uses 
AVTSAVEX, the ten-word save area, to store the I/O Supervisor 
reqisters. 
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THE APPLICATION FECGBAM IN THE SYSTEM 

Assemblinq and Linkaqe Editinq an Application Proqram 

A TCAM application proqram processes messaqes obtained, from a TCAM 
MCP. The application proqram can run in a partition or reqion 
different from the MCP, or it can run as an attached task in the same 
partition or reqion. 

An application proqram needs only the OPEN, CLOSE, GET, and PUT 
macro instructions and some data set definition macro instructions, 
when this is the case, no resident routines need to be linkaqe edited 
with the obiect module. However, the user may wish to write 
application proqrams . that use the followinq macro instructions to 
examine and modify the status of the MCP: 

• CHECK 

• CKREO 

• TCOPY 

• MCPCLCSE 

• MRELEASE 

• POINT 

• ocopy 

• TCHNG 

• TCOPY 

When any of these macro instructions are used, the linkaqe editor 
includes the correspondinq resident modules in the load module. The 
load module is stored in a system library from which it is loaded for 
execution. 

Execution of an Application Proqram 

It is possible to run an MCP with no application proqram, but there 
may be one or more application proqrams beinq executed asynchronously 
with the MCP. 

In most cases an application proqram is loaded into the next 
hiqhest priority partition to the MCP. However, application proqrams 
may also be executed in the same partition as the MCP after beinq 
brouqht in by the system ATTACH facility. 

Application proqrams, like the MCP, run under the control of the 
OS task manaqement routines. They are scheduled and dispatched 
accordinq to the priorities indicated in the Task Control Blocks 
(TCBs) for the partitions in which they are beinq run. 
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An application proqram includes: 

1. The obiect module output from the assembly of the user's code. 

2. Any resident routines linkaqe edited with the assembly output. 

3. The CHECK, POINT, GET/READ, and PUT/WRITE routines. 

The primary difference between a TCAM application proqram and any 
other processinq proqram is the requirement for and the implementation 
of inter-partiticr communication. 

The various macro instructions that can be used in an application 
proqram are handled as follows: 

1 - TCOPY* ICQPY, and QCCPY. The correspondinq resident routine for 
each of these macro instructions copies the requested information 
from the MCF .partition, usinq address pointers stored in the AVT 
and in the Terminal Table. These tables are located via the 
Communications Vector Table (CVT) . 

2. JL3JL other , macro instructions. The routines invoked by the 
remaininq macro instructions cause SVC TYPE I interruptions to the 
supervisory routines. A module within a partition can move data 
or control information from another partition into its own 
partition; however, that module must use an SVC either to move 
data from its own partition into another partition or to move data 
within another partition. 

RELATIONSHIP CE TEE OS DISPATCHER TO TCAM 

The Operatinq System (OS) qains control from the TCAM task when the 
TCAM Dispatcher finds no elements on its ready queue and subsequently 
issues an OS WAIT macro. This indicates that the MCP has no work to 
perform. When OS qains control, it examines all the ready tasks in 
the system and passes control to the cne with the hiqhest priority. 

When a TCAM appendaqe has work for the MCP, it invokes the OS Post 
routine via a branch entry point to post the MCP Event Control Block 
(ECB) . This indicates to the OS Dispatcher that the MCP now has work 
to do and is vyinq for control of the system. OS can pass control to 
the TCAM task when it is the hiqhest priority task that is ready to be 
activated. TCAM resumes execution at the instruction followinq the 
WAIT that qave control tc OS. 

TCAM posts the ECBs for its attached tasks when they are to be 
activated. When TCAM subsequently issues a WAIT, the attached tasks 
can vie to qain ccntrol from OS. 
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THE TCAM DISPATCHER 



The followinq sections describe the tools and mechanisms by which the 
TCAM Dispatcher, or control module, allocates and schedules system 
resources, that is, CPU processinq time, main storaqe, I/O paths, and 
elements (primarily buffers and lines) . The key to the mechanism is 
"the ready queue, throuqh which a resource is allocated to a subtask. 
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A detailed discussion of the TCAM Dispatcher is included under 
System Control in the Method of Operation section of this publication. 

Elements, Queues, and Subtasks 

The physical resources of the system are composed of elements (for 
example, the buffer pool, a resource, is broken into individual 
buffers, the elements) with each element represented by a resource 
control block (RCB) . An RCE is an 8-byte prefix to an element. The 
first four bytes are a pointer to the queue control block (QCB) that 
the element is to be associated with; the last four bytes contain a 
priority byte and a link field. 



RCB 


Buffer 



There is at least one 
element in the system. 
control blocks (STCBs) . 



subtask that works with every type of 
These subtasks are represented by subtask 



The elements, and the subtasks that operate on these elements, are 
associated with one another by a third control block, the queue 
control block (QCB) . Thus, a QCB has a pointer to the chain of 
elements under its control and a pointer to the chain of STCBs for 
subtasks waitinq to operate on these elements. The chains are 
referred to as queues. Eiqure 2 illustrates the linkage of these 
queues to a OCE. 
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Fiqure 2. TCAM QCB linkaqe 

When a subtask needs an element, it can request one from the QCB 
that handles that particular element by tpcstinq a request element to 
that QCB or it can insert its STCB into the STCB chain of the QCB to 
twait for the element. When the element is available, the subtask is 
dispatched. 
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Fiqure 3. Priority of Subtasks on a QCB 
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Figure 4 demonstrates the linkaqe when an element processed by 
Subtask Y. is tposted to the QCB and placed on the element chain by 
Sufctask C. Subtask C can place the element in the QCB element chain 
only if Subtask A and Subtask B do not need the element and pass it 
down the chain to Subtask C. 
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figure 4. Passing Elements to a QCB 



To illustrate the basic sequence of events involved when the TCAM 
Dispatcher processes an element, the procedure can be compared to a 
postal service system. The people that mail and receive letters are 
subtasks. Each letter is an element, the address on a letter is its 
QCB, the post box is the ready queue, and the mail box at the 
destination is the appropriate STCB. When a letter is mailed 
(tposted) , it becomes the property of the post office (the TCAM 
Dispatcher) . The post office examines the address (the QCB) and 
directs it tc its destination (the STCB) . When the letter is 
delivered (dispatched) , the person represented by the address (the 
subtask) can examine it. Fiqure 5 illustrates this analoqy. 
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figure 5. TCAM Dispatcher Analogy 
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The ^eadv Queue 

The previous discussion points out that subtasks qain control from the 
TCAM Dispatcher dependinq on: 

1. The availability of elements, and 

?. The priority of the STCE for the subtask. 

The TCAM messaqe control proqram is responsible for allocatinq CPU 
processinq time to the various tasks under its control. The 
mechanism it uses is called the ready queue (as discussed later, there 
are actually twc ready queues) . 

^he ready que ue is a chain of elements that represent all the work 
to be done in the TCAM system. The work to be done is represented by 
the various elements (FCEs) that appear on the ready queue in priority 
order. The purpose of the ready queue is to ensure that all elements 
are processed and dispatched with full respect to priority and without 
one impactinq the resources of another. 

To support dispatchinq while enabled for interruption, TCAM uses 
two ready queues. One is desiqnated to be used by disabled appendaqes 
or by the disabled AQCTL SVC 102 routine for tpostinq elements, while 
the other is used by enabled routines. Althcuqh the two ready queues 
are not manaqed by the same technique, each is a ready queue because 
it contains elements (RGBs) to be processed by the various subtasks. 

TCAM manaqes the disabled ready queue by the f irst-in-first-out 
(FIFO) technique. The queue itself consists of twc worths: a one-word 
pointer to the first and a one-word pointer to the last element on the 
queue. Disabled appendaqes place an element (BCB) on the disabled 
ready queue by linkinq the new element to the element pointed to by 
the second word of the queue and by then updatinq the second word to 
point to the new element. 

TCAM manaqes the enabled ready queue by the priority^FTFO 
technique. The TCAM Dispatcher has the responsibility for merging the 
disabled into the enabled ready queue iust prior to dispatchinq. 
Dispatchinq is always handled from the enabled ready queue, and unless 
specified otherwise, this is the cne referred to as the ready queue. 

The TCAM Dispatcher manaqes the ready queue by attemptinq to 
execute the subtask associated with the hiqhest priority element on 
its chain. Since the element has an 3CB as its prefix, the Dispatcher 
can refer to the correct QCB in order to pass control to the first 
subtask represented in the STCB chain cf the QCB. The subtask 
processes the element and then returns control to the TCAM Dispatcher, 
which can then examine the next element en the ready queue. A 
discussion of the way the TCAM Dispatcher manaqes the ready queue is 
included under System Control in the Method of Operation section of 
this publication. 
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Principle of Tpost and Twait 

The technique for passinq an element from cne queue to another queue 
is called tpostinq. When the sufctask that an STCE points to finishes 
processing an element and wishes to allow another routine to process 
that same element, the sufctask tposts the element to the second 
routine. The subtask achieves the tpost by placing in the HCB of the 
element a pointer to the QCB that controls the STCE for the new 
routine, and by then returninq to the TCAM Dispatcher with an 
indication that the element is to be placed en the ready queue. 

The second technique for handlinq resources is called twaiting . 
When a subtask needs elements to process, it returns control to the 
TCAM Dispatcher indicatinq that it has finished the processinq that it 
can do at this time. The twait is implemented by the TCAM Dispatcher. 
The Dispatcher places the STCB for this sufctask in the STCB chain of 
the OCB to which the resource that the subtask needs tc complete 
processinq will be tpested. When an STCB is in the STCE chain of a 
OCB and the subtask for that STCB does not have control, the subtask 
is twaiting. 

When an application proqram needs either to place an element on 
the disabled ready queue, to post an Event Control Block (ECB) 
complete, or tc move data from one partition to another, a special 
technique is used. This technique is performed by the AQCTL SVC 102 
routine, which uses pointers in the AVT to refer to the disabled ready 
queue. Since AQCTL is a resident Type I SVC, the actual processinq 
occurs in the OS Supervisor, out of the control of either the 
application prcqram or the MCP. A detailed discussion cf the AQCTL 
SVC 102 routine is included under System Control in the Method of 
Operation section of this publication. 



TCAM CONTROL AKE&S 

A TCAM control area is a storage area throuqh which a particular type 

of information required for control of the TCAM system is communicated 

amonq its parts. There are several principal control areas used by 
^CAM: 

» TCAM Address Vector Table 

• Invitation List 

• Termname Table 

• Terminal Table 

• Option Table 

• Option Characteristics Table 

• Device Characteristics Table 

• Special Characters Table 
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• Translation Tables 

• Resource Control Block 

• Subtask Control Block 

• Queue Control Block 

• Line Control Block 

• Station Control Block 

• Channel Program Block 

• Element Request Block 

• Process Control Block 

• Operator Control address Vector Table 

^CAM ADDRESS VECTOR TAELE 

The TCAM Address Vector Table (AVT) is a local constant area assembled 
in the MCP. When the functions of the INTRO macro expansion are 
executed , the AVT is initialized and formatted. At messaqe queues 
open time, a pointer to the word that contains the address of the AVT 
is placed in the system Communication Vector Table (CVT) . The first 
entries in the AVT are initialized from the parameters of INTRO, and 
other entries are made durinq the assembly of other macros coded by 
the user. 

The AVT provides work areas in which TCAM routines can store 
variables. The AVT also contains constant areas shared by more than 
one macro expansion or TCAM subroutine. The AVT contains five save 
areas - one for the MCP, one for each level of control in the MCP, and 
one for disabled code. (The levels of control in the MCP are 
discussed under System Structure in the Introduction section of this 
publication.) For efficient internal control, the AVT also contains 
module addresses, special elements, control bytes/tits, and the two 
ready queues. 

The format of the AVT is in the Data Area Layouts section of this 
publication. 



INVITATION LIST 

The INVLIST= (name of list,...) operand of a DCB macro specifies the 
names of the invitation lists for the lines of the line qroup 
represented by the DCB. There is one invitation list for each line in 
a line qroup, and the DCB contains a pointer to the control word of 
each of its invitation lists. An INVLIST macro specifies the actual 
entries in each invitation list. 
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An invitation list is a list of the invitation (polling) 
characters for terminals that may qenerate messages to the CPU on the 
same line. The order in which the invitation characters of the 
terminals are listed determines the order in which the terminals on 
the line are pclled. 

Invitation lists may contain both active and inactive entries. 
Active entries are those invited to enter a message on each pass 
through the list; an X'FF' follows the last active entry. An inactive 
entry is one that is not currently being invited to enter messages. 
Inactive entries in the list are located after the X'FE 1 indicator. 
The methods of establishing and altering the status of the entries in 
the invitation list are discussed in the section on Invitation in the 
System/360 OS -TCAH Programmer ' s Guide , Order No. GC 30-2024. 

The general fcrmat of an invitation list is eight bytes of control 
information, followed by an invitation list entry for each active 
terminal on the line, followed by an end-cf-list indicator (X'FE')» 
followed by an entry for each inactive terminal on the line. 



An invitation list with 
format: 



active entries has the following 
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Word 
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ID 



Invchars 



Invchars 



-ih 
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Fel1«-Keln- are the two-byte relative positions in the Termname Table 
for the entries represented by the invitation characters. There 
is one two-byte field for each entry in the invitation list, in 
reverse order. 



Control Word is a field defining the status of 
(See format belcw.) 



the invitation list. 



CPU . ID, for dial terminals, is the address of a field that contains 
the ID seguence assigned to the computer. The referenced field 
contains a length byte, which specifies the number of bytes in the 
ID seguence, followed by the ID seguence itself. For buffered 
terminals, the CPU ID field in an invitation list has the 
following format: 



Offset +4 
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+7 



Active 
Count 


UCB 
Status 


Reserved 


Terminal 
Count 
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Active Count is the number of active terminals on the line to 
which TCAM is currently sending. This field is initialized to 
zero at line open time. 

UCB _ Status is set to X'01' at line open time if the UCB for the 

line indicates Autc Poll. Otherwise, this field contains 
X'OO 1 . 

Terminal Count is the total number cf terminals on this line. 
This field is initialized at line open time, 

Tny chars are the invitation or pollinq characters to be used for the 
terminal. The one-byte index following "Invchars" points to the 
corresponding relative position field that precedes the control 
word. 

X -' EE f is the end-of-list indicator, which is used to separate active 
and inactive entries. An EOT character precedes the X'FE* as an 
end of transmission character in an invitation list for BSC Auto 
^oll terminals. 

The control word of an invitation list has the following format: 



Offse: o 



+1 



+2 



+3 



Total 
Entries 


Active 
Entries 


Width 


Status 



Total entries indicates the number of active and inactive entries in 

the list (if this byte is equal to zero, the list is for an 
output-only line; there is no message traffic from the terminals) . 

Active entries indicates the number cf entries currently being 

invited. Tf byte 1 is egual tc zero, all the entries in the list 
are inactive. 

Width indicates the size of each entry in the list (the size includes 
the one-byte index that follows the invitation characters) . 

Status indicates whether the list is active or inactive and whether it 
is being autopolled. 
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Status bits 
(f 



2-4 

5 

6 
7 



Meaning 

ON - »EOT= l was specified on the 

INVLIST macro 

OFF - 'EOT^ was not specified on the 

INVLIST macro 

ON - Offsets to the Termname Table 

entries have been sorted 

OFF - Offsets to the Termname Table 

entries have not been sorted 

Reserved 

Indicates whether the list has been 

processed by Checkpoint/Restart 

ON - Active list 

OFF - Inactive list 

ON - List is beinq autopolled 

OFF - Programmed pell is in effect 



The invitation list entries have the same format whether the 
terminals are under control of the Auto Poll facility, the proqraramed 
poll facility, cr otherwise (e.q., contention). The width of each 
entry is indicated in byte 2 of the control word. 

The format of each entry in an invitation list is: 



Invitation 
Characters 


K 



The invitation characters (pollinq characters) are in the 
hexadecimal form cf the transmission code. K is the one-byte index 
field used to indicate the relative position of the entry in the list 
and to find the two-byte pointer to the correspondinq entry in the 
Termname Table. 



TERMNAME TABLE 

The Termname Table contains the names cf all the terminals in the 
system in collatinq sequence. 

The table is qenerated at assembly time from the names of the 
Terminal ^able entries in the TERMINAL macros in the order in which 
they are named. The names of queues for application proqrams, of 
queues for lcqqinq media, and of certain lists of terminals are 
included, in addition to the names of terminals and terminal 
components. See the publication System/360 OS TCAM Prog rammer's 
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Guide, Order No. GC30-2024, for information about specifying the names 
of the terminals, terminal components, etc. 

During the execution of the functions of the INTRO macro expansion 
at MCP initialization time, the names in the Termname Table are sorted 
into collating seguence to permit binary searches for locating 
terminal names and for finding terminal-dependent information. 

The beginning of the Termname Table contains code (the Termname 
Table Code - IEDQTNT) that is used to convert the invitation list 
relative position field to the address of the corresponding entry in 
the Terminal Table. After the code there are two bytes of control 
information for the Einary Search routine. The next fields in the 
Termname Table contain the number of bytes in the name of an entry, 
the address of the middle entry in the table, and the total number of 
entries in the table. Each entry consists of the terminal name and 
the three-byte address of the Terminal Table entry for that terminal. 
The length of the field for the terminal name is determined by the 
longest terminal name; each terminal name field is as long as the 
longest name (the names are padded with blanks on the right, if 
needed) . 

From the address field of a Termname Table entry, TCAM can locate 
the corresponding Terminal Table entry, which consists of blocks of 
information about each terminal. 

"Figure 6 shows the relationship of pointers from an invitation 
list to the Termname Table. The format of the Termname Table is shown 
in the Data Area layouts section of this publication. 

TERMINAL TABLE 

The Terminal Table consists of blocks of device-^dependent information 
about each terminal in the TCAM system; each such block is called a 
terminal entry. There are six types of terminal entries, each of 
which is discussed later in this section. 

The size, structure, and contents of the Terminal Table are based 
on information provided by the user through the TTABLE, OPTION, 
TERMINAL, TLIST, TPROCESS, and LOGTYPE macro instructions. TTABLE is 
specified once and defines the limits of the table. One TERMINAL 
macro is issued to create each single or group entry. OPTION macros 
and data supplied by TERMINAL and TPROCESS operands cause storage to 
be allocated for any option fields to be included in the Option Table 
for a Terminal Table entry. The option fields can contain information 
needed to perform various optional functions provided by TCAM or the 
user. The initial contents of each opticn field are specified by the 
TERMINAL or TPROCESS macro that defines the entry, TLIST defines a 
distribution or cascade entry (defined below) . TPROCESS creates an 
entry for an application program. LOGTYPE creates an entry for 
logging messages. 

Each entry in the Terminal Table begins on a fullword boundary. 
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The formats of the various types of terminal entries, with notes 
concerninq Option Table implications, are included in the Data Area 
Layouts section of this publication. 

There is one terminal entry for each terminal in the system, and 
each Terminal Table entry is referred to via a pointer from the 
Termname Table. Fiqure 7 shows the relationship between the Termname 
Table and the Terminal Table. 




Termname Table 



Code and Control 
Information 


BOSTON 1 


address 




CHIbbbb 


address 




DET b b b b 


address 




NYC b b b b 


address 




RTP b b b b 


address 




WASH b b b 


address 





^iqure 6. Pointers from an Invitation list to the Termname Table 



Sinqle Entry 

^ sinqle ent ry in the Terminal Table defines a sinqle terminal or 
component. A sinqle entry must be defined for each terminal or 
component that can enter only, accept only, or both enter and accept 
messaqes (except for a terminal in a qroup entry, defined below) . If 
a terminal component is to be selected individually, the component 
must have a separate sinqle entry. 

The format of a sinqle entry is the same as the qeneral Terminal 
Table format defined in the Data Area Layouts section of this 
publication. Bits throuqh 2 of byte of the control information 
field are set to binary 000 to indicate a sinqle (or qroup) entry. If 
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there is no option area for an entry, the offset and count fields are 
omitted. The required selection sequence field contains the selection 
characters for the terminal and, if it is a switched terminal, its 
telephone number and the number of dial diqits. 



A sinqle entry in the Terminal Table 
macro. 



is defined by a TERMINAL 



Termname Table 



Code and Control 
Information 



BOSTON 1 



CHIbbbb 



DET b b b b 



NYC b b b b 



RTP b b b b 



WASH b b b 



address 



address 



address 



address 



address 



address 




Terminal Table 



Entry for CHI 



Entry for RTP 



Entry for DET 



Entry for WASH 



Fiqure 7. Pointers from the Termname Table to the Terminal Table 



Group Entry 



A group entry represents a prespecified qroup of termin 
that has special equipment tc permit simultaneous transm 
messaqe to the qroup. A sinqle set of unique addressinq 
used to contact the qroup. Several combinations of 
terminals can be qrouped for this purpose. Each qroup 
terminal name and a correspondinq qroup entry in the Te 
A qroup entry in the Terminal Table has the same format 
entry, except that, since the entry is for output transm 
the input sequence counter field is not used. 



als on a line 
ission of a 
characters is 
prespecified 
has a qroup 
rminal Table, 
as a sinqle 
issions only, 



A qroup entry is defined by a TERMTNAI macro, 

distribution Entry 

A distribution entry contains a list of pointers to sinqle, process, 
or qroup entries. The pointers are qrcuped under the entry name, 
when a messaqe contains a distribution entry name as its destination 
code, TCAM sends the messaqe via separate transmissions to all 
destinations indicated by the list. Each terminal on the list must 
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have a corresponding sinqle or group entry in the Terminal Table, The 
TCAM MCP can only send messages through the distribution list method. 

The format of a distribution entry in the Terminal Table is the 
same as that for a single entry r except that the setting of the status 
bits is binary 010, and the input seguence number field (bytes 4 and 
5) contains a count of the entries in the list. Two-byte pointers to 
the single or group entries that make up the list follow this count 
field. 

For distribution and cascade entries, bytes 1 to 3 contain the 
address of a distribution cr cascade Destination QCB. 

A distribution entry in the Terminal Table is defined by a TLIST 
macro. 

Cascade Entry 

^ cascade- entry is identical in appearance to a distribution entry, 
except for the status byte, but is handled differently. The message 
is gueued for the available terminal that has the fewest messages 
gueued for it in the list. An available terminal is one that is 
currently capable of accepting a message. The terminal must not be 
held. To be available, a dial terminal must not be involved in a time 
delay. If more than one of the available terminals have the same 
number of messages gueued and that number is the fewest number of 
messages gueued, the message is sent to the first of these terminals. 
If the message cannot be sent to any terminal at this time, it is 
gueued for the first terminal in the list. The TCAM MCP can only send 
messages through a cascade list. 

The format of a cascade entry is the same as that for a single 
entry, except that the setting of the status bits is binary 010 and 
the input seguence number field contains a count of the entries in the 
list. Two-byte pointers to the single or group entries that make up 
the list follow this count field. 

A cascade entry in the Terminal Table is defined by a TLIST macro. 

Process Entry 

A Process entry in the Terminal Table represents a gueue of messages 
for an application program. There must be a process entry for each 
gueue to which an application program can issue a GET or HEAD macro 
and at least one for all the PUT or WKITE macros from the same 
application program. The format for a process entry in the Terminal 
Table is the same as that for a single entry, except that the setting 
of the status bits is binary 001. Also, for a GET/BEAD operation, 
bytes 1 to 3 contain the address of the Destination QCB, 

A process entry is defined by a TPHOCESS macro. 
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Loqtype Entry 

A loqtype entry in the Terminal Table represents a queue of messages 
for a loqqinq medium. The settinq of the status bits for a loq entry 
is binary 011 . 

A loqtype entry is defined by a LOGTYPE macro. 

Line Entry 

A line entry in the Terminal Table defines a switched line that is 
used for input operations. A line entry contains the device 
characteristics for stations that call in on a switched line before 
supplying identification and for stations that call in and never 
supply identification data. 

The format of a line entry is the same as for a sinqle or qroup 
entry except that the settinq of the status bits is binary 100. 

A line entry is defined by the UTERM operand on a TERMINAL macro. 



OPTION TAELE 

The user may specify an area to correspond to any entry in the 
Terminal Table for use by the COUNTER, ERRCRMSG, FORWARD, MSGLIMIT, 
INSERT, PATH, REDIRECT, STARTMfl, and ether MB delimiter macro 
instructions issued in a messaqe handler. The fields are generated by 
OPTION macros, which must be issued before the TERMINAL and TPROCESS 
macros that define the Terminal Table. One-byte offsets to these 
fields are placed in the terminal entry beqinninq at the TRMOPT label. 
The routine for the LOCOPT macro uses these offsets to locate the 
option field. 

An OPTION macro defines each field in the Option Table, The macro 
names the option field and defines the type and lenqth of the field. 
The OPTION macro qenerates a CSECT to contain the actual option data 
and another CSECT to contain the field name and characteristics. 

Initial values for the option fields are specified via parameters 
of the TERMINAL or TPROCESS macros. 

Each option field requires one OPTION macro. The order of the 
fields within the Option Table is determined by the order in which the 
OPTION macro instructions are specified. The first option field is 
qenerated on a doubleword boundary. The maximum size of the option 
fields for a qiven terminal is 254 bytes, includinq required boundary 
aliqnment. 

Eor each OPTION specified, space for a cne-byte offset is reserved 
in the offsets field of the Terminal Table entry. When the TERMINAL 
or TFROCESS macro that initializes the fields of the Option Table is 
issued, a two-byte offset is qenerated to the option table for this 
entry. If initial data is supplied, the option field is generated for 
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the terminal cr process entry; if a comma is coded, the option field 
is not generated. If the field is qenerated, its offset is placed in 
the offset field cf the terminal entry; if the field is not qenerated, 
the offset field contains X'FP 1 to indicate that there is no field. 

Each sinqle, qroup, or process entry in the Terminal Table 
contains a one-hyte offset in the offset field for each OPTION macro 
issued. The space needed for the Option Table depends on the number 
of fields initialized by the TERMINAL or TPROCESS macros, and on the 
size of the fields as specified by the OPTION macros. 

All OPTION names are kept in a table with their numeric values. 
^his table enables an cption field named in an Operator Control 
messaqe to be located. 



OPTION CHARACTERISTICS TABLE 

T'he Option Characteristics Table is a variable lenqth table that 
contains one entry for each OPTION macro issued by the MCP. The table 
allows TCAM routines to use the assembled name for an OPTION macro to 
locate the data for a specific terminal in the Option Table. Each 
entry in the Option Characteristics Table contains the lenqth of the 
correspondinq Cption Table entry, the type of option field specified, 
and the user-specified name of the OPTION macro. 

A field in the AVT contains the address of the Option Table, and 
the second word of the Option Table contains the address of the Option 
Characteristics Table. Storaqe is allocated for and the table is 
initialized at assembly time. 



DEVICE CHARACTERISTICS TABLE 

The Device Characteristics Table (DCT) consists of entries that 
describe the characteristics of the terminals in the system. A 
pointer in the AVT and a one-byte index in the Terminal Table entry 
are used to qain access to the entries in the DCT. A sinqle four-byte 
entry is qenerated for all terminals that have identical 
characteristics. 

The DCT is qenerated by the specifications of the TERMINAL macros, 
^iqure 8 shows the relationships amcnq the AVT, the Termname Table, 
the Terminal Table, and the DCT. 



SPECIAL CHARACTERS TABLE 

A special characters table (SCT) consists of entries that contain the 
special characters required for device I/O for a specific line qroup. 
The SCT for a line qroup is located via a three-byte address in the 
DCB for that line qroup. The DCB for the line qroup is located 
thiouqh a pointer in the LCB. 
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Termname Table 



AVT 



Termname Table 



DCT 



Code and Control 
Information 


BOSTON 1 


address 




CHIbbbb 


address 




DET b b b b 


address 




NYC b b b b 


address 




RTP b b b b 


address 




WASH b b b 


address 





Vj 



Terminal Table Entry 



Device 
Characteristics Index 




Device Characteristics Table 



Characteristics List 



Characteristics List 



Characteristics List 



Characteristics List 



Characteristics List 



Fiqure 8. "Relationships amonq the AVT, the Termname Table, the 
Terminal Table, and the DCT 



An SCT is variable in lenqth since the special 
by each terminal type vary. 



characters needed 



The beqinninq of afr SCT consists of 28 one-byte offsets, each of 
which when added to the SCT pointer in the ECB, points to a one^-byte 
lenqth field followed by a special characters entry. There are as 
many entries in an SCT as there are different sets of special 
characters needed. If a function is not defined for the associated 
line qroup, the one-byte offset field contains X'OO'. 

"Piqure 9 provides an example of a special characters table entry. 
"Fiqure 10 describes the relationship amonq an LCE, a DCB, the 
translation Tables, and an SCT. 
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Offset . +28 



1C 20 22 00 32 34 36 00\\00 03 IF IF IF 01 16 OF DF \ \ DF 01 76 01 76 01 40 



Offset to EOT Sequence — 
Offset to EOA Sequence 
Offset to Pad Characters 
Offset to Idle Characters 

Offset to Even ACK 

Offset to Odd ACK 

Offset to NAK 



Functions not defined for this table • 

Count and EOT Sequence 

Count and EOA Sequence 



Count and 15 Pad Characters 



Count and Even ACK Sequence 
Count and Odd ACK Sequence 
Count and NAK Sequence 



"Ficrure 9. Fxample of a Special Characters Table Entry 



TRANSLATION TAEIES 

The Translation Tables consist of entries that qive the transmission 
codes for incominq and cutqoinq messaqes. The Translation Tables are 
found throuqh a three-byte address in the TJCB for the line qroup. 




LCB 



DCB 



f SCT 



f Translation Tabic 




Fiqure 10. 'Relationshir amcnq the LCB , SCT, DCB, and Translation 
Tables 
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PESOURCE CONTROL BLOCK 

Each element in the TCAM system is represented by a resource control 
block (RCB) - An RCB is actually a two-word prefix to an element. The 
first word is a pointer to the QCB that the element is to be 
associated with; the second word is a link field that, when the 
element is on a chain, points to the next item on the chain. Figure 
11 shows the general format of an RCB. 



Offset 



+4 



+1 



Reserved 


QCB Address 


Priority 


Link Address 



QCB address is a pointer to the QCB to which the element has been 
tposted. 

Priority is of the element represented. 

Link address is a pointer to the next element in the chain. 

"figure 11. Resource Control Block 

There are two types of permanent RCEs: 

1 . Buffer ECBs 

2. Communication line RCBs 

Buffers are areas of main storage used to contain message data 
and/or control information. The first 8 bytes of each buffer comprise 
an RCB. As with all TCAM elements, the identity of a buffer depends 
solely upon the queue that its representative RCB is chained to at a 
particular time. The buffer itself is always physically identifiable 
as a fixed numb€r of bytes of main storaqe. If the RCE representinq 
the buffer is chained into a Destination QCE, the buffer is full; that 
is, it contains a messaqe seqment to be transmitted to a destination. 
When the same RCB is subsequently chained into the element chain of 
the Buffer Reguest QCE, the element involved is an available buffer, 
even though there has been no change in the physical storage location 
of the buffer. 

A line control block (LCB) represents communication lines to the 
TCAM WCP. There is an LCB for each line in the system. When a 
subtask has control of an LCB, it has control of the line; therefore, 
the LCB itself is treated as the resource element. The RCB is 
contained within the first two words of the LCB. 
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There are two special types of tfCBs: 

1 . Queue control block T^CEs 

2. Element request block B.CBs 

When a Queue control block (QCE) appears on the ready queue, it 
may represent a special case in which the QCB is tposted to itself. 
The QCB is actinq as a special element rather than as a system 
resource, in that the first subtask on the STCB chain of the QCB qains 
control without an element to process. The subtask must be self- 
contained and able to locate any data it needs for execution. If 
there are no elements to process, the QCB has qained the system 
resource, time. 



An element request block (ERB) on the ready queue can act 
request for a resource or as an actual element itself. 



as 



SUBTASK CCNTRCI F10CK 

Subtask control blocks (STCBs) represent the modules that perform the 
work of the TCAM system. The purpose of an STCB is to cause a module 
to be executed. The format cf a full STCB is shown in Fiqure 12. 



Offset 


+4 



+1 



Activation 
Key 




Priority 


Link Address 



Fiqure 12. Format of a Full STCB 



When the TCAM Dis 
element on the top of th 
points to the hiqhest-pr 
TCAM Dispatcher uses t 
type of STCB present. T 
the subtask varies accor 
available, the TCAM D 
details concerninq the a 
under System Control 
publication. 

The four types of ST 
Dispatcher in the Method 



patcher examines the QCB associat 
e ready queue, the third word o 
iority STCB on the STCB chain of th 
he activation key of the STCB to de 
he way of determininq the actual 
dinq to the type of STCB. When the 
ispatcher exits tc the routine it 
ctual dispatchinq of a routine are 
in the Method cf Operation sect 



ed with the 
f the QCB 
e QCB. The 
termine the 
address of 
address is 
self. More 
presented, 
ion of this 



CBs are discussed under Functions of the TCAM 
of Operation section of this publication. 
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QUEUE CONTFOI EIOCK 

A queue control block (QCB) is used to requlate the sequential use of 
elements amonq requestinq tasks. Every queue, or item, that is 
waitinq for service in the system is associated with a QCB, Fiqure 13 
aives the qeneral format of a QCB. 



Offset +1 

o 

+4 
+8 

Fiqure 13. General Format of a QCB 



Key 


Element Chain Pointer 


Priority 


Link Address 




STCB Chain Pointer 



A QCB has three primary fields: a pointer to the element chain, 
a link address, and a pointer to the STCB chain. The element chain 
consists of any elements, other than the requestinq resource on the 
readv queue, that the suttask represented by the STCB chain miqht need 
to process. If this is the Buffer Request QCB, the element chain 
consists of buffers (actually the buffer unit pool). The link field 
is used to point to another item when a QCB is on a hiqher queue. For 
example, if a QCB is on the ready queue, the link field points to the 
next item on the ready queue. The STCB chain consists of pointers to 
the routines that are associated with the QCB. 

^or each attached task (Operator Control, On-Line Test, 
Checkpoint, and FE Common Write) there is a special QCB that has an 
ECB in the second word. The TCAM Dispatcher posts the ECE when the 
attached task is to vie for control of the system. An element that is 

to be passed to the attached task is chained into the QCB element 
chain. 



There is a detailed list 
Appendix B. 



of the QCEs in the TCAM system in 



LINE CONTFOI E1CCK 

There is one line control block (LCB) fcr each line in the TCAM 
system. An LCB contains all the information pertaininq to the status 
of the communications line that it represents. The format of an LCB 
is qiven in the Data Area Layouts section of this publication. 



STATION CCNTFCI ELOCK 

There is at least one station control block (SCB) associated with each 
LCB in the TCAM system. With buffered terminals there is one SCB per 
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terminal on a line. A buffered terminal sends a block or a part of an 
entire transmission at a time. While that terminal is preparing to 
send a subseauent block, TCAM examines the SCBs and sends to and 
receives from ether terminals on the same line. TCAW uses the SCB for 
a terminal tc keep track of one transmission from that buffered 
terminal on the line. 

If the terminals on a line are not buffered, one terminal at a 

time completes its transmission. There is no need to keep track of 

many transmissions in parallel, thus one SCB is sufficient for the 
entire line. 



CHANNEL PROGRAM BLOCK 



A channel proqram block (CPB) 
contains a pointer to the 
CPBs are used to read to or w 
disk queuinq is utilized, the 
routine called by the INTRO 
number of CPBs to be built to 
CPB=inteqer operand of the IN 
storaqe and is allocated a w 
(includinq the 12^byte unit c 



contains a disk I/O channel 
buffer to be processed. In 
rite from the destination 
pool of CPBs is created by 
macro expansion. The user 
handle the messaqe queues b 
TRO macro. Each CPB is bu 
ork area equal in size to on 
cntrol area) . 



proqram 


that 


disk queuinq, 


queues. 


If 


a nonresident 


specifies the 


uffers in the 


ilt in 


main 


e buffer 


unit 



ELEMENT REQUEST ELOCK 



request buffers for a 
An ERE is tposted to the 



TCAM uses an element request block (ERB) tc 

line. TheTe is one EBB in each LCB. 

appropriate OCB to obtain filled buffers for a send operation or empty 

buffers for a receive operation. The format of an EBB is shown in 

"Piqure 14. 



Offset 


+4 
+8 
+12 



+1 



Key 


QCB Pointer 


Priority 


Link Address 


Status 


Chain Pointer 


Count 1 


Count 2 





Fiqure 1U. Format of an EBB 



Introduction 53 



The OCB pointer refers to the queue control block to which the ERB 
is tposted. The link address points to the next element on the queue 
that contains the ERB. The status field indicates the status of the 
ERE (for example, tposted for a buffer, available, etc.)* The chain 
field contains a pointer to the first buffer in a chain of buffers to 
be used in the operation. Tf the buffer unit pool is empty (all 
buffer units are in use) , the ERB is placed in a chain of ERBs waitinq 
for buffers and remains there until a buffer is returned and assiqned 
to it. The two count fields indicate the number of buffers requested 
for an operation. Two fields are needed because a disabled routine 
may need to increment the count and an enabled routine to decrement 
the count. 



PROCESS CONTRCI E10CK 

A process control block (PCB) is a control area in an MCP that 
provides an interface between the MCP and an application proqram. The 
PCB contains information needed for communication between the two 
proqrams. 

A PCB macro instruction in the MCP defines a PCB. There must be 
one PCB, hence one PCB macro, for each active application proqram to 
be used with the MCP. 



OPERATOR CCNTROL ADDRESS VICTOR TAELE 

The Operator Control Address Vector Table is a constant area assembled 
at the beqinninq cf the Resident Operator Control module. This table 
is used by the Resident Operator Control module, by the operator 
control processinq modules, and by the checkpoint/restart modules. 



SELECTED OPTIONS 



TCAM has certain optional features available. These features are 
optional in one of three possible ways: 

1. Some of the functions of the feature are optional. 

2. The presence or absence of the feature itself is optional. 

3. The feature may be either resident or transient. 

The f ollowinq sections discuss each of the optional featues of 

TCAM. 
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OPERATOR CCNTBCI 

T'he TCAM Operator Control facility provides a way for the user to 
dynamically examine or alter the status of his telecommunications 
network. A detailed description cf the functions of this facility is 
included in the Operator Ccntrol Facility section of the System/360 OS 
1£M Programmer's Guide , Order No. GC30-202M. 

The TCAM user specifies at SYSGEN time whether he wants the 
Operator Control facility in his system to be supported by resident or 
transient routines. The ccntrcl module of the Operator Control 
facility is always resident. If the user indicates that he wants the 
operator control support routines to be transient, these routines are 
called in whenever they are needed. If the routines are specified to 
be resident, they are all present in the system at all times. 



APPLICATION PROGRAM PROCESSING 

The application proqram services of TCAM enable a proqrammer to 
process messaqes from a telecommunications network with the same macro 
instructions that he uses for local input/output devices. Because the 
TCAM MCP performs the I/O operations, a completely device-independent 
application proqram can be written. The proqrammer need not be 
concerned with the time and device-dependent aspects of the 
telecommunications environment. 

A TCAM MCP can operate in the System/360 without an application 
proqram or proqrams. However, if the user wishes to examine and 
process the data cominq in from his terminals to a qreater extent than 
is allowed by the macro instructions of the MCP, he must use one or 
more application proqrams. The macros specific to application 
proqrams are discussed in detail in the System/360 OS TCAM 
Programmer's Guide, Order No. GC30-2024. 



LINE QUEUING OPTIONS 

The TCAM user has the option of queuinq either by line or by terminal, 
as specified in the TERMINAL macro for each terminal or qroup of 
terminals. The only exceptions are in the cases of buffered terminals 
and of dial lines, where queuinq by terminal is required. Since 
queuinq by terminal requires one Destination QCB per terminal rather 
than one per line qroup, this method requires more main storaqe space. 
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MESSAGE QUEUING OPTIONS 

There are three types of queuinq f cr messages: 

• Main storaqe queuinq 

• Reusable disk queuinq 

• Nonreusable disk queuinq 

The messaqe queues may be maintained by any one of the three 
methods or by a combination of main storaqe queuinq with backup on 
either reusable cr nonreusable disk. 

In an MCP there are at most two messaqe queues data sets: 
reusable disk with or without main storaqe queues, and nonreusable 
disk with or without main storaqe queues. The user specifies the type 
o* queuinq for a qiven data set by codinq specified keyword operands 
of the macros that build the Terminal Table. The way in which the 
types of queuinq are specified is discussed in detail in the 
System/ 3 60 OS TCAM Programmer's- Guide . Order No. GC30-2024. The way 
that the various queuincr types function is discussed under Queue 
Manaaement in the Method of Operation section of this publication. 



LOGGING 

The loqqinq option allows the user to maintain a record of incominq or 
outqcinq messaqe traffic en a sequential medium. Messaqe seqments or 
full messaqes, as determined by the placement of LOG macros in an MH, 
are placed on an output device. The various types of logs, and the 
correspondinq MH subcrroups in which a LOG macro appears, are: 

1. Incominq header seqments only (Inheader) 

2. All incominq seqments (Intuffer) 

3. Complete incominq messaqes (Inmessage) 

4. Outgoing header segments only (Outheader) 

5. All outgoing segments (Outbuffer) 

6. Complete outgoing messages (Outmessage) 

When segments of messages are logged separately, they are logged 
in the seguence in which they are handled by the message handlers. 
Segments of different multi-segment messages handled about the same 
time are likely to be intermixed on the logging medium. When the 
first segment cf a message is logged, the TCAM header prefix (except 
the first twelve bytes) and the segment itself are recorded in that 
order on the logging device, ^ach subseguent message segment logged 
is preceded by all except the first twelve bytes of the TCAM 
subsequent-buffer prefix for that seqment. 
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CHECKPOINT/RESTART 

Checkpoint/Restart is provided as an optional facility for the TCAM 
MCP at user-specified intervals (every 30 seconds to 65,535 seconds) . 
By usinq the TCAM Checkpoint/Restart facility fcr the MCP and other 
TCAM facilities, such as sequence numbers, an effective restart can be 
accomplished in an application proqram. 

The checkpoint routines store tables and other control information 
necessary for a restart subsequent to a system failure or normal 
closedown. Restart of the TCAM iob after a system failure is 
accomplished by initial proqram loadinq (IPL) the system aqain, and 
loadinq the TCAM MCP. TCAM reinitializes the tables and pointers from 
the latest checkpoint record on the disk, unless "CY" is specified on 
the STARTUP parameter of the INTRO macro to suppress continuation 
start-up. After a system failure, the STARTUP=c or STARTUP=W operand 
on the tutpo macro causes TCAM tc perform a continuation restart with 
a scan of the messaqe queues. If STAFTUP=WY is specified, a 
continuation restart with no messaqe queues scan is performed. 

After a normal closedown, TCAM can either reconstruct the 
environment that existed before closedown (a warm restart) or it can 
reinitialize the system (a cold restart) . A warm restart is specified 
by STARTUPS on INTRO; a cold restart is specified by STARTUP=C. 

To include the Checkpoint/Restart facility in an MCP, the user has 
only to specify an OPEN for the checkpoint data set. As a result of 
this, the Checkpoint Executor is attached in the same reqion as the 
MCP. The other checkpoint modules can be either resident or 
transient, dependent on what the user specifies at SYSGEN time. 



TCAM AS A S^ARTAEIE PROCEDURE 

^he user has the option of startinq a TCAK ECP or application proqram 
either via JCI in the system input device or via the START operator 
command at the system console. If the START command is to be used, 
the JCL for the MCP and the different TCAM problem proqrams must be 
cataloqed on SYS1 .PROCLTE under individual procedure names. The user 
may then type START and the "procname" for the proqram he wants, and 
iob manaqement immediately fetches the JCI at "procname" and 
subsequently starts the proqram. 



ERROR RECOVERY PRCCEDURES 

T'he Error Recovery Procedure (ERP) routines are desiqned to diaqnose 
and recover, if possible, from line errors occurrinq durinq a 
telecommunications operation. The error routines provide the 
followinq basic functions: 

• Automatic retry of all errors not involvinq data transfer. Data 
transfer is handled by the EOE/ETB Handlinq subtask. 
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• Automatic retry of text errors during a receive operation when the 
data is still available; that is, the PCI Appendage has not 
tposted the buffers containing the data following the last good 

EOE/ETE. 

• Statistical recording of all terminal errors. 

• ^rror messages to the primary TCAM operator console for all 
permanent errors. 

^he EPP routines are optional in that they may be either resident 
or transient. The user specifies this option at SYSGEN time. 



SUETASK TRACE 

^he Subtask Trace facility maintains a time-seguential table of the 
dispatching activity of the TCAM Dispatcher. Each time the Dispatcher 
activates a subtask, it completes an entry in the Subtask Trace Table. 

The presence of the Subtask Trace facility in the TCAM system is 
determined by the DTRACE operand of the INTRO macro in the MCP. If 
the operand is coded DTRACE=0, the facility is not included. If the 
operand is coded with a numerical value, that value determines the 
number of four-word entries reserved for the Subtask Trace Table. 



CROSS REFERENCE TABIF 

The TCAM Cross Reference Table is formatted if the CROSSRE=integer 
operand of the INTPO macro is assembled with a nonzero value. The 
numerical value of integer determines the number of four-word entries 
reserved for this table. Each time that a line is successfully 
opened, the line Group Open routine (TGGC1940) completes an entry in 
the table. 



TCAM IN A MULTIIRCCESSING ENVIRONMENT 

^CAM operating in a multiprocessing environment increases throughput, 
availability, and flexibility. All TCAM appendages and SVC 102 cause 
the TCAM task to become not eligible to be dispatched in order to 
prevent TCAM disabled code from modifying TCAM control blocks while 
enabled TCAM cede is executing. These modules set a flag in the TCAM 
TCB to indicate that the task is not eligible to be dispatched and 
then call the CS Task Removal routine. When the Task Removal routine 
issues an external interrupt to the other CPU, the other CPU loops on 
the supervisor lock. When the TCAM module completes its functions, it 
resets the TCE flag and zeros the supervisor lock before exiting. The 
other CPU then obtains the lock and dispatches the task of the highest 
priority on its ready gueue. 
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To prevent two enabled tasks from attemptinq to enqueue/dequeue on 
the same resource at the same time, each task issues a test-and-set 
instruction on a specific byte in the QCE before referrinq to the 
queue. The byte must be equal to zero before the task can update the 
queue, and the task must reset the byte tc zero after completinq the 
update. 



TTWE SHAPING OPTION 

TCAM provides terminal support for the Time Sharinq Option (TSO) under 
MVT when this cpticn is requested on the INTRO macro. There are 
special macros to qenerate an MCP with MH routines to handle TSO 
messaqes. TCAM also supports application proqrams that are run under 
TSO in the foreqround reqion. If the TSO option is specified, TCAM 
provides a conversational approach to terminal support - this includes 
support of the transmit and receive interrupt features, modifications 
to the schedulinq of I/O operations, and editinq of the data in TSO 
messaqes to make the data compatible with disk or tape. 

TCAM and the TSO control proqram run in different partitions. 
Smaller buffer prefixes and a modified message flow allow TCAM to 
route the messaqes to the TSO reqicn. 

TCAM support for TSO also includes the ability to use 1050s and 
2741s on the same dial line, the ability to simulate receive 
interrupts when they are not a feature of the hardware, and the 
ability to have the transmission code dynamically determined. 



MODULE ATTRIBUTES 

^CAM modules are desiqned to possess certain defined attributes 
concerninq structure, content, and loqical format. These attributes 
determine how a module is to be loaded, what it contains, if it is 
executable, whether it is executable more than once without reloadinq, 
and if it can be executed by concurrent tasks. 

The attributes are included in the description of each module in 
the Proqram Crqanization section of this publication. The attributes 
applicable to TCAM modules are: 



• 



Reentrant . A reentrant module can be executed by more than one 
task concurrently and cannot be modified by itself or by any other 
module durinq execution; that is, a task may beqin executinq a 
reentrant module before the previous task has finished executinq 

it. 

Refreshable. A refreshable module cannot be modified by itself or 
by any other module durinq execution; that is, a refreshable 
module can be replaced by a new copy durinq execution by a 
recovery manaqement routine without chanainq either the sequence 
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or the results of processing. (See IBM System/360 OS Concepts and 
fa cil ities. Order No. GC28-6536, for an explanation cf recovery 
management routines.) 

Serially Reusable. A serially reusable module can be executed by 
only one task at a time. The module either initializes itself 
and/or it restores any instructions or any data in the module that 
was altered during its execution. 

Enabled. An enabled module can be interrupted at any time by an 
appendaqe cr external event. When the interruption occurs, the 
enabled module waits for the appendage to complete its processing 
and then continues as though the interruption had never occurred. 
The interruption has no effect on the execution of the enabled 
module. 



njsabled. A disabled module cannot 
execution. It must execute from 
gained control. 



be interrupted during its 
beginning to end once it has 



Resident. A resident module resides in main storage of 
system at all times. 



the TCAM 



Transient* A transient module is a nonresident module that 
resides in a system library en some type of storage device until 
it is called into the TCAM system for a limited length of time 
during the execution of a problem program. 

problem Program Mode. A module that operates in problem program 
mode is operating under control of the message control or appli- 
cation program, rather than under the control of the OS 
supervisor. 

Supervisor Mode* A module that is operating in supervisor mode is 
operating under the control of the system supervisor. 
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SECTION ?: METEOR OF OPERATION 



This section contains an introduction to th€ loqic of TCAM. The flow 
of messages and control information throuqh the buffers and tables and 
the detailed functional descriptions of the modules are emphasized. 

LOGIC OF TCAM 

TCAM can be functionally divided into four maior phases: 

• Disk messaqe queue initialization 

• Initialization of an MCP 

• Messaqe handlinq in an MCP 

• Closedown of an MCP 

In addition to the four phases listed above, there are other 
phases that are functionally independent, yet necessary to complete a 
discussion of the loqic of TCAM: 

System control 

Application proqram processinq 

Operator control processinq 

Checkpoint processinq 

Error recovery procedures 

Time Sharinq Cption interface 

This section of the TCAM PLM presents the above phases of the 
proqram in the order as they would loqically occur in a TCAM system. 
Since the application proqram, Operator Control, Checkpoint, error 
recovery, and Time Sharinq phases have no clear place in this time- 
frame orqanization, they are presented as separate discussions at the 
end of the section. 

The foldcut operation diaqrams associated vith this section 
illustrate the functional operation of TCAM. The foldout diaqrams are 
located after Appendix D and are accompanied by a description in the 
text of this section. 
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THE DISK MESSAGE QUEUE INITIALIZED 

The Disk Messaqe Queue Initializer is a utility routine that is used 
to pre-format the data sets for the disk messaqe queues for a TCAM 
MCP. This routine is run before executinq the TCAM MCP iob, 

A TCAM MCP can use either reusable cr nonreusable disk messaqe 

queues data sets, or both. If both are used r each one must reside on 

a separate data set. The Disk Messaqe Queue Initializer must be 

executed for each data set. 

The variables used tc define the disk data set are. entered as Job 
Control Lanquaqe (JCL) parameters. In the JCL the user defines the 
size of each extent, the number of extents, the volumes to contain the 
data set, the type of disk used, and the size of each fixed-lenqth 
record. In this data set there is one extent per volume, and all the 
records on a volume must be contiqucus. There is no difference in the 
creation of a reusable or nonreusable data set. 

The data set formatted by the Disk Messaqe Queue Initializer is 
fixed lenqth and physically sequential. Each record has a key and 
data field initialized to zero. The size of the data field is fixed 
at six bytes; the size cf the key field is specified by the user in 
the "KEYLEN=mm ,, parameter of the IEDQDATA icb control statement. The 
key field must he less than or equal to 255 bytes, but qreater than or 
equal to 33 bytes (three plus the size of the prefix of the first 
buffer) . At the end of writinq each extent cf records, the Disk 
Messaqe Queue Initializer lists on the system console typewriter a 
statement that contains the total record count from the beqinninq of 
the data set throuqh the volume iust completed. If an error condition 
is encountered in writinq the records, the initializer sends an error 
messaqe to the system console and then terminates. 



INITIALIZATION CE A MESSAGE C0NT30I P30GBAM 

Upon receivinq control from System/360 OS Job Manaqement, the TCAM MCP 
performs certain initialization functions in preparation for 
subseauent processinq. The initial processinq operations include: 

• Allowinq the user to alter the contents of certain AVT data fields 
that were initialized and formatted at assembly time. 

Tnitializinq and allocatinq stcraqe for buffers, tables, control 
blocks, and work areas. 

Sortinq the Termname Table. 

Openinq data sets, initializinq LCBs, and modifyinq DCBs. 

Preparinq the communications lines for transmission. 

Attachinq any required tasks in the TCAM partition. 
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The INTRO, OPEN, and READY macro expansion instructions in the MCP 
initiate the initialization functions cf TCAM. Foldout Charts 1 
through 5 show the flow of control durinq the initialization of an 



FUNCTIONS OF INTRO 

The INTRO macro is the first instruction ceded by the user in a TCAM 
MCP. When OS Job Manaqement is alerted to the presence of a TCAM MCP 
in the system, the INTRO macro expansion, as a subroutine of -job 
manaqement, is called to execute its specific initialization 
functions. Foldout Chart 1 presents a summary of these functions. 



FUNCTIONS OF THE OPEN ROUTINES 

After the initialization functions of the INTRO macro expansion have 
been completed, the functions of any OS or TCAM macros can be 
executed. However, in an MCP, the user must open various data sets 
before he can beqin processinq any data. He must open these data sets 
in a certain order: first, the messaqe queues data sets (optional) , 
then the checkpoint data set (optional), and then the data sets for 
the line qroups . 

Foldout Charts 2 throuqh 5 illustrate the flow cf control durinq 
the openinq of each of these data sets, respectively. 

The followinq qeneral points apply to each of the figures: 

1. When an OPEN macro is issued in an MCP, the OS Cpen routine qains 
control. It, in turn, issues an XCTI command to brinq in the 
first load of the appropriate open module. The first routine, 
upon completion of its functions, issues an XCTL to the 
appropriate subsequent routine. 

2. When any qiven routine is to load a module, it activates OS, which 
checks the OS Contents Directory to determine whether that module 
has already been loaded. If there is an entry for the module in 
the directory, OS adds one to the directory usaqe count. If there 
is no entry in the directory, OS makes a two-byte entry in the 
directory, adds one to the usaqe count, and loads the module. 

3. If the user issues an OPEN macio for multiple messaqe queues or 
line qroup data sets, each individual routine performs its 
functions for each data set before issuinq an XCTL to the next 
routine. However, if there is a separate OPEN for each data set, 
each routine is loaded individually for each data set. 
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PREPARATION OF COMMUNICATIONS LINES FOR TRANSMISSION 

The initial channel programs to enable the lines in the TCAM network 

are built by the Line Group Open routines. The content of each 

channel program depends on the type of control unit used with the 
devices on the line. 

Control Unit Line Channel Program 

2^02 Leased DISABLE, SAD, ENABLE 

2702 Dial DISABLE, SAD 

2701 or 2703 Leased BSC DISABLE, SETMODE, ENABLE 

2701 or 2703 Dial ESC DISABLE, SETMODE 

2701 or 2703 Dial DISABLE 

2701 with IBM Type III Adapter DISABLE 

2701 or 2703 leased DISABLE, ENABLE 

7770 Dial NOP 

28U8 Leased NOP 



FUNCTIONS OF BEADY 

The PEADY macro instruction must . be the last instruction in the 
initialization section of an MCP. After the functions of FEADY have 
been executed, the system is ready to handle message traffic. The 
expansion of this macro ends with an instruction to branch to the 
routine (the TCAM Dispatcher) in the MCP where arrival of the first 
element on the ready gueue is awaited. When the first message enters 
the system, control is transferred to the MH section of the MCP. 

When the user codes a FEADY macro in his MCP, he has the option of 
specifying the addresses of routines tc handle "Good Morning" and 
"Restart in ^regress" messages. The assembly of the FEADY macro 
places these addresses in the AVT . 

Foldout Chart 5 presents a functional flow for the FEADY macro 
expansion and routine. 



SYSTEM CONTFOL 

^wo primary routines maintain control among the parts of TCAM: 

• The TCAM Dispatcher 

• The AQCTL SVC 102 routine 

FUNCTIONS OF THE TCAM DISPATCHEF 

The TCAM Dispatcher is the ccntrol module of the TCAM system. The 
primary purpose of this module is to allocate and schedule system 
resources. The section on the TCAM Dispatcher in the Introduction to 
this publication contains a discussion of the tools and mechanisms 
used by the Dispatcher to perform its functions. 
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Each queue in the TCAM system is represented ty a queue control 
block (OCB) , which is the connectinq link between elements and the 
subtasks waitinq for the elements. A QCB consists of a pointer to a 
chain of elements and a pointer to a chain of STCBs. Elements and 
STCBs are inserted in their respective chains on the QCB in priority- 
FIFO order, that is, first-in-first-out within priority class. 

A subtask control block (STCB) represents each waitinq subtask to 
the Dispatcher. An STCP contains the data necessary to activate the 
subtask it represents. A full STCB consists of a subtask entry code 
or activation key (MCPL) , a priority field, and a link field for STCE 
chaininq. (There is a complete discussion of the four formats of 
STCBs later in this section.) 



A resource control block (RCB) 
Dispatcher. An FCB contains three 
which the element is or is to be tp 
field to be used for element chaini 
queue, they are maintained in 
Dispatcher activates a subtask for 
queue. The BCB for the element 
subtask is represented by the hiqhe 
of the QCB. 



represents each element to the 
fields: the address of the QCB to 
osted, a priority field, and a link 
nq. When elements are on the ready 
priority-FIFO order. The TCAM 
the element on the top of the ready 
points to a QCB, and the activated 
st priority STCB on the STCB chain 



Fiqure 15 illustrates the chain of linkaqe from the ready queue to 
a subtask when an element is on the ready queue. 
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- lqure 15. Linkage from the Peady Queue to Subtask Code 
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Fiqure 16. Pointers durinq a Ready Queue Update 



After the ready queue has been updated, the TCAM Dispatcher 
examines the element pointed to by reqister 1. There are three 
situations that can exist: 

• If the eleirent points to a QCB that has an STCE with a MCPL field 
of zero, the element indicates to the Dispatcher that there are no 
real elements currently tposted to the ready queue. This is a 
"dummy" element that causes the Dispatcher to issue a system WAIT 
command. The activity of the Dispatcher resumes when an I/O 
routine or an application proqram tposts an element tc the ready 
aueue and causes an interruption in the operatinq system. 
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If the element is tposted to a OCB that represents an attached 
TCAM task (Operator Control, Checkpoint, On-line Test, or PE 
Common Write) ,. the MCPL field of the STCB is equal to X , 02 l . This 
causes the Dispatcher to link the element to the element chain of 
the QCB and to post complete the event control block (ECB, the 
second word of the QCB) of the attached task. This allows the 
attached task the opportunity to vie for control of the system 
when TCAM issues a system WAIT command. 

If neither of the above situations exists, the Dispatcher computes 
the entry point for the hiqhest priority subtask represented on 
the STCB chain of the QCB referred to by the PCB of the element. 
The dispatcher then branches to that subtask. 



The TCAM Dispatcher calculates th 
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"^iqure 17 shows the linkaqe from reqister 1 to the hiqhest 
priority STCB when the Dispatcher is examininq an element. 
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^iqure 17. Linkaqe from Reqister 1 when a Subtask Gains Control 
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Note: Tf a subtask is activated without an element to process, its 
STCB is tposted to the ready queue, as if it was an RCE, with the MCP1 
field containing the correct entry code for the subtask and the next 
three bytes containing the address of AVTEFADY-8. 

There are four possible formats for STCBs. The way the subtask 
entry point is calculated depends en the type cf STCB, and the MCPL 
field indicates the type. Each type of STCB has a different length. 

A two-byte STCB is used when its QCB is located in the AVT or 
elsewhere in irain storage, the STCB is the enly one that ever appears 
in the STCB chain of the OCB, and the STCB is never placed in the STCB 
chain of any other OCB. The Dispatcher examines the QCE to find the 
STCB pointer. The MCPL field of the STCB contains the value X'04', 
and the Dispatcher adds 2 bytes to the address of the STCB to find the 
subtask entry point. The second byte of the STCB is unused. The 
format of a two-byte STCE is shown in "Figure 18. 

A four-byte STCB has an MCPL value of X'06 1 and is used when it is 
convenient to have the OCB as a part of the subtask code. The QCB and 
STCB are combined by making the STCB the third word of the OCB. The 
STCB must be the only one for this OCB, and the STCB must never be 
transferred to the STCB chain of another QCB. The Dispatcher 
calculates the subtask entry point by adding four bytes to the STCE 
address. The format of a four-byte STCB is shewn in "Figure 18. 

A six-byte STCB has an MCPL value cf X'OS' and is used when an 
STCB always appears as the last STCB in the STCB chain of a OCB. In 
this situation, the priority field, but not the link field, is needed. 
The Dispatcher calculates the subtask entry point by adding six bytes 
to the STCB address. The format cf a six-byte STCE is shewn in Figure 
18. 

An eight-byte STCB is used when an STCE can appear in any position 
in the STCB chain of a QCB. When the MCPL field is X»0A«, the 
Dispatcher calculates the subtask entry point by adding eight bytes to 
the STC* address. Tf the MCPL value is greater than X'OA', the STCB 
is for one of the TCAM schedulers, for each of which the Dispatcher 
uses the MCPL field as an offset into the AVTDTSP table of addresses. 
The format of an eight-byte STCB, which is a full STCB, is shown in 
Figure 18. 

Foldout Chart 6 presents a summary of the dispatching functions of 
the TCAM Dispatcher. 

The TCAM Dispatcher also functions as a queue manager. The 
Dispatcher performs gueue management functions when a subtask branches 
to a particular entry point in an entry point table in the Dispatcher. 
The function performed by the Dispatcher depends on which label a 
subtask branches tc. 

Fntry point labels that 1o not end in "H" result in loss of 

control by the branching subtask. Fntry point labels that end in "It" 

result in an immediate return of centre! to the branching subtask 
after the gueue management function has been performed. 
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Format: 



Two-byte STCB 
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06 
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r point -^ 





Attributes: 

• QCB located in the AVT or assembled in main storage 

• QCB has only one STCB 

• STCB is never chained to any other QCB 

• QCB is part of the subtask code 

• QCB and STCB are combined - the STCB is the third word of the QCB 

• QCB has only one STCB 

• STCB is never chained to any other QCB 

• STCB is always the last STCB in the STCB chain of a QCB 



STCB can appear in any position-of the STCB chain of a QCB 



^iqure 18. Formats for different Types of STCBs 



The aueue manaqement functions cf the various entry point labels 
are described in foldout Chart 7, 

There are actually two TCAM Dispatchers available for a TCAM MCP. 
They are the same except that IGG019EO performs the additional 
function of buildina a Subtask Trace Table. If the DTFACE keyword of 
the INTFO macro is coded with a nonzero numerical value, the IGG019RO 
TCAM Dispatcher is loaded into the MCP. Otherwise, the IGG019RB TCAM 
Dispatcher is used. 



FUNCTIONS OF THF. AQCTL SVC 102 FOUTINE 

The AOCTL SVC 102 routine is a multipurpose system service routine 
that performs the followinq functions: 

• Cross-partition data movement between the MCP and application 
proqrams. 
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• Posting FCBs for attached tasks and application proqrams. 

• Tpostinq elements frcm attached tasks and application proqrams to 
the disabled ready queue in the MCP. 

• Flaqqinq the Task Control Block (TCB) that represents a Time 
Sharinq Option (TSO) application prcqram as either available or 
not available for swap. 



• 



Flaqqinq the TCE that represents an application proqram as either 
eliqible or net eliqible for rcllcut. 



The AQCTL SVC 102 routine is a Type I SVC resident in the 
Operatinq System nucleus. It qains control when an SVC 102 call is 
issued from any task in the system. 

itfhen the AQCTL SVC 102 routine is called by a routine anywhere in 
the system, reqister 1 must point to a variable lenqth standard 
parameter list. The AQCTL SVC 102 routine examines the first byte 
(byte 0) of this list to determine which of the possible functions is 
to be performed. The contents of the parameter list vary accordinq to 
the action code settinq in byte 0. 

Tf more than one bit in the action code byte is turned on, the 
AQCTL SVC 102 routine performs the actions specified for each bit. 
The combinations of bits used, however, must be compatible so that the 
parameter list satisfies all the requirements. 

when the AQCTL SVC 102 routine relinquishes control, it stores a 
return code in reqister 15. For a successful operation, the return 
code is binary zero. If the SVC is issued when there is net an active 
1CP in the system, the requested action is not performed and the 
return code is binary four. 

The followinq paraqraphs discuss the method used by callinq 
routines to effect the functions of the AQCTL SVC 102 routine. 

Cross-partition Data Movement : When a routine needs to move data 
across a partition boundary, it turns on action code bit 4 in byte 
of the parameter list beinq built for the AQCTL SVC 102 routine. 

To effect cross- partition data movement, the callinq routine 
provides a three-word parameter list. The first word contains the 
address of the data to be moved. The second word contains the address 
of the place the data is to be moved to (the tarqet field), and the 
third word points to a halfword that contains the lenqth in bytes of 
the data field. Fiqure 19 defines this particular parameter list 
format. 

The AQCTL SVC 102 routine, upon findinq bit 4 of byte set to 1, 
moves the data to the specified location. 
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Offset 


+4 

+8 



+1 



Action code 


ECB address 


X'OO' 


TSO Job Identifier address 


X'80' 


TCB address 



Eiqure 19. Format of a Cross-Partition Data Movement Parameter List 



Post an ECB of a Different Task: When a routine needs to issue an OS 



POST on the ECB of another task, either bit 1 or bit 2 of the action 
code byte is set to 1. Bit 1 is turned on if the ECB of a task that 
is eligible fcr rollout (EOBI) is to be posted complete; bit 2 is 
turned on if the ECB of a standard (ECB always in main storage) or 
^ime Sharinq Cation (TSC) task is to be posted complete. 

Dependinq en the type of ECB to be posted, the parameter list 
built for the AQCTL SVC 102 routine is either two or three words lonq. 
The parameter list for a standard or TSO task is two words lonq; the 
parameter list fcr a EOEI task is three words lonq. The formats of 
these two parameter lists are shown in Eiquie 20. 



TSO or Standard Task: 
Offset 



+4 



+l 



X'20' 


ECB address 


X'80' 


TSO Job Identifier address 



Rollout/Roll in Task: 
Offset 


+4 
+8 



+l 



X'40' 


ECB address 


X'OO' 


TCB address 


X'80' 


DEB address 



v iqure 20. Ecrmats of an ECB Post Parameter List 
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To effect an HCB post, the AQCTL SVC 102 routine interfaces with 
the OS Post routine (IEAQSY50) at a special entry point (IEAOPT01) 
that performs no validity checking. The address of this entry point 
is in the CVT. The AQCTL SVC 102 routine supplies input to the OS 
t>ost routine in the following general registers: 



• 



Register 15 - the address of the branch entry, IEA0PT01. 

• Register 14 - the return address. 

• Register 13— in the low-order 16 bits, the TSC Jcb Identifier for 
the ECB to be posted (for standard FCBs, this field is binary 
zeros) . 

• Register 11 - the ECB address, with the lew-order bit set to one. 

• Register 10 - the completion code (always zero). 

If the task to be posted is currently relied out, tne AQCTL SVC 
102 routine sets a bit in the TCB (TCEFLTFN) to designate to the 
Follout/Pollin routine at rollin time that there is a POST pending for 
this task . 

If the ECE to be posted is for a TSO task, the AQCTL SVC 102 
routine branches to the Time Sharing Interface program in the nucleus 
task to be flagged either eligible or not eligible for swap. The 
interface is accomplished via the TSEVENT macro. 

Tpost An Element to the Disabled Peady Queue: When a routine needs to 
tpost an element to the disabled ready gueue in the MCP, bit 5 of the 
action code byte is set to 1. 

The calling routine builds the same format three-word parameter 
list used for cross-partition data movement (see Figure 19). The 
address of the target field, in this case, is the address of the 
disabled ready gueue in the ATT. There is no actual data movement, 
because both the data field and the target field are elements - only 
the pointers are changed. 

The AQCTL SVC 102 routine chains the element onto the disabled 
readv gueue and pests the ECB for the MCP ccmplete. 

Flag the TCB for a TSO Program : When a routine needs to flag the TCB 
of a TSO application program either eligible or not eligible for swap, 
bit 3 or bit 6 of the action code byte is used. 

If bit 3 is egual to one, the AQCTL SVC 102 routine flags the TCE 
of the TSO program not eligible for swap; if bit 6 is egual to one, 
the TCB of the program is flagged, eligible for swap. 

The three-word parameter list created by the calling routine is 
illustrated in Figure 21, 
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Offset 


+4 
+8 



+ 1 



Action code 


ECB address 


X'OO' 


TSO Job Identifier address 


X'80' 


TCB address 



Figure 21. "Format of a Parameter list to Flag the TCB of a TSO 
Program 



Flag the TCB for a BOBI Program : when a routine needs to flag the TCB 
of an B.OBT application program as eligible or not eligible for 
rollout, bit cr bit 7 of the action cede byte is used. 



If bit is egual to one, the AQCTL SVC 102 routine flags the TCB 
of the task as not eligible for rollout; if bit 7 is egual to one, the 
TCB is flagged as eligible for rollout. 

The three-word parameter list created by the calling routine has 
the same format as the parameter list for posting the ECB of an B.OF.I 
task (see Figure 20) . 



MESSAGE HANDLING IN A MESSAGE CONTROL PBCGBAM 

Data enters the TCAM system randomly in the form of messages from 
remote terminals or programs that generate messages. Data is 
ultimately delivered to one or more terminals or programs that process 
the data. The MCP controls the routing of the messages as well as a 
limited amount of processing. These functions of an MCP are referred 
to as "message handling" functions. 

In order to present an overview of the way an MCP performs its 
message handlinq (MH) functions, this section contains discussions of 
the functional areas involved: 

• Line management 

• Buffer management 

• Message handling routines 

• Cueue manaqement 

Foldout Chart 8 illustrates message flow through a TCAM system. 
Note the area of influence for each of the functional parts to be 
discussed. 
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LINE MANAGEMENT 

TCAM schedules line operations to allow data to travel over a line in 
a sinqle direction at any one point in time. A line can be used for 
both sendinq and receiving, and in order to schedule this two-way 
activity TCAM uses two mechanisms. The first of these, a receive 
scheduler, allows data to be received frcm a remote station; the 
other, a send scheduler, allows data to be sent to a remote station. 

Each line in a TCAM system is represented by an LCB, and at line 
open time, each LCB (except a send-only line) has a receive scheduler 
STCB built in it. This STCE can be for the Leased Peceive Scheduler, 
the Dial Peceive Scheduler, the Local Peceive Scheduler, or the 
Buffered Terminal Scheduler, dependinq on the characteristics of the 
line. 

At assembly time each Destination OCE in a TCAM system has an STCB 

startinq in its third word. This STCB can represent either the Send 

Scheduler or the Buffered Terminal Scheduler and is used to schedule 
sendinq operations. 

The priorities of the receive and send scheduler STCBs are 
determined when the user specifies whether he wants receive, equal, or 
send priority for a line. As the address cf an STCE is moved from the 
STCB chain of the LCB to the STCB chain of the Destination QCB and 
back, that STCB is inserted in the respective STCB chains by FIFO- 
priority. 

An LCB is tposted to the ready queue when the line that it 

represents is free to either receive or send data. The STCB that has 

the hiqhest priority in the STCB chain of the LCB has its subtask 
dispatched. 



A Peceive Operation 

At open time, either a Leased Peceive Scheduler STCB, a Local Peceive 
Scheduler STCB, a Buffered Terminal Scheduler STCB, or a Dial Peceive 
Scheduler STCB is built in each ICE. Since there is one LCB for each 
line in the system, there is also one receive scheduler STCB for each 
line that can receive data in the system. If a line is intended for 
sendinq only, there is no receive scheduler STCB and the only STCB in 
the STCB chain for the line points to the CFVENT routine, which frees 
the LCB instead of attemptinq to initiate a receive operation. (The 
OEVENT routine is part of the Receive Scheduler CSFCT.) 

The receive scheduler in control inspects a line to determine 
whether a receive operation is possible. A messaqe can enter the TCAM 
system only after the receive scheduler for a line has recoqnized that 
the line is available so that a receive operation can be started. The 
scheduler is activated by the Dispatcher when its STCB is the next 
STCB in the STCB chain of an LCB at the top cf the ready queue. (See 
^iqure 22.) 
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Ready Queue 



Element 





LCB 





QCB | 


Priority 


Link 


MCPL 


STCB ^ 


Priority 


Link 




Fiqure 22. A Peceive Scheduler STCE in an ICB on the Ready Queue 

The primary function of each cf the receive schedulers is to 
solicit data from the terminals on a line. For contention lines this 
is done by preparinq the line to receive; fcr multipoint lines this is 
done by pollinq the terminals on the line. The point at which a 
receive scheduler releases a line is qenerally when the end of an 
invitation list is reached, althouqh it can be after receipt of a 
messaqe or, in the absence of the Auto Poll feature, when a neqative 
response is received. 



Each receive scheduler, in or 


der to 


solicit 


a messaqe, requests 


buffers to contain the messaqe b 


y tpostinq the 


EBB for the LCB to 


the 


Buffer Request CCE. The Buffer 


Bequest 


routine (IEEQGA) qets 


the 


requested number of buffers fron 


i the bu 


ffer unit pool, and chains 


the 


units from the chain field of the 


EBB. 


Buffer 


Bequest branches 


to 


Buffer Association, which builds 


in the 


buffers 


a channel proqram 


that 


is appropriate to the characteristics of 


the line. Buffer Association 


returns to Buffer Bequest, whic 


h tpost 


s the EBB to the Activate 


QCB. 


As a result, the TCAM Dispatcher 


dispatches the 


Activate-I/C Generator 


subtask (IEBOKA, TEDQKB, IEDQKC, 


TEDQKD, 


cr IEDQKE) , 





The Activate-T/O Generator subtask builds the initial ccntrol CCW 
sequence. This subtask then issues an EXCP to accept a messaqe and 
relinquishes ccntrol to IOS. 

After IOS has accepted the EXCP request, the subsequent I/O 
interrupt with device endinq status causes the TCAM Line End Appendaqe 
to qain control. If there is a messaqe ready to be processed, Line 
End Appendaqe tposts the buffers to the STARTMH QCB fcr message 
handlinq. If there is no messaqe available, Line End Appendaqe tposts 
the LCB to Buffer Disposition where the buffers are returned to the 
buffer unit pool and the line is freed (the LCE tposted to itself and 
placed on the ready queue) . 
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Foldout Chart 9 illustrates the qeneral flow cf control durinq a 
receive operation. Foldout Chart 16 shows how a receive scheduler 
operates in a complete receive operation. 

The specific functions of each of the receive schedulers are 
described in the Program Organization section of this publication. 



A Send Operation 

There is a send scheduler STCE assembled in every Destination QCB in 
^CAfl. . (Tf the Destination QCB is for an application proqram, the Get 
Scheduler STCB assembled for it is the equivalent of sendinq to an 
application proqram.) The purpose of a send scheduler is to attempt 
to find a line for sendinq when a messaqe is tposted to a Destination 
QCB and to initiate sendinq of the messaqes on the QCE. The line is 
initialized for sendinq when the send scheduler is dispatched as a 
subtask of the ICE. 

A send scheduler is activated by the Dispatcher when its STCB has 

top priority in the STCB chain of a Destination QCB or an 1CB. This 

send scheduler can fcp either the Send Scheduler or the Buffered 
Terminal Scheduler. 

The number of send schedulers that can contend for a line is 
determined by the type cf queuinq requested in the TERMINAL macro for 
the line. If queuinq by line is specified, one send scheduler STCB is 
qenerated for the line. However, if queuinq by terminal or by 
component is specified, there is one send scheduler STCB for each 
terminal. The relative priority of the send schedulers is established 
at assembly time by the CPRI operand of the line qroup DCE. 

A send scheduler, in order to prepare to read a messaqe from a 
messaqe queues data set and to direct the message to the appropriate 
terminal, tposts the ERB in the LCE to the Disk I/O QCB. The Disk I/O 
OCB has the CPE Initialization STCB in its STCB chain. When the 
tposted ERB qets to the top of the ready queue, the TCAM Dispatcher 
activates CPB Initialization. This routine starts readinq a messaqe 
for the line and qets enouoh full buffers to satisfy the ERB request. 
C^B Initialization chains the buffers off the EFB and tposts the ERB 
to the Activate QCB. As a result, the TCAM Dispatcher dispatches the 
Activ'ate-I/C Generator subtask. 

The Activate-I/O Generator subtask builds the selection CCW 
seauence and a send channel program that is appropriate to the 
characteristics of the device to receive the message. This module 
then issues an EXCP to address the terminal and relinquishes control 
to IOS. 

After tos has addressed the terminal and received a response to 
addressinq, the resultinq I/O interrupt activates the TCAM Line End 
Appendaqe. The line End Appendaqe exairines the response to 
addressinq; and if the response is positive, the appendaqe tposts the 
buffers to the STAFTMH QCB for outqoinq messaqe handlinq and restarts 
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I/O on the Write Idles loop. For terminals that do not have a 
selection sequence (cannot be addressed by TCAM) , the Activate- I/O 
Generator subtask tposts the cutqcinq buffers directly tc MH. If 
reserve (idle) characters exist for the device, line End Appendaqe 
restarts the channel proqram on the Write Idles loop; otherwise Buffer 
Association (TEDQGD) issues the EXCP command. If the response to 
addressinq is neqative, the appendaqe tposts a buffer with an error 
indicator to MH in order to route control to the outmessaqe subqroup 
for user consideration via optional OUTMSG macros. Also, if the 
neqative response to addressinq is due to a hardware error, Line End 
Appendaqe activates the error recovery procedure. 

The qeneral flew of control durinq a send operation is illustrated 
in foldout Chart 10. Foldout Chart 17 shot's how a send scheduler 
operates in a complete send operation. 

The specific functions of the Send Scheduler and of the Buffered 
Terminal Scheduler are discussed in the Proqram Crqanizaticn section 
of this publication. 



BUFFEF MANAGEMENT 

The TCAM network has one buffer unit pool that contains buffer units 
of one size. These buffer units are the basic buildinq blocks from 
which logical buffers are constructed. Henceforth, in this 
publication unit refers to a buffer unit and buffer refers to a 
loqical buffer. 

Messaqes enterinq a TCAM network are placed in buffers, which are 
user-defined areas of main storaqe used for handlinq, queuinq, and 
transferrinq messaqe seqments between all lines and queuinq media. (A 
messaqe seqment is that portion of a messaqe contained in one buffer.) 
A buffer has two parts, one that contains control information (the 
buffer prefix) and the other that contains all or part of the messaqe. 
Buffers must be at least 33 bytes lonq, and may be no lonqer than 
65,535 bytes. 

The size of a unit is specified in the KEYLEN operand of the INTFO 
macro of an MCP, and the number of units in the buffer unit pool is 
equal to the sum of the numbers specified by the LNUNTTS and MSDNITS 
operands of INTFO. For internal manaqement purposes, TCAM adds 12 
bytes as a prefix to the user-specified unit size. These 12 bytes are 
called a unit control area. Thus, if a user defines a unit size of 60 
bytes (KEYLEN=60) , the size of the unit is actually 72 bytes. 

The size of a buffer for a line qroup is specified by the BUFSIZE 
operand of the DCB macro for a line qroup data set. All buffers used 
by a qiven line qroup are the same size, tut each line qroup may 
utilize buffers that differ in size from those assiqned to other line 
qroups. (The buffer size can be overridden en a terminal basis for 
send operations by usinq the BUFSIZE operand of the TEFMINAL macro.) 
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TCAM constructs buffers by linkinq together the number of units 
necessary to create a buffer that contains a number of usable bytes 
equal to or qreater than that specified by the BUFSIZE operand of the 
DCB macro for a qiven line qroup. (The 12 bytes added to each unit by 
TCAM are not considered in defininq BUFSIZE; the user should consider 
only the number of bytes he specified in the KEYLEN operand Of INTRO) . 
For example, if KEYLEN=60 in the TNT!?0 macro and BUFSIZE=120 in a line 
qrouD DCB macro are specified, TCAM links toqether two units in 
buildinq each buffer for that line qroup. 

There are two types of buffers - header buffers and text buffers. 
A header buffer contains all or any part of a message header. A text 
buffer contains messaqe text only. 

A buffer prefix is a control area contained within each buffer of 
the system. The user must allow room for the buffer prefix in 
defininq his buffers. TCAM fills the buffer prefix area with buffer 
control information. 

There are two kinds of buffer prefix. The first buffer prefix is 
30 bytes lonq and is contained within the first buffer of a message. 
Any subsequent buffer prefix is 23 bytes lcnq and is contained within 
all buffers after the first. 

Thus, there are two kinds of control areas associated with 
buffers: the twelve-byte unit control area associated with each 
buffer unit and assianed automatically by TCAM, and the 30-byte or 23- 
byte buffer prefix assiqned to each buffer by TCAM in an area allowed 
for by the user. Each unit must be biq erouqh to contain a header 
prefix plus three bytes of messaqe text (33 bytes) and may be no 
larqer than 255 bytes. A subseauent buffer contains more bytes of 
actual messaqe than the first buffer, since a subsequent buffer prefix 
is 7 bytes shorter than the first buffer prefix. 

The twelve-byte unit control area that TCAM assigns to each unit 
is used to manaqe multi-unit buffers. This control area has different 
functions dependent on the status of its buffer - it may contain 
pointers, be used as an BCE, or be used to generate a channel program. 
The initial format of this 12-byte area is defined in Figure 23. 



Offset 
0. I 



Key 


QCB 

address 


Address of the first 
unit of the next 
logical buffer that 
is qssigned 


Address of the next 
unit of this buffer 



"p'iqure 23. Unit Control Area 
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Fiqure 24 shows how two buffers assiqned to a line group look on 
an initial request if the user specifies the followinq: 

TNTBO KEYLEN=60 

DCE BUFSIZE=100,BU"FTN = 2 



Buffer 1 



RCB 



Buffer 2 




30 Bytes ■ 



30-byte Prefix 



30 Bytes - 



Message Header and/or Text 



1 2 Bytes 



-*>< 



Unit Control Area 



■ 40 Bytes 



Message Header and/or Text 



20 Bytes ► 

Unused 



23 Bytes • 



23-byte Prefix 



37 Bytes ■ 



Message Header and/or Text 



1 2 Bytes 



Unit Control Area 



■X 



40 Bytes 



Message Header and/or Text 



«* 20 Bytes ► 

Unused 



Fiqure 24. Buffer Units Chained to ^orm Loqical Buffers. 



In ^iqure 24, each buffer consists of tvo units linked toqether by 
the pointer in the third word of the twelve-byte unit ccntrol area. 
The two buffers are linked toqether by the second word of the twelve- 
byte unit contrcl area. Note that in this situation the first eiqht 
bytes of the unit control area of the first unit in each buffer is 
functioninq as an RCB. 

When the user's proqram requests and obtains buffers, they look 
like the ones in Fiqure 24. However, when a line is ready to read or 
write, the function of the twelve-byte ccntrol area changes. TCAM 
then uses the area to contain the channel proqram that operates on the 
unit. The Buffer Association routine places a CCW in each RCB field, 
and the pointer in the third word becomes a TIC to the next unit. The 
30-byte prefix contains a count of the number of units in a loqical 
buffer; this indicates where one buffer stops and another starts. 



Method of Operation 79 



To tpost a buffer, TCAM places only the first unit of that buffer 
on the ready queue. All other units can be located through the chain 
created in the TIC field of the unit control area. 

Buffer Requesting and Allocating 

TCAM uses an element request block (ERB) to make requests for buffers 
for a line group. A description of the physical characteristics of an 
FRB is included under Control Areas in the Introduction section of 
this publication. 

Initial requests for buffers for a line are made when a scheduler 
tposts its FRE, which contains the number of buffers requested, to the 
Buffer Request QCE for a receive operation, or to the Disk I/O QCB for 
a send operation. 

Subseguent reguests for buffers are handled by the TCAM Program- 
Controlled Interruption (PCI) Appendage. ihen the PCI operand of the 
DCB for a line group is coded to allow program-controlled 
interruption, a PCI may occur during the filling or emptying of the 
first and each subseguent buffer assigned to that line group. When 
the ^CI is received, the PCI Appendage gains control. 

When PCI=A is coded on the DCB macro and the first interruption 
occurs, PCI Appendaqe assiqns to the line group a number of buffers 
egual to the difference between the maximum number assigned to the 
line group (specified by the BUFMAX operand of the DCE) and the number 
initially assigned to the line group (specified by the BUFIN operand 
of the line group DCB for a receiving operation and by the BUFOUT 
operand for a sending operation) . On subsequent PCIs, the appendage 
deallocates the buffer immediately preceding the one being filled or 
emptied and requests a new buffer in order to keep the number of 
buffers assicrned to the line qroup equal tc that specified by EUFMAX. 
(For a sendinq operation, the buffer units are returned via the Buffer 
Return QCB to the buffer unit pool - the element chain of the Buffer 
Request OCB: for a receivinq operation, the buffer is sent to the 
messaqe handler for the line qroup for that DCB.) 

When PCI=R is coded, the appendaqe deallocates the previous buffer 
when the second and subsequent PCIs occur, but makes no requests for 
additional buffers. If proqram-controlled interruptions are not 
permitted (PCI=N) or additional allocation is not allowed (PCI=R) , the 
number of buffers assiqned must be sufficient to handle the entire 
transmission, since no new buffers are allocated until the 
transmission is complete. If PCI=N, there is no deallocation of 
buffers until the transmission is complete. 

• Initial Request - Receive Operation 

When a line group in the TCAM system needs a buffer or buffers for a 
receive operation, a receive scheduler must tpost an FRB that contains 
the number of buffers reguested to the Buffer Feguest QCB. Foldout 
Chart 11 shows the complete flow of control for an initial buffer 
reguest in a receive operation. 
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Eiqure 2 C shows the result cf an ERB with a count of three beinq 
tposted to the Buffer Request QCB. The ERE chain of the LCB points to 
the first buffer. This fiqure demonstrates the chanqe in linkaqe 
after units have been transferred from the buffer unit peel to form a 
buffer chain off the requestinq ERB. The physical location of the 
units in main storaqe does not chanqe - the various pointers are 
chanqed to reflect the new orqanization. 



Fiqure 26 shows the contents 
Association has been executed. 



of the buffers after 



Buffer 



Tf the initial request for buffers carnct be satisfied, the EBB is 
chained by priority into the element chain of the Buffer Return QCB. 
This EBB has a hiqh priority; therefore, as soon as the buffers are 
available, the initial request is satisfied and the line can start 
receivincr messaqes. 



Buffer Request QCB 



Buffer Unit Pool 



ERB 



Key 


T QCB 


Priority 


Link 


Status 


| Chain 


03 


03 




LEGEND 



Linkage before ERB is serviced 
Linkage after ERB is serviced 



^iqure 25. *ffec-: of an ERE on Buffer Unit Linkaqe 
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Unit Control Area 



60-byte Unit 




Invalid TIC 



Fiqure 26. Buffers Prepared to Receive Data 
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• Initial Bequest - Send Operation 

When a line qrcup in the TCAM system needs a buffer or buffers for a 
send operation, the Send Scheduler must tpost an EBE for the number of 
buffers requested initially to the Disk I/O QCB. The CPE 
Initialization STCB resides in the STCB chain cf the Disk I/O QCB. 
When the tposted EBE qets to the top of the ready queue, the CPB 
Initialization routine qains control. 

^or a send operation, when the CPB Initialization routine acquires 
enouqh buffers to fill the "EBB request, the buffers are already full 
and allocated to a line. However, they have to qo throuqh messaqe 
handlinq (MH) before I/O can occur. CPB Initialization tposts the 
^EB, with its full buffers, to the Activate QCB. This activates the 
Activate subtask (TEDOKA) , which builds initial contact CCWs and 
issues EXCP. At this point, allocation cf the buffers is complete. 
Upon completion of the addressinq seauence, line End Appendaqe tposts 
the buffers to MP for outqoinq prccessinq. 

holdout Chart 12 shows the flow cf control for initial buffer 
request and allocation durinq a send operation. 



• Subsequent Bequests - Beceive Operation 

As discussed earlier in this section, all subsequent requests for 
buffers are handled when PCIs occur. When a PCI for a receive 
operation occurs, an EBB for additional buffers is tposted to the 
Buffer Bequest OCE and the buffers are assiqned. 

• Subsequent Bequests - Send Operation 

When a PCI for a send operation occurs, an EBB is tposted to the Disk 
I/O QCB and the buffers are allocated. 

^unctions of Euffer Associat ion 

The Buffer Association routine in the Buffer Manaqement module builds 
the CCWs in the units of buffers. To do this, the routine builds a 
CCH in the first buffer to be read or written, fills the subsequent 
buffers with CCWs, and places an invalid TIC in the last unit. As 
other buffers are assiqned, the invalid TIC is chanqed to TIC to a new 
buffer and the invalid TIC is placed in the last unit of the new 
buffer. If a channel proqram check occurs en the invalid TIC, the 
channel proqram check portion of line End Appendaqe causes the channel 
to execute the Write Idles/Bead Skip loop. When a buffer becomes 
available, Buffer Association links the buffer into this loop, as well 
as into the buffer chain. (See "Piqure 26.) 

Buffer Association is called at different times durinq receive and 
send operations: 
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• Receive operation - Euffer Bequest calls Buffer Association to 
handle all initial buffers iust prior to going to Activate to 
build the initial contact channel program. When subsequent 
buffers are obtained, the Euffer Return subtask calls Buffer 
Association as soon as a buffer is available, 

• Send operation - as soon as MH has processed each buffer, it calls 
Euffer Association. 

Buffer Association exits to the TCAM tispatcher with the CCWs 
completed. 

Deallocating Buffers 

Buffers are deallocated, released from use by a line group, in 
different ways for receive and send operations. 

Receive Operation : When a PCI or the line End Appendage takes a 
buffer from a channel program and sends it to MH, the buffer is 
deallocated from the channel program, but it is not free. The buffer 
is completely deallocated only after it has been queued. 

Send Operation: When a buffer has been sent out to a line group, it 
is deallocated by virtue of being tposted to the Buffer Return QCB. 

Functions of Buffer Return 

When a buffer is tposted to the Buffer Return QCB, the action taken 
depends on whether there is an ERB waiting for that buffer, Foldout 
Chart 13 shows the conditions under which the Buffer Return routine 
qains control and the functions that the routine performs. 

MESSAGE HANDLING ROUTINES 

In TCAM, a message is a seguence of characters entered at or sent to 

a terminal, and terminated by an ending character (EOT, ETB, ETX, or 

^OB) . A message may consist of two portions, a header portion and a 

text portion, each of which may occupy more than one buffer. A 
message may have a header only, text only, or both. 

The discussion of Buffer Management earlier in this section 
describes header buffers, text buffers, a 30-byte buffer prefix, and 
a 23-byte buffer prefix. It is necessary to understand these terms 
before approaching the subiect of message handling. 

Before messaqe characters are placed in the first buffer, TCAM 
reserves the number of reserve characters specified by the user for 
the line qroup. TCAM reserves space for these characters at byte 30 
in the first buffer and at byte 23 in each subsequent buffer. These 
reserve characters save room in the buffer for later insertion of the 
date, time, and seguence number for the message. As messages enter 
the CPU and are placed in buffers, characters start filling each 
buffer lust after the reserved space. 
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As soon as a tuffer is filled with the first seqment of a messaqe, 
the appendaqe in control tpcsts that buffer to the QCB for the message 
handler (MH) desiqnated for the particular line qroup that the message 
is for or from. (The appendaqe is able tc desiqnate the proper MH by 
examininq DCBMH in the CCE of the line qroup.) The tpcstinq of the 
buffer chains it onto the disabled ready queue. When the TCAM 
Dispatcher qains control, the disabled ready queue is merqed by FIEO- 
prioritv order onto the enabled ready queue, and the buffer waits its 
turn to be dispatched to its MH. 

A message handler is a set of messaqe handlinq routines desiqned 
to process messaqes for a particular line qroup or for several line 
qroups with similar characteristics. Each MH is identified by a 
STARTMH macro and may consist of an incominq qroup and an outqoinq 
qroup, which are desiqned to handle incominq and cutqoing messages 
respectively. The functions of these groups and their subgroups are 
discussed in the following sections. holdout Chart 14 illustrates the 
progress of a buffer throuqh an MH. 



Functions of the User Interface Routine 



At assembly time many of the user-coded MH macros qenerate one or more 
fixed-lenqth parameter lists, some executable code, and branch 
instructions to the User Interface routine (IEDQTJI) . At execution 
time the User Interface routine uses the parameter list frcm a macro 
to qain access to the specific functional routine needed for 
processinq. After it has finished executinq, the functional routine 
branches to the Return Interface routine (IEDQLM) , which, in turn, 
returns to the next sequential instruction in the MH portion of the 
MCP. ^he next instruction miqht be a branch back to the User 
interface routine with a new parameter list to be processed. This 
process of branchinq to functional routines thrcuqh the User Interface 
routine continues until the functions of all the user-ceded macros for 
the specific MH have been executed. 

^unctions of STABTMH 

A STARTMH macro identifies the beqinninq of an MH and must be the 
■first instruction coded in every MH . When a buffer is tpested to the 
STAPTMH OCB of an MH and no block checkinq is specified, the functions 
of the STARTMH suttask are performed. When a buffer is tposted to the 
STARTMH QCB and block checkinq is specified, the EOB/ETB Handlinq 
subtask is activated. The EOB/ETB Handlinq subtask checks for the 
occurrence of hardware errors durinq messaqe transmission and can 
handle user-detected loqical errors. After EOE/ETB Handlinq has 
processed the tuffer (or if it has no processinq tc perform) , it uses 
the bypass function of the Dispatcher to activate the STARTMH subtask. 

Th<* block labeled STARTMH in foldout Chart 14 summarizes the 
specific functions of the STARTMH subtask. 
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Note; For a ncn-TSO TCAM system, the STABTMH subtask is IIDQAA; when 
TSO is in the system, the IEDAYE version of the subtask is used. 

Functions of the Incoming Group of a Message Handler 

The incoming group of an MH handles messages arriving from a station 
with which the MH is associated. When a tuffer containing a message 
segment is passed to the incoming group cf an MH, user-specified 
functions such as source checking, insertion of the time the message 
was received, input seguence-number checking, etc., are performed. 
The MH scans and processes buffer header fields in accordance with the 
order indicated by the relative positions of the individual MH macro 
instructions. 

The incoming group has three possible types of subgroups: 

• The inheader subgroup, which handles only incoming header 
segments, 

• The inbuffer subgroup, which handles all incoming message 
segments, and 

• The inmessage subgroup, which is executed after a complete message 
has entered the CPU. 

^unctions of an Inheader Subgroup: The first macro coded in an 
inheader subgroup is the INHDR macro. The first function of INHDE 
macro-generated code is to determine whether the buffer to be 
processed is a header buffer or a recalled buffer, If it is not a 
header buffer cr if it is a recalled buffer, control is transferred to 
the next delimiter macro expansion. 

If the buffer to be processed is a header buffer and a PATH 
operand was coded for the INHDR macro, the locate Option Field Address 
routine is given control to find the address of the option field. 
Upon return to the macro-generated code, a test determines whether an 
option field address was found. If it was not, control passes to the 
next delimiter macro expansion. If there is an option field address, 
but there are no matching path switches, control is also transferred 
to the next delimiter macro expansion. Otherwise, control falls 
through to the next seguential MH instruction. 

After the INHDP macro-generated code is executed, the expansions 
of the other user-coded macros process the buffer. There are two 
levels of processing used at this time: functional routines and 
functional subroutines, 

A functional routine is associated with a specific MH macro. When 
the macro is coded, the assembler generates either the necessary 
parameter list (si and a branch instruction to the User Interface 
routine or a branch to the associated routine, if one is needed. At 
execution time, the User Interface routine branches to the functional 
routine, as described previously. The functional routine uses the 
assembly-generated parameter list to gain access to the control areas 
and data needed for processing the buffer. The functional routine 
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returns to the Return Interface routine, and from there to the next 

seauential P instruction. 

* functional subroutine gains control from either the User 
interface routine or directly from a functional routine. The same 
functional subroutine can be used by any number of functional 
routines. A functional subroutine returns to the functional routine 
that called it. 

Some TCAM MH routines function as both functional routines and 

subroutines. 

"Functions of an Inbuffer Subgroup: The first macro coded in an 

inbuffer subarcup is the INBUF macro. The first functions of INBUF 
macro-generated code are to perform the same multiple-buffer-header 
and d a ,t1 H operand tests that are performed by INHDR macro-qenerated 
code. ^he results of the tests are the same as described above. 

Processing cf the buffer continues through this inbuffer subgroup 
accordincr to the MH macros specified by the user. Functional routines 
and subroutines actually perform the processing, as described in the 
'unctions of an Inheader Subgroup section. 

'unctions; of _an_ Inmessage Subgroup: The macro instructions coded in an 
inmessage subgroup are executed only after a complete message has 

entered the ^CAM system. 

""he -First iracro coded in an inmessage subgroup is the INMSG macro. 

^e INMSG macro-generated code tests for the PATH operand and executes 

accordingly, as described in the Functions of an Tnheader Subgroup 
section . 

T, Jhen an inmessage subgroup maintains control (the path switch 
setting matches), control is passed, via the User Interface routine, 
to the Tncoming/Cutgoing Message Delimiter routine. If the buffer is 
th° last buffer of a message, it is frosted to the Buffer Disposition 
oc^: if it is not the last buffer, it is tposted to the appropriate 
destination OCB. 

r ^hen the last buffer of a message is tposted to the Buffer 
disposition OCB, the TCAM Dispatcher activates the Buffer Disposition 
subtask to supervise execution of the macros in the subgroup. The 
message handling functions of the Buffer Disposition subtask are 
illustrated on foldout Chart 14. 

Functions of the Outgoing Group of a Message Handler 

^he outgoing group of an MH handles messaqes as they are prepared for 
sending to the destination with which the MH is associated. As the 
message is brought in from its gueue (e.g., in a message queues data 
set) , it is placed in buffers, as for an inccming message. 

When a tuffer that contains a messaqe segment is passed to the 
outaoing group of an MH, that group processes the buffer according to 
the functions specified by the user-coded MH macros. 
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The outgoing group has three possible types of subgroups: 

• The outheader subgroup , which handles only outgoing header 
segments, 

• The outbuffer subgroup, which handles all outgoing message 
segments, and 

• The outmessage subgroup, which is executed after a complete 
message has been sent. 

Functions of an Outheader Subgroup: The first macro coded in an 

outheader subqroup is the OUTHDF macro. The functions of the OUTHDR 
macro-generated code are the same as for the INHDE macro-generated 
code. 

Functions of an Outbuffer Subgroup: The first macro coded in an 

outbuffer subgroup is the OUTBUF macro. The functions of the OOTBUF 

macro-generated code are the same as for the INBUF macro-generated 
code. 

Functions of an Outmessage Subgroup; The MH macros in an outmessage 

subgroup are executed after an entire message has been sent. 

The first macro coded in an outmessage subgroup is the OUTMSG 
macro. The OUTMSG macro-generated code tests for the PATH operand and 
executes accordingly, as described in the Functions of an Inheader 
Subgroup section. 

When an outmessage subgroup maintains control (the path switch 
setting matches), the macro expansion passes control, via the User 
Interface routine, to either the Incoming/Outgoing Message Delimiter 
routine or the Line Control Insertion routine. If the MSGFORM macro 
is specified in the outgoing subgroup, the Line Ccntrcl Insertion 
routine gains control to add the necessary line control characters to 
the message. This routine then exits to the Incoming/Outgoing Message 
Delimiter routine. 

The Incoming /Outgoing Message Delimiter routine conditionally 
tposts the buffer to an application program, exits to the Transparent 
CCW Building routine, or exits to the Buffer Association routine. 

The Incoming/Outgoing Message Delimiter routine examines the 
destination key (PBFDEST) of the buffer prefix and links to the 
Termname Table Code (IEDQTNT) to obtain the address of the Terminal 
Table entry for the destination. If the status field indicates a 
process entry, the routine gets the address of the Bead-ahead QCB from 
the terminal entry and tposts the buffer to that QCE, 

If the destination is not a BSC device in transparent mode, the 
Incoming/Outgoing Message Delimiter routine exits to Buffer 
Association, which builds WRITE CCWs and TICs in the control area of 
the buffer units. Otherwise, the exit is to the Transparent CCW 
Building routine for the same purpose. 
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QUEUE MANAGEMENT 

^he incominq qroup of an MH performs user-specif ied functions in a 
buffer that contains a messaqe seqment. After these functions are 
completed, the seqment is tposted to its Destination QCB. A 
destination QCE can represent a line, a terminal, or an application 
urogram. 

Each Destination QCB in a TCAM MCP is assiqned to one or more 
specific messaqe queues data sets. When a buffer is tposted to its 
Destination OCB, it is placed on the appropriate messaqe queue in the 
associated messaqe queues data set to wait its turn to be sent to the 
specified destination. 

The messaqe queues data set to which the messaqe seqment is to be 
directed may be in main storaqe or on a direct-access storaqe device. 
Each messaqe queue within a qiven data set contains seqments that are 
to be transmitted on a certain line or to a certain terminal, or that 
are to be processed in a specific application proqram. 

T'CAM supports five types of queuinq to a messaqe queues data set: 

• Nonreusable disk queuinq 

• Reusable disk queuinq 

• Main storaqe queuinq 

• Main storaqe oueuinq with nonreusable disk backup 

• Main storaqe queuinq with reusable disk backup 

The followinq sections discuss the functions of these types of 

aueuinq. 

Nonreusable Disk Queuing 

Oueuinq a messaqe on a direct-access storaqe device is referred to in 
this publication as disk queuinq. The term address refers to the 
first disk relative record number that can be used to queue a unit of 
a messaqe seqment. All values of address previous to the current 
value are either used or preassiqned for use. The fields AVTflADDR and 
AVTPADD^ in the AVT contain the address value for nonreusable and 
reusable disk relative record numbers, respectively. The Destination 
Assignment routine uses the correct value for the type of queuinq 
specified for a line. In this discussion, address refers to either 
field. 

T n nonreusable disk queuinq, the Destination Scheduler initiates 
a closedown when a user-specified percentaqe of the disk messaqe 
queues data set has been filled with messaqes. If, before the 
closedown can be completed, there are already more messages in the 
system than the data set has room to accommodate, TCAM issues an 
AEHND. 
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^he Destination Scheduler assiqns disk relative 
the volumes of a multi-volume disk ioessaqe queues 
way that the next relative record address after the 
track is on a different volume. The routine numbe 
for a qiven track consecutively before assiqninq add 
track of a different volume. In addition, the routi 
tracks of a cylinder before assiqninq address val 
cvlinder. Fiqure 27 illustrates the disk record num 
a data set that has fcur records per track en three 



addresses across 
data set in such a 
last record on a 
rs all the records 
ress values on a 
ne numbers all the 
ues on a different 
bering scheme for 
volumes. 



Volume 1 



Volume 2 



Volume 3 




12 13 ]4 15 



/ 



/ 



/ 



\ / 

\ / 








/ y 


w \ 


Cylinder 


Track 


Relative Record Number 


Relative Record Number 


Relative Record Number 








12 3 


4 


5 6 7 


8 9 10 11 




1 


12 13 14 15 


16 


17 18 19 


20 21 22 23 




2 


24 25 26 27 


28 


29 30 31 


32 33 34 35 




3 


36 37 38 39 


40 


41 42 43 


44 45 46 47 




4 


48 49 50 51 


52 


53 54 55 


56 57 58 59 




5 


60 61 62 63 


64 


65 66 67 


68 69 70 71 




6 


72 73 74 75 


76 


77 78 79 


80 81 82 83 




7 


84 85 86 87 


88 


89 90 91 


92 93 94 95 




8 


96 97 98 99 


100 


101 102 103 


104 105 106 107 




9 


108 109 110 111 


112 


113 114 115 


116 117 118 119 


1 



1 


120 121 122 123 
132... 


124 


125 126 127 


128 129 130 131 



iqure 27. Assignment of Disk Messaqe Queues Data Set Relative Record 
Numbers Across Three Volumes 



90 



At MCP assembly or restart time, each Eestination QCE is assigned 
a unique address value for the first buffer seqment tposted to it. As 
a result, when the first messaqe enters the TCAM system, the AVT value 
of address is one qreater than the total number of Destination QCBs. 

^he Destination Scheduler stores the address value to be used for 
the first unit of the first buffer of the next messaqe received in the 
OCBDMHDR field of the Destination OCB - this is referred to as the 
Il£^irl^ssajge location. The routine stores the address value for the 
first unit of the next buffer of the current messaqe in the SCBNTXT 
field of the SCB - this is referred to as the next-buf f er location. 

^he principle of assiqninq next-messaqe and next-buffer address 
values allows queuinq ahead on the disk. Records for buffer units are 
assioned before the buffer is received. 

^oldout Chart 15 presents a summary of the nonreusable disk 
aueuinq procedure of the Destination Scheduler. 

T n the example in Eiqure 28, there are five possible destinations. 
r or each of these, the MCP assembly has preassiqned reccrd addresses 
(marked A throuqh E) with relative record addresses zero to four. The 
apDlicable externals for this example are: 

IN^PC KEYLEN=100 

LTFEA BCB BUFST7E=300,^CT=(A,A) 

LTNFC DCB EDFSTZE=800 ,PCI= (A , A) 

^hree messaqes arrive in the followinq order: 

1. 500 characters - from line A to Line D 

2. ^000 characters - from Line C to Line B 

3. 30 characters - from Line A to Line E 

^iqure 28 shows the situation in which TCAM reads a buffer (the 
first buffer cf the first messaqe) from line A. The 30-byte prefix 
contains the information that this messaqe is to be sent to line D. 
^he messaqe seqment consists of three units (since BUFSTZE=300 and 
KEYLEN=100) and does not contain an end-of-messaae (EOM) indicator. 
^he Destination Scheduler assiqns the first unit of this header buffer 
to the preassiqned location for destination D, record 3. The 
scheduler then preassiqns the next-messaqe location for destination D 
to the next available disk location at record 5, and places a pointer 
to record 5 in the prefix of the buffer that will start in disk record 
3. The scheduler then assiqns two additional units to the next 
available disk locations at records 6 and 7. The scheduler inserts a 
pointer to the first of these records in the prefix of the buffer that 
will start in disk record 3. 
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<*ince the 3C0-byte buffer does not contain an EGM indicator, the 
destination scheduler preassiqns a record number (8) for the first 
unit of the next buffer to arrive for this message. The scheduler 
Places a pointer to record 8 in the prefix of the buffer that will 
start in disk record 3. The records are actually written after the 
three pointers are included in the prefix of record 3. Fiqure 28 
shows the records and pointers after they are written on disk. 

T n this queuinq scheme the additional records are always 
contiguous, and the first unit of a subsequent buffer of a messaqe is 
always contiquous to the last unit of the previous buffer, 

T n ^iqure 29 the first buffer of the 3000-byte messaqe from line 
C for line B is crueued. The buffer consists of eiqht units since 
phpstzf ^or line C is 800 bytes. The Destination Scheduler places the 
first unit of the messaoe in the preassiqned slot for destination line 
p . The scheduler then preassiqns a location for the first unit of the 
next messaqe for line P to record 9, the next available disk location. 
""he scheduler places the additional records (units) for the current 
messaqe secrment in disk locations 10 thrcuqh 16. Since this buffer 
does not contain an EOM indicator, the scheduler preassiqns the next- 
buffer location to record 17. 

T n ^iaure 30, the second buffer of the messaqe for line D is 
cru«»ued. This is a three-unit buffer with an EOM character in the last 
unit. The Destination Scheduler places the first unit in line D»s 
n^xt-bu^fer slot at record 8 and places the two additional records in 
the next available disk locations, records 18 and 19. No 
orsassianment for the next-buffer location is made because of the EOM 
character in this buffer. The scheduler preassiqned the next-message 
slot for line D to record 5 when the first buffer of this messaqe was 
crueued (see ^iqure 28) . 

Tn "f^iqure 31, the 30-byte messaqe from line A to line E is queued. 
since this messaqe is contained within a sinqle unit, only that unit 
has to be written on disk. The Destination Scheduler places this unit 
in the preassiqned next-messaqe location for destination B, record 9. 
No next-buffer location needs to be preassiqned, but the scheduler 
chancres the next-messaqe location for line B to disk record 20. The 
next available disk location is now record 21. 

^iaures 28 throuah 31 do not illustrate all the disk record 
pointers. However, Fiqure 32 shews the pointers mentioned above, as 
well as the pointers from each subsequent buffer of a messaqe to the 
f irst butfe r Q f the messaqe. These pointers are the base for the 
crueu a -back chain to be discussed next. 
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Oueue-back Chain: A queue-back chain is a time-sequential record of 
the sendinq and receivinq messaqe traffic for the terminal or 
terminals of a specific Destination OCB. TCAM maintains this chain 
for the messaqe retrieval function of application proqrams. A messaqe 
that has already been sent can be retrieved by source (input) or by 
destination (output) sequence number. 
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T «Then the last buffer of a messaqe is tpcsted to its Destination 
^C^, the Destination Scheduler uses the source destination offset in 
the buffer prefix (PBFSPCE) to qain access to the associated terminal 
^ntrv. The location of the Destination OCB for the sendinq (source) 
terminal is in this terminal entry. The scheduler then places the 
current Destination OCE queue-back chain pointer (QCBOEACK) in the 
text queue-back field in the buffer prefix (PHFTQECK) and places the 
disk relative record number (address) of the first unit of the last 
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buffer in the queues-back chain of the Destination QCB (QCEQBACK) for 
the source terminal. The presence cf an address for the last buffer 
of a messaqe in the queue-back chain of the Destination QCB indicates 
that the messaqe was sent from the terminal or terminals represented 
by that Destination QCB. 

An examination of the queue-back chain of a specific Destination 
OCB indicates exactly which messaqes were sent from or received by the 
related terminal or terminals. If the address value in the chain is 
for the first buffer of a messaqe, the messaqe was received by this 
terminal: if the address value is for the last buffer of a messaqe, 
the messaqe was sent by this terminal. Since the prefix cf a first 
buffer points to its subsequent buffer seqment (PBFNTXT) and the 
prefix of a subsequent buffer seqment. points to its first buffer 
(PF^CHDF) , the entire messaqe is available from the queue-back chain 
pointers. 

Note that, if a messaqe is only one buffer lonq, its address 
location qoes in both queue-back chains. 

*iqure 33 illustrates the queue-back chains for two Destination 
OCBs. ^he follcwinq messaqe sequence applies to this example: 

Messaqe 1 - sent from Station A to Station B 
Messaqe 2 - sent from Station B to Station A 
Messaqe 3 - sent from Station A to Station B 

Duplicate-Header Messaqes : When a messaqe is identical to a messaqe 
sent previously (as in multiple routinq) , it is called a duplicate- 

header messaqe. This condition is indicated by a flaq in 

bit U of the status field (PBFSTAT1) of the 30-byte buffer prefix. 
^he destination Scheduler handles a duplicate-header messaqe iust like 
any other messaqe except that no additional record locations and no 
next-buffer lccation are assiqned. The first unit of the first 
seqment of a duplicate-header messaqe contains the same pointers that 
are in the first unit of the first seqment cf the oriqinal messaqe. 
^CA"* modules use these pointers to obtain any additional units and 
buffers in the messaqe. 

^F^O Queuing : FEFO (f irst-ended-f irst-out) queuinq is used in sending 
messaqes from the messaqe queues data sets to destinations. This 
aueuinq allows TCAM to send the messaqes that end (EOT received) 
f irst, rather than the messaqes that beqin transmission first. 

Since the seqments of a messaqe cannot be kept in main storaqe 
until the messaqe completes, they must be queued (placed on the disk) 
as they are received. This results in a FIFO (first-in-first-out) 
messaqe queue. 
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r ahen the first-ended messaqe is to be sent and its first seqment 
is read from disk, the EEEO pointer is read from the data field of the 
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record and placed in the FFFO field of the SCB. When the first buffer 
is Dassed to the outqoina MH, the STAFTMH subtask updates the FEFO 
field in the Destination QCE. The "message serviced" flag (X'40M is 
written in the disk data field alonq with the FEFO pointer when the 
T, o m is successfully sent. 

'"he Destination OCB contains two FEFO pointers: the disk record 
address of the first FEFO message to send to the destination 
(OCBFFE^O) and the disk record address of the last message completely 
received (QCBLFFFO) . 

"igure 34 illustrates FEFO gueuing for five messages routed to the 
sa^e destination. Messaaes 1, 3, and 4 reguire two buffers, and 
messages 2 and 5 reauire one buffer. The first buffers of the 
messaaes arrive in the order in which the messages are numbered. The 
messages complete transmission in the following order: 2, 4, 3, 1 , 5. 

In this example, assume that the first buffers of messages 1 , 2, 
i , and 4 are already written on disk, message 2 is complete, and the 
first buffer of message 5 is currently being transmitted. The FEFO 
crueuing activity proceeds as follows: 

• Messaqe 2 is written out on the line. No FEFO pointers were 
written when message 2 completed because it was the first message 
f or the destination. 

* Message 4 completes being received. Message 2 is still sending. 
OCF^FFO and OCELFFFO are updated to pcirt to disk address 8 and 
no disk pointers are written for FEFO gueuing. 

• Message 3 completes being received. A IFFO pointer to message 3 
is written in the disk data field of the first unit of the first 
buffer of message 4. The Destination QCB field QCB1FEF0 is 
updated to point to disk address 7. 

* Message 2 completes being sent. Message 4 is to be sent out. 
when the first buffer of message 4 is sent to MH, its disk data 
field is used to update the OCPFFEFO field of the Destination QCB 
to point to disk record 7. 

• Message 1 completes beina received. A FEFO pointer to message 1 
is written in the disk data field cf the first buffer of message 
3. ^he Destination QCB field QCB1FFF0 if updated to point to disk 
address 1, the location of the first buffer of message 1. 

* Message 5 completes being received. A FEFO pointer to message 5 
is written in the disk data field of the first buffer of the last 
messaae received, message 1. The QCBLFEFO field is updated to 
disk address 10, the location of the first unit of the first 
buffer of message 5. 

» Message 4 completes beina sent. Message 3 is the next message to 
be sent. When the first buffer of message 3 is sent to MH, its 
*isk data field is used to update QCBFF1FO to point to message 1 
in disk location 1, the next message to be sent. 
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• Message 3 completes being sent. Messaqe 1 is the next message to 
be sent. When the first buffer of messaqe 1 is sent to MH, its 
disk data field is used to update QCBFFFFO to point to messaqe 5 
in disk location 10, the next messaqe to be sent. 

• M ess aqe 1 is completed and messaqe 5 is sent out. The QCBFFEEO 
pointer is cleared. 

Note that the "FEFO chain is, in many cases, incomplete. In the 
examnle there is no FEFO pointer from messaqe 2 to messaqe 4. If 
messages for a destination are always completely received after the 
previous messaqe has been sent out, no FFFC chain is built, 

^old Queues : When the FOLD macro is issued in the cutqcinq section of 
an *!H, a special hold queue is built for multidrop terminals on a line 
that is queued by line. 

When queuinq multidrop terminals by line, the messages for the 
different terminals are intermixed on the destination queue. The Send 
Scheduler uses the FEFO chain to read one "first buffer of a messaqe" 
after another. When a message for a held terminal is reached, it is 
placed in the held gueue chain. 

A. Dointer to the first held message is placed in the QCBTNTFF 
field of the Destination QCB. When the next held message is 
encountered, its address is placed in the data field of the first unit 
of the first buffer of the previous held message. This pointer 
overlays the FEFO pointer and is used when the messages are being 
released. 

This gueuing continues until a RELEASE command occurs. The 
messages are then sent in FE^O order by following the chain that was 
built for the hold queue. The hold gueue is merged into the FEFO 
chain by making the first held message for the QCE the first FEFO 
message and by making the last held message point to the message that 
was the first FEFC messaqe. 

Oueuinq by terminal must be specified for dial lines, and messaqes 
are not intermixed en a messaqe queue. In this case, only cne message 
is in the hold gueue, because the Send Scheduler determines that the 
terminal is held and does not reguest any mere messages. 

Reusable Disk Queuing 

Reusable disk gueuing uses a wrapped message gueues data set, on which 
serviced messaqes are overlaid by new messaqes enterinq the system. 

The Destination Scheduler activates the Feusability^Copy siibtask 
to keep the data set "cleaned up" to avoid losinq messaqes that have 
not been serviced. Message units are gueued until 3/8 of the data set 
is *ull . At this point, the Feusability-Copy subtask examines the 
next-message field in each Destination QCB for this data set. If any 
next-message field has a location value that falls within the scope of 
+ he first guarter of the data set, the subtask writes a dummy cancel 
message record at the specified next-message address and updates the 
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next-messaqe field in the OCB to the current address value at AVTB.ADDR 
in the AVT. This keeps new messaqes in fairly close proximity on the 

data set. 

T he Reusability-Copy subtask performs the next-messaqe update 
process each quarter of the way throuqh the data set from this point 
on. For example, after 5/8 of the data set has been assigned to 
units, the Reusability-Copy subtask compares the address values in the 
second quarter to the next-messaqe location specified in each 
destination OCB for this data set. 

^he Peusability-Copy subtask sends to the specified alternate 
destination any unserviced messaqes located in the quarter that 
Drecedes the part of the data set that is qettinq dummy cancel record 
messaqes. The subtask does this by readinq the old message from its 
current location and enqueuinq the messaqe to its alternate 
destination, thus causinq the iressaqe tc be written in the current 
zone of the data set. 

If a duplicate-header messaqe is more than a quarter of the data 
set away from the first unit cf the first seqment of the original 
messaqe, the Peusability-Copy subtask copies the entire messaqe. 

^he Reusability-Copy subtask qains control each time the address 
value reaches a zone boundary (the middle of a quarter) of the data 
set. The only exception is that the first time throuqh the data set, 
it is not activated until the address value is 3/8 of the way throuqh 

the data set. 

^iqure 35 illustrates the part of the disk messaqe queues data set 

that is issued cancel messaqes and the part in which messaqes are sent 

to alternate destinations when the address value is at a specific zone 

boundary. 
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M ain Storage Queuing 

"lain storage gueuing chains the actual main storage addresses of 
message units, rather than using relative record numbers. Once an 
entire message is gueued, all the fields in the buffer prefix look the 
same as in disk gueuing, except that the Destination Scheduler uses 
the additional units field (PSFXTEA) of the buffer prefix to hold the 
main storage address of this unit and the current record field 
(TspprPCD) to hold the disk address if disk backup is used. The 
scheduler uses the TIC field of the twelve-byte unit control area that 
precedes each unit to chain units together. 

Main storage gueuing does not assign locations ahead; rather, the 
destination OCE contains the address of the previous first-buffer 
segment and the SCB contains the address of the previous subseguent- 
buf^er segment. When the first segment of a message is received, the 
address of the previous first-buffer segment is inserted in the 
^stination OCE in the previous first-buffer field (QCBCPEHD) . When 
a message segment other than the first-buffer segment is received, its 
address is placed in the previous subseguent-buf f er field of the SCB. 

~he Destination Scheduler does not build a gueue-back chain for a 
main storage message gueues data set. 

Main Storaae Queuing with Disk Backup 

Tf the user specifies main storage gueuing with backup on either 
reusable or ncnreusable disk, the message segments are first gueued as 
^escri>>e^ under "Main Storage Queuing" and then the data is copied 
into buffers for the disk message gueues data set and gueued as 
described in the sections on disk gueuing. 

If the Destination Scheduler finds that the main storage message 
gueues data set does not contain enough free units to gueue a message, 
the scheduler gueues the message en disk cnly. Main storage gueuing 
resumes as soon as space is available. The CPB Initialization routine 
retrieves the messages gueued on disk iust as if they were placed in 
the main storage data set. 

Special Queuing Considerations 

Duplicate-Header Message that Spans Queue-Type: A duplicate header 
message that spans cueue-type is one that is tposted to a Destination 
OCR that is to be gueued in a manner other than that of the original 
message. p or example, the original message is directed to a 
Destination OCE that uses reusable disk gueuing and the duplicate- 
header message is directed to a Destination QCE that uses main storage 
queuing with no disk backup. 

If the entire message does not have to be .copied, the Destination 
Scheduler moves the Send Scheduler STCB to the STCB chain of the LCB 
(if it is not already there) to service the message. If the message 
has to be copied, the Eeusability-Copy subtask is activated. 



104 



destination QCB for Main Storage Queuing with Disk Backup : In this 
situation all recalls are from disk; therefore, the duplicate-header 
message is written on the disk data set only. 

*lain Storage Queuing when Units Pun Out : If a main storage message 
oueues data set fills up with data and there is a message segment unit 
to be gueued, the Destination Scheduler acts according to the type of 
unit being processed. If the unit is not the first unit of the first 
segment of a message, the scheduler gets the first segment of the 
message, flags the message lost, and frees all the queued units except 
the first one. 

If the unit to be gueued is the first unit of the first segment of 
a message and one unit is available in the data set, the scheduler 
gueues the unit and flags the message lost via a flag in that unit. 
If no unit is available or if the count of units in the main storage 
gueue exceeds or eguals MSMAX (specified en the TNTBO macro) in the 
data set, the scheduler queues the buffer unit that contains the first 
unit of the message into the data set, does not return a unit to the 
buffer unit pool in its place, and sets a flag to stop receiving 
activity. deceiving is resumed when enough messages have been sent to 
remove enough units f rem the message gueues data set to lower the 
number of units used to or below F1SMIN (specified on the INTFO macro) . 

Queuing Management Routines 

The disk and main storage queuing functions -just described are 
Derformed by the Destination Scheduler. The receive schedulers and 
the send schedulers handle the messages before and after the queuinq 
is performed. The TCAM Dispatcher activates each of these routines 
when its STCB has top priority in the STCB chain of an LCB. A send 
scheduler may also be activated frcm the STCB chain of a Destination 
OCB. 

At line open time, each LCB has an STCB for a receive scheduler 
built in it. This receive scheduler STCB starts in the third word of 
the LC*. This word is also the STCB pointer field. (See Figure 36.) 
^he hiqh-crder byte of the third word of the LCB is the activation key 

of the STCB. 

"Fverv Destination OCB has the same format reqardless of whether it 
represents an application proqram or a terminal. If the user 
indicates queuing by line, there is one Destination QCB per line; if 
queuing by terminal is specified, there is one Destination QCB per 
terminal. 

*!very Destination QCB has an STCB pointer in its third word, and 
after open time it points to the send scheduler STCB that starts in 
that same word. The link field of the send scheduler STCB is 
assembled to point to the STCB for the Destination Scheduler routine. 

"Figure 36 shows the pointers in an LCB and a Destination QCB after 
line open time. 
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36. Format of an LCB and a Destination QCB after Line Open 



^he Driorities of the receive scheduler STCB and of the send 
scheduler STCB are determined when the user specifies whether he wants 
send or receive priority for a line. When the send scheduler STCB is 
moved from the STCB chain of the Destination QCB to the STCB chain of 
the LCB, it is inserted in that chain by priority. 

when a buffer is tposted to a Destination QCB, the TCAM Dispatcher 
activates the subtask of the first STCB in the STCB chain. The first 
S^CB may be the one for the Send Scheduler or the one for the 
Destination Scheduler. If the Send Scheduler is in the chain, it 
bypasses control to the Destination Scheduler. 
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^"iqure 37 shows the pointers in an LCB and a Destination QCB 
send Priority after a full messaqe has been received. 



with 



An LCB is tposted to the ready queue when the line is free after 
an T/O operation has been completed. The QCB pointer in the first 
word of the LCB is set to point to the LCB itself, so that when the 
LC* is tposted to the ready queue, it functions as an BCE, a QCB, and 
an LCB. 
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The Destination Scheduler STCB is always the last member of the 
S^CB chain of a Destination QCB. Whenever a buffer is tposted to a 
Destination OCB, the Destination Scheduler eventually qains control to 
queue the buffer into the specified messaqe queues data set. 

^he purpose of the Destination Scheduler is threefold: 

^o chain the seqments of a messaqe toqether, 

• ^o chain messaqes related to a specific Destination QCE toqether, 

* To build a queue-back chain, where applicable, to allow the 
retrieve function to be performed. (There is no queue-back chain 
for main storaqe queuinq.) 

These functions can be performed with the messaqe seqments queued 
in main storaqe, on a direct-access storaqe device (disk), or in main 
storaqe with backup on reusable or nonreusable disk. 
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Di sk I/O Management Foutines 

The Destination Scheduler tposts the units of a buffer to the 
^isk I/O QCP after each unit has been assiqned an address value for 
the disk messaqe queues data set. When a full buffer is tposted to 
the Disk I/O QCB, the disk I/O manaqement routines are activated. 

functions- of CPB Initialization: CPB Initialization is the only 

subtask pointed tc by the STCP chain of the Disk I/O QCE. This module 
aains control when full buffers or EREs are tposted to the Disk I/O 
OCP or when the CPB Cleanup routine branches tc it, (The CPB Cleanup 
routine is actually a part of the CPB Initialization module.) 

^he t>rimary function of CPB Initialization is to build a CPB for 
the element that, was tposted to the Disk I/O QCB. Partial CCWs are 
built, for the CPB and the CPB is added in FIFO order to the input 
aueue f or the EXCP Driver routine. The CPB Initialization routine 
then branches to the EXCP Driver routine. 

When C^P Initialization oains control, it queues the element from 
the ready aueue onto its no-CPP queue in FIFO order. If the request 
is to flaq the messaqe serviced, the element is placed at the 
beqinnincr of the no-CPB queue. This is the queue of elements to be 
processed by this routine. CPB Initialization then proceeds to 
process the first element on the no-CPB queue. The routine processes 
each element on the aueue, in turn, until it either processes all the 
elements on the aueue or uses all the CPBs available from the CPB free 
pool. If, durinq the processinq of a buffer, the routine runs out of 
available CPBs, it returns the unprocessed part of the buffer to the 
first of the no-C^B queue and puts the processed portion on the EXCP 
Driver input queue. If the element beinq processed is an ERB, the 
above holds true only if no CPB is available. If one CPB is 
available, the routine processes that CPB, places the CPB that refers 
to the E^B en the EXCP Driver input queue, and removes the EBB from 
the no-CPB crueue. 

^hen the CPB Cleanup routine branches to CPB Initialization, it 
processes the r.c-CPB queue as described above and continues to place 
C°Bs on the ^XCP Driver input queue. When entered from the 
Dispatcher, the element can be either a buffer or an EBE. This 
element must be placed in FI^O order on the no-CPB queue so that 
processinq can start from the beqinninq of this queue. 

A buffer en the no-CPE aueue always causes the CPE Initialization 
routine to build a CCW tc read or write key and data for the unit, or 
to build a CCW to read or write data for the FE?0 pointer, and to fill 
in the address value representinq the record this unit of the buffer 
is to be associated with. ^he other activities of the routine depend 
on the characteristics of the buffer itself. 

• h .buffer to be put on disk. CPB Initialization chains each buffer 
unit to a CPB and tposts the unit of the CPB to the Buffer Return 
OCP to be put in the buffer unit pool. The routine then places 
the CPBs - one for each buffer unit - in FIFO order on the EXCP 
Driver input aueue. If this buffer is the last segment of the 
messaqe, the routine builds the FEFC pointer and places the 
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address of the first unit of the first fcuffer of the message in 
the EEEO chain. 

• * buffer of. a canceled message. If the messaqe is disk or disk- 
backup aueued, the CPB Initialization routine sets the cancel bit 
to be written in the data field of the record that contains the 
first buffer of the messaqe on disk, and places the CPBs for the 
data field and the buffer on the EXCP Driver input queue. 

• A buffer fcr a serviced last segment. If the messaqe main storage 
queued and not a duplicate-header messaqe, the CPB Initialization 
routine tr-osts all the units of the message to the Buffer Return 
OCB. If the message is main storage gueued and net the last 
duplicate-header message, the routine tposts the first unit to the 
Buffer "Return OCB and subtracts one frcm the count of duplicate- 
header messages. The EEEO pointer in the Destination QCB was 
updated when the first buffer started through MH. If the message 
is disk gueued, CPB Initialization sets the serviced bit to be 
written on disk. 

• A duplicate-header buffer. The CPB Tnitializaticn routine puts 
the CPB for the first unit on the EXCP Driver input queue and 
tposts the buffer to the QCB specified in its LCB. 

If an "EBB appears en the no-CPB gueue, the SCE has been 
initialized with the address of the record to be read. If the EBB is 
an initial reguest, only one record can be read. If an initial 
request EBB is for a main storage queued record, CPB Initialization 
determines whether the record is available and, if it is, branches to 
the CPB Cleanup routine (there is no I/O tc be executed) . Otherwise, 
the routine builds CPBs for as many disk records as the pointers in 
the last-read buffer allow, or until the requested buffers will be 
filled. 

Once the CPB Initialization routine has processed all the elements 
on the no-CPB queue or has used all the CPBs available from the CPB 
free pool, it branches to the EXCP Driver routine. 

functions of the EXCP-Driver Routine: The functions of the EXCP Driver 
routine are to complete the buildinq cf the CPBs, to chain them 
toqether, and tc issue EXCP commands to perform all disk I/O functions 
concerninq the disk messaqe queues. 

On the EXCP Driver input queue, each CPB contains the read or 
write CCW, the record number (address), a chaininq pointer to the next 
C^B, and a unit (filled in for a write only) . Before an I/O operation 
can occur, the disk extent and cylinder identification must be filled 
in and converted to MBBCCHHP format. The EXCP Driver routine issues 
a BAI to its MEECCHHP Convert subroutine, which uses values set during 
the open of this messaqe queues data set and the address value to 
calculate the MEBCCHHB value. The "M" or extent ID is an index to the 
block of consecutive IOPs, which, when multiplied by the size of an 
TOB and added to the address of the first IOB, points to the 
appropriate IOB and its queues. There is cne IOB per volume (or 
extent) . 
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"For a disk message queues data set, the IOB for each extent is 
extended to include an FXCP busy flaq r a "leek door" f lag, a "cc" 
identifier, a retry queue, and a new queue. An EXCP queue is located 

in the reqular TOE at IOESTAPT. 

•' The FXCP tusy flaq (IOBBUSYN) is set while T/O is being executed 

for its ICE. 

• T'he "lock door" flaq (IOBXLOCK) is set while enabled code is 
nutting CPBs en the retry queue. 

• The "cc" identifier (IOBXCC) is the cylinder number of the last 
group of CPEs put on the retry queue. This is the top priority 
cylinder for rew CPPs beinq put on the new queue. 

* The FXC^ queue (TOBSTABT) is the chain cf CPBs for the cylinder 
currently ready for I/O to be executed. 

« ^he retry queue (TOBXPETO) is the chain of CPEs for the cylinder 
that is to have I/O executed after the CPBs on the EXCP queue are 
processed. If I/O is beinq executed for the CPBs on the EXCP 
?ueue and a CPB arrives for the cylinder beinq read, the CPB is 
put at the end of the new queue. 

* The new queue (IOBXNEWO) is the chain of CPBs for all the other 
cylinders, in order from the next available cylinder after the 
retry queue tc the end of the data set, then startinq with the 
cylinder at the beqinninq of the data set aqain. 

^he "^TCP Driver routine processes the CPBs on its input queue one 
at a time in FIFO order. When a CPB is placed on its proper IOB 
crueue, the chaininq flaqs are set and the seek/search CCWs are built 
in the CPB as appropriate. If there is net a channel proqram in 
progress for this IOB, EXCP Driver issues an EXCP command to start 
one. 

After FXCP Driver has inserted all the CPBs on its input queue 
into an tob queue, it scans all the lOBs tc perform two functions: 

* T f there is not a channel proqram in prcqress for an IOB that has 
C^Bs to be processed, this module issues an EXCP command for that 

TCB. 

• If there are no CPBs on the retry queue and there are CPBs on the 
new queue, this module transfers the CPBs on the first cylinder to 
the retry queue. 

After all the above functions are completed, the EXCP Driver 
routine branches to the TCAM Dispatcher 

T 'unctions_.of . Disk End Appendage: When the channel finishes executing 
the I/O for a CCW chain, a Disk End Interrupt causes the Disk End 
Appendaae to gain control. The function cf Disk End Appendage is to 
dispose of the chain of CPBs iust processed. 
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Disk End Appendaqe enqueues the CPBs that are on the EXCP queue of 
the JOB onto the disk end queue. The appendage then tpcsts the CPE 
cleanup OCB to itself and puts it on the disabled ready queue (if it 
is not already tposted and on the ready queue) . This causes the CPB 
Cleanup routine to be activated to process the CPBs on the disk end 
aueue. 

Disk End Appendaqe then OS posts the TCAF ECB complete to indicate 
the completion of I/O activity. 

Disk End Appendaqe examines the retry queue cf the IOB. If the 
"lock door" flaq is set or if there are nc CPBs on the queue, the 
appendaqe returns to IOS with channel activity stopped. If there are 
CPBs on the retry queue, they are chained tc the EXCP queue; and the 
appendaqe returns to IOS to restart on the new CCWs. 

v unctions of CPB Cleanup: When the CPB Cleanup QCB that was tposted to 
itself by the Disk End Appendaqe qets to the top of the ready queue, 
the TCP Dispatcher activates the CPB Cleanup routine in the CPB 
Initialization module. The CPB Cleanup routine can also be activated 
when a buffer from the Buffer Return subtask is tposted to the CPB 
Cleanup OCB or by a branch from the CPB Initialization routine when a 
read operation was requested for a record that is queued in main 
storaae. 

The function of the CPB Cleanup routire is to free the CPBs for an 
T/0 operation that has been completed. If the routine is activated by 
the CPB Cleanup OCE tposted to itself, there are CPBs tc be handled 
from the disk end queue. The CPB Cleanup routine processes these CPBs 
as described telcw. 

If the C^B Cleanup routine is activated by a buffer on the ready 

aueue, there is a CPB(s) associated with the same ERB as this buffer 

on the no-buffer queue. The CPB (s) is found, put on the disk end 
queue, and then processed normally. 

The CPB Cleanup routine processes the CPBs from the disk end queue 
one at a time in FIEO order. If the CPB is from a write operation, 
the. routine returns the CPB to the CPB free pool. If the CPB is from 
a read operation, its unit ccntains qood data that has to be 
incorporated into a buffer. If a buffer is available from the buffer 
unit pool, the CPB Cleanup routine either chains the buffer off the 
chain field cf the ERE that was previously tposted to CPB 
T nitialization, or qives the buffer unit to the CPB and chains the CPB 
unit to the ERB. The routine transfers the data from the CPB to the 
proper unit of the buffer and returns the CPB to the CPB free pool. 
If a buffer is not available, the routine places the CPB on the no- 
buffer queue and places the ERB in the waitinq ERE chain of the Buffer 
Return QCB. 

After all the CPBs on the disk end queue have been processed, the 
C D B Cleanup routine branches to CPE Initialization. This branch 
ensures that EXCP Driver will qet control aqain to process CPBs that 
may still be waitinq on the retry queue. It also ensures that 
elements (ERBs cr buffers) that are waitinq for CPBs have another 
chance to be processed. 

Method of Operation 111 



Multiple Arm Support 

Multiple arm support for a disk messaqe queues data set ensures a 
spread of messaqe traffic over more than cne volume of the data set. 
^bis suPDort arises from the way the TOBs and EXCPs are confiqured and 
the way the records are numbered. (See Disk Queuing earlier in this 
section for a discussion of record numberinq.) 

When the data set is opened, an IOB is built for each volume. 
('"here is one extent fcr each volume.) This allows TCAM to issue 
several EXC D s, one per IOB or extent. Performance increases when IOS 
has several EXCPs to work on. 

If all the volumes of the data set are on one channel, maximum 
activity is not achieved, because when two requests for I/O are 
outstandinq, only one can be honored. There can only be an overlap of 
seek time. If the records are on different volumes that are on 
different channels, the I/O requests can be executed concurrently. 

Record numberinq on the disk data set is by cylinders. All the 
records of a qiven track are numbered consecutively before qcinq to a 
different volume. Also, all the tracks for a cylinder on a volume are 
numbered before qoinq to a different cylinder; therefore, all the I/O 
for a criven cylinder can be accomplished before enterinq the appendaqe 
to tell the I/C Supervisor (IOS) to seek another cylinder. At this 
point, a retry for other records for the same cylinder is executed if 
+ he CPBs on the retry queue are for this cylinder. This prevents 
movinq the disk arm. The channel enters as thouqh there is a fresh 
"^C* 5 . If a chanqe of cylinders is necessary, the channel lets another 
request f or I/C take control while the arm is movinq. 

Once a track of a cylinder on a qiven volume has been assiqned 
record numbers, a track of a cylinder on another volume is numbered 
with the next consecutive values of address. As a result, traffic is 
distributed across the volumes. 

^iqure 27 illustrates the record numberinq scheme for a data set 
that has four records per cylinder en three volumes. If three 
additional records of a messaqe fall toqether in record numbers 4, 5, 
and 6 of the volumes in Eiqure 27, they can be retrieved with one 
search and three reads. If the first unit is in record number 3, the 
searches for the entire messaqe can be overlapped. 

Multiple arm support is desiqned to qain access to the data with 
a sweep of the disk arm from the outside cylinder inward. This 
eliminates time-censuminq disk arm movement. 



SPECIAL MESSAGE HANDLING FUNCTIONS 

r -*old Eunction 

^he hold function may be activated by a HCLD macro in an outmessaqe 
subgroup; a terminal may be selected to be held if an attempt to 
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transmit a messaqe to it fails. Terminals usinq main-storaqe-only 
aueuinq cannot be held. Buffer Disposition activates the Hold/Release 
terminal routine, which sets the "held" bit in the appropriate entry 
in the Terminal Table. This prevents messaqes from beinq sent to the 
terminal. The messaqe in error for the terminal is placed on the 
held-FEFO chain in the Priority QCE. 

A terminal can be held at any time by Operator Control. In this 
case, no messaqe is placed in the held-FEEC chain, but the terminal is 
marked as held in the Terminal Table. 

Tf messaqes are beinq queued by terminal, the Destination QCB is 
marked as held. The Send Scheduler does net attempt to send messaqes 
to the specified destination, even thouqh messaqes are placed on the 
destination crueue. 

If messaqes are beinq queued by line, the appropriate terminal 
entry is marked as held by the Hold/Release Terminal routine or by 
Operator Control. The Send Scheduler attempts to send messaqes as 
usual, since it does not recoqnize that there is a held terminal on 
the line. When the Send Scheduler requests a messaqe destined for a 
held terminal, CPB Initialization removes the messaqe frcm the FEFO 
chain of messaqes and places it on the held-FEFO chain. 

when the terminal is released at the end of the specified time 
interval or by Operator Control, the Hold/Felease Terminal routine 
takes the held messaqes from the held-FEFO chain and places them at 
the head of the destination-FEFO chain, on a Priority QCB basis, and 
turns off the appropriate terminal entry "hold" bit. The Send 
Scheduler mav then transmit these messaqes normally. 

Cancel Message Function 

The cancel messaqe function allows the user to cause immediate 
cancellation of a messaqe if any of the errors specified in the error 
mask operand of a CANCEL- MG macro should occur. If the error mask is 
omitted or is specified as all zeros, the messaqe is canceled 
unconditionally. 

The error mask is examined in the inmessaqe subqroup. Tf the 
messaqe is tc be canceled, Buffer Disposition activates the Cancel 
Messaqe routine, which sets a flaq in the buffer prefix to notify the 
Destination Scheduler and the CPB Initialization routine to cancel the 
messaqe currently beinq received. 

Tf the inccminq messaqe is placed en the disk messaqe queue, it is 
not placed in the FEFO chain of messaqes. No attempt is made to send 
the messaqe. CPB Initialization cancels the messaqe by settinq the 
"canceled" bit in the data portion of the header field in the messaqe. 

Tf main-storaqe-qnly aueuinq is beinq used, the Destination 

Scheduler places the messaqe, flaqqed as canceled, on the FEFO chain 

of messaqes. No attempt is made to send the messaqe when it comes to 
the top of the queue. 
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Lock ^unction 

m he lock function allows the user to hold the line connection between 
a station and an application program. No incoming messages are 
accepted from any other station on the line while the station is in 
lock mode, and no messages other than the response message from the 
application orcaraio are sent to any station on the line. 

Lock mode is entered either unconditionally or when a message 
header containing a control character (or character string) is 
processed by a LOCK macro specifying that character. LOCK is not 
executed if the message destination is not an application program. 
(The destination is specified either in the message header cr by a 
^OPWAPD macro.) 

When a message is received from a terminal reguesting lock mode, 
the inheader subgroup examines the header tc determine whether or not 
LOC** is to be executed. When the Lock routine gets control, it sets 
a switch in the SCB and turns on the "lock" bit in the PFFSTAT1 field 
of the buffer prefix to indicate that the message is in lock mode. 
^he message buffer is then tposted normally to the application program 
npstination ' OCE. When the last message segment is received, it is 
processed through the FH r and the end-of-message buffer is tposted to 
the Buffer Disposition QCB. 

The buffer Disposition subtask performs normally, except that it 
does not free the line (does not tpost the LCB to itself) until a 
response has been issued. 

when the application program issues a GET macro for the message, 
the Get Scheduler examines the header prefix in the first buffer and 
finds the "lock" bit on. This causes the Get Scheduler to set flags 
that cause the Put Scheduler to treat the first message sent from the 
application program to the locked terminal as the response message. 

^he Put Scheduler completes the settina of the lock response flags 
and sends the message to the terminal destination gueue when the 
application program issues a PUT macro to send the response. 

When the Destination Scheduler gets control with the end-of- 
message buffer, it examines the destination LCB to see if it can be 
toosted: if so, it tposts the LCB to itself; if not, this indicates 
that the Buffer Disposition subtask is still processing, and that 
n uffer Disposition will tpost the LCB to itself. The Destination 
Scheduler then places the Send Scheduler STCB in the STCB chain of the 
destination LCB, whether or not it tposted the LCB to itself. 

If main-storage-only gueuing is being used, the Destination 

Scheduler places the address of the message header in the lock 

relative record number (QCBLKBBN) field of the Destination QCB. The 
message' is not placed on the OCB-FFFO chain. 

If disk gueuing is being used, the Destination Scheduler tposts 
the end-of-message buffer to CPB Initialization, which places the 
header address in the QCBLKFPN field of the Destination QCB. 
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Either the deceive Scheduler or the Send Scheduler gets control 
when the LCB comes to the top of the ready queue. The scheduler thus 
qettinq control examines the LCB to determine whether receiving or 
sending occurred most recently. The scheduler that was active most 
recently defers control to the other. In this case, the Send 
Scheduler will get control, since the most recent operation was a 
receive. The Send Scheduler will then send the message normally. 

After the message is completely sent, the end-of-message buffer is 
tposted to the Buffer Disposition OCB. If this was a message lock 
function, all indications of the lock have been removed by the 
destination Scheduler, and the line is handled normally. If this was 
a11 extended lock function. Buffer Disposition recognizes that lock 
mode is still in effect and that a message was lust sent, and tposts 
the LCB to itself. 

The Send Scheduler then regains control and passes control to the 
deceive Scheduler, which polls only the locked terminal. If the 
response is positive, the station is assumed to be in lock mode and 
messaqe processing begins for the new message. No FORWARD macro is 
required for succeeding messages, and the station remains in lock mode 
until an UNT.OCK macro is issued. 

Tnitiate Function 

^he initiate function is activated during inheader subgroup processing 
of a message. An INITIATE macro coded in the MH can select either 
conditional or unconditional execution by examination of a character 
strina in the message header. If the control character string in the 
message header matches the character string specified in the INITIATE 
macro, or if the character string is not coded in the INITIATE macro, 
the initiate function is executed. 

^he first buffer of the message is processed through the MH to its 
destination gueue, and the INITIATE macro is executed. The buffer is 
then tposted to the Destination QCB, and the Destination Scheduler 
gets control and gueues the buffer normally. When the first buffer is 
received, the source LCB is placed on the Destination QCE in-source 
fOCBTNSBC) chain. (The in-source chain is a chain of all source LCBs 
currently sending initiate mode messages to the destination terminal.) 

When the Send Scheduler starts to send the message, it recognizes 
the presence of initiate mode messages by the presence cf a source LCB 
in the Destination OCB in-source chain. The scheduler removes the 
source LCB from the Destination QCB in-source chain and places the 
address of the destination LCB in the in-source chain pointer in the 
source LCB. If the source LCB is still in the Destination QCB when 
the end-of-message buffer is received by the Destination Scheduler, 
the Destination Scheduler removes the LCB and causes the message to be 
Placed in the QCB-FEFO chain cf the highest* priority QCB. If 
transmission has already begun, the message is not placed in the FEFO 
chain. 

tfhen the LCB has been placed in the Destination QCE in-source 
chain and the destination line has become available, the Send 
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Scheduler qets the source LCB from the in-source chain, finds the 
source SCB (via the pointer in the LCB) , qets the address of the 
header, and initializes the destination SCE to send the message. The 
Send Scheduler beqins a normal sendinq operation and requests the 
number of buffers specified in the ECBBUEOU field in the destination 
line DCB for the iressaqe by tpostinq the EIRE to the Disk I/O QCB to 
activate CPB Initialization. 

T-p C^B Initialization has to wait for buffers at any point, it 
sets flaqs in the destination LCB indicatinq that it is waitinq for 
the next buffer of the messaqe. When the next buffer comes in from 
the source, the Destination Scheduler determines whether CPB 
Initialization is waitinq for buffers; if so, the ERB for the 
destination line is tposted to the Disk I/O QCB. When CPB 
Initialization has all the buffers it requires, it continues with 
normal processinq. 

No error checkinq is performed on input data in initiate mode; 
thus, the first error encountered will be the end of the message. The 
source station must enter a new messaqe to correct any errors. 



SUMMARY OF MESSAGE FLOW 

This section contains two charts that present an overview ot the flow 
of control for a messaqe passinq throuqh a TCAM system, 

Eoldout Chart 16 is for a receive operation. When a messaqe is 
entered at a terminal or from an application proqram, it is received, 
processed by the incominq qroup of the proper MH, and queued onto the 
messaqe aueues data set. 

Eoldout Chart 17 is for a send operation. When a line or 
application proqram is free to receive a messaqe, the messaqe is 
retrieved from the messaqe queues data set, processed by the outqoinq 
group of the proper MH, and sent to its destination. 

Details en each step of these two operations are included under 
the appropriate headinq in the previous parts of this Method of 
Operation section. 



CLOSEDOWN OE A MESSAGE CONTROL PROGRAM 

^UNCTIONS 0^ THE MCP CLOSEDOWN PROCESSING AND CLOSEDOWN COMPLETION 
ROUTINES 

Closedown of the TCAM network is initialized in one of four ways: 

1. An operator control HALT command issued from the system console. 

2. An operator control HALT command issued from a terminal. 
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3. fln MCPCLOSE macro issued in an application proqram. 

4. A nonreusable disk threshold reached (flush closedown) . 

In each of the four cases, the effect of the command is the sadie. 
The only difference is in the scurce from which the Operator Control 
task qains control to load the MCP Closedown Processinq routine. If 
the command is issued from the system console, the operatinq system 
posts the ECB fcr Operator Control. MH posts the ECB for Operator 
Control if the command is from a terminal. The application proqram 
tposts a CTB to the ready queue to cause the Dispatcher to post the 
ECB when an MCPCLCSE macro is issued. If the EXCP Driver (IGG019F.C) 
recoqnizes a ncnreusatle disk threshold, it passes a dummy CIB 
(defined at AVTBBESE) to the Operator Control task usinq the same 
interface as an application proqram. If TSO is active, the EXCP 
Driver first tranches to the TSO Abend Interface routine (IEDAYT) to 
allow TSO to end before closedown. 

Operator Control loads the MCP Closedown Processinq routine, which 
performs as described on foldout Chart 18. 



CLCSE ROUTINES 

When all messaqe traffic and TCAM disk operations have completed, 
control in the MCP returns to the first instruction follcwinq the 
^EADY macro. This must be the first instruction of a user-written 
routine to deactivate the MCP, and this deactivation section must 
issue CLOSE macro instructions for each of the data sets opened in the 
MCP. The data sets must be closed in the reverse order from which 
they were opened: first the line qroup data sets, then the checkpoint 
data set, and last the messaqe queues data sets. 

Eoldout Chart 19 illustrates the DCB closedown procedure. 



APPLICATION PKOGPAM PBCCESSING 

A TCBM application proqram is concerned with processinq the text 
portions of messaqes passinq throuqh a TCAM network. Application 
proqrams are written by the user to suit the needs of his particular 
application. 

Application proqrams run asynchronously with the MCP, usually in 
a different partition or reqion. 
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APPLICATION PFOGB3M INITIALIZATION AND TERMINATION 

Application Program - Initialization Functions 

Message transfer from a Destination QCE in the MCP tc an application 
program is controlled by a data control block (DCB) assembled in the 
application program area. If response messages are generated, 
transfer from the application program to a Destination QCE in the MCP 
is handled by a different DCB. The user defines, opens, and closes 
these DCBs in the application program. 

In an application program, a separate DCB is specified for each 

Destination OCB defined by a TPROCESS macro in the MCP. A DD 

statement must also be provided for each DCB tc associate the DCB with 
the appropriate Destination OCB. 

When an application program is assembled, a DCB macro causes 
allocation of main storage space for a DCB. Parameters are included 
based on the specifications of the operands of the macro. 

Activation of the interface between an application program and an 
MCP is accomplished when the application program issues an OPEN macro 
for each destination gueue. The Open Executor issues GETMAIN macros 
for both a DEE and an access method (ACSMETH) work area for each DCB 
in the applicaticn program area. The OPEN macro expansion activates 
first Load 1 (IGG01946) and then Load 2 (IGG01947) of the GET/PUT and 
READ/WRITE Open Executor. The functicns of these modules are 
summarized in fcldout Chart 20. 



Message Control Program - Initialization Functions 

Information necessary for communication between the MCP and an 
application program is assembled in a control area, a process control 
block (PCB) , defined by a PCB macro in the MCP, There must be one 
process control block for every active application program in the 
system. 

TPROCESS macros issued in the MCP define the Destination QCBs for 
applicaticn programs. At assembly time each TPROCESS macro creates a 
process Terminal Table entry for a gueue associated- with an 
application program. An operand of a TPRCCESS macrc specifies the PCB 
to be used with this particular queue. 

When the DCBs are opened in an application program, the Open 
Executor tposts a special element (RCB) tc the ready gueue in the MCP. 
This causes the Cpen/Close subtask to establish a process entry work 
area in the MCP. This area contains the Read-ahead QCB and the STCE 
for the Get Scheduler. The functions of the Open/Close subtask are 
summarized in fcldout Chart 20. 

^igure 38 illustrates the linkage among the various ccntrol blocks 
and work areas after the initialization of the MCP and an application 
program. 
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Application Proqram after Initialization 
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Application Program - Termination Functions 

A CLOSE DCB macro issued in an application proqram causes the 
application proqram Close Executor to qain control. The function of 
this module is to remove the data transfer communication link between 
an application prcgram and the MCP. 

Foldout Chart 21 illustrates the application proqram termination 
functions. 

Message Control Proqram - Termination Functions 

"•he deallocation of application proqram areas and routines in the MCP 
is performed by the Open/Close subtask when it is activated by the 
tpostinq of an element by the Close Executor in an application 
proqram. The close functions of this rcutine are summarized in 
foldout Chart 21. 



APPLICATION PBCGFAM INPUT/OUTPUT FUNCTIONS 

Input Functions of an Application Program 

The Get Scheduler routine performs a read-ahead function from the 
message gueue in the MCP in anticipation of GET/READ requests from an 
application urogram. 

The TCAM Dispatcher in the MCP passes control to the Get Scheduler 
when the STCB for the Get Scheduler is chained en either the Fead- 
ahead QCB or the Destination QCB for the application program. When 
the Get Scheduler STCB is waiting in the STCB chain of the Read-ahead 
OCB, the application proqram has been receivinq messaqes and is either 
ready to receive more full buffers or is ready to pass empty buffers 
back to the buffer unit pool. When the Get Scheduler STCB is waitinq 
in the STCB chain of a Destination QCB, it is waitinq for a full 
messaqe to be tposted to the application proqram, so that it can 
prepare to pass the buffers of that messaqe to the application 
proqram. 

Foldout Chart 22 summarizes the flow of control of the. Get 
Scheduler and the GET/BFAD routine as data is transferred from the MCP 
to an application proqram. 



Output Functions of an Application Proqram 

The PUT/WRITE routine in an application proqram initializes the access 
method work area with parameters so that the Put Scheduler in the MCP 
can actually move the data from the user application proqram work area 
to the MCP. 
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For a PUT operation, the PUT/WRITE routine refers to the DCB for 
parameter data; for a WPITE operation, the EECB and DCS are used. If 
locate mode is being used, the address of the work area is stored in 
the DEB; otherwise, it is specified by the user as an operand of the 
PUT or WPITE macro. 

After initializing the access method work area, the PUT/WRITE 
routine activates the Put Scheduler by ^posting a special element that 
contains the address of data in the user work area to the QCB for the 
Put Scheduler in the MCP and by posting the ECB for the MCP complete. 

If the application program is eliqible for a swap (TSO) , the 
PUT/WRITE routine requests the AQCTL SVC 102 routine to cause the 
application prcqram task to be flagged not eliqible for swap at this 
time. 

If the application proqram is eliqible for rollout (Pollout/Pollin 
feature) , the PUT/WRITE routine requests the AQCTL SVC 102 routine to 
cause the apDlication proqram to be flaqqed not eliqible for rollout 
at this time. 

In the situation in which the user specifies FUT or WPITE record 
without a control byte and with end-of-message indicated by issuinq a 
CLOSE macro, the Open routine for this particular line sets a flag to 
indicate this condition in the access methcd work area. After testinq 
this flaa durinq every PUT operation, the Put Scheduler is directed to 
save the last-filled buffer in the process entry work area, instead of 
tpostinq it to the MH . When the next PUT operation is activated, this 
saved buffer is the first one to be tposted to MH and a new last- 
filled buffer is saved. The CLOSE macro causes the saved buffer to be 
tposted to MH as a part of the cleanup procedures. 

Eoldout Chart 23 demonstrates the functional flow of the PUT/WHITE 
and the Put Scheduler routines. 



MESSAGE RETRIEVAL 

TCAM uses a combination of the POINT and the GET or PEAD macro 
instructions to support retrieval of messages from a disk messaqe 
queues data set. 

Before issuinq a POINT macro in 5 an application program, the user 
must build an eleven-byte field that contains the following 
information; 

• Bytes 0-7: the name of the terminal (lef t-adiusted and padded 
with blanks) for which the message to be retrieved is gueued. 

• Bytes 8-9: the two-byte input or output seguence number of the 
message to be retrieved. 
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• Byte 10: a character, T or 0, desiqnatinq an input or output 
messaqe that is queued by source (I) or by destination (0). 

After this data field is built, the user issues the POINT and the 
messaqe fcrin cf the GET cr READ macros; and the Point routine, the 
GET/READ routine, and the Get Scheduler perfcrm the retrieval 
procedure. 

When a POINT macro is in an application prcqram, at assembly time 
an eiqht-byte retrieve control block is built at GWAPTVE in the access 
method work area. The format of this centre! block is: 



Offset. 

o 



+4 



Reserved 



+1 



+3 



Message Sequence 
Number 



Message 
Type(l or O) 



Terminal Entry Address 





At proqram 


execution 


time, the 


POINT macro 


expansion calls 


the 


Point routine, wh 


ich starts 


the retrieval 


process 


by obtaininq 


the 


data 


necessary 


to complet 


e the fields 


; cf 


the retrieve control block. 


The 


Point routine 


qets the 


messaqe sequence 


number 


and type from 


the 


data 


field suppl 


ied by the 


user. The 


routine then 


i scans the Termname 


^abl 


e for the same name as 


that in the 


data 


field - 


• this provides 


the 


address of the ccrrespondinq Terminal 


Tabl 


e entry. 


The Point routine 


also 


sets a flaq 


(X f 04») in 


GWAOPTCD in 


the 


access 


method work area to 


indi 


cate that the 


application proqram is in 


retrieve mode. 





If, when the Point routine qains control, the first character of 
the user-supplied data field is a blank, there is no messaqe to be 
retrieved. In this case, the routine turns off the "retrieve" bit in 
GWAOPTCD. 



When a GET or READ macro is issued after a POINT macro, the 
GET/READ routine tests the "retrieve" bit (GWAOPTCD) to determine 
whether the proqram is in retrieve mode. (This test is performed only 
if the routine is at the end of processinq a complete messaqe.) If 
the proqram is in retrieve mode, the GET/READ routine builds a special 
retrieve element to be tposted to the Get Scheduler in the MCP. The 
format of this element is: 



Offset 

o 

+4 
+8 
+12 



+1 



Key 


Read-Ahead QCB Address 


Priority 
X '50' 


Link Field 


Message Sequence 
Number 


Message 
Type (1 or O) 


Termname 
Table Offset 


Termname 
Table Offset 


Terminal Entry Address of the source or 
destination of the message to be retrieved 
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The GET/BEAD routine uses AQCTL SVC 102 to place this element on 
the ready queue in the MCP, and then issues a WAIT to allow time for 
the specified messaqe buffer to be retrieved. 

The Get Scheduler qains control when the special retrieve element 

has the hiqhest priority of the elements cr the ready queue. The 

element is identified to the Get Scheduler as a retrieve element by 
the extremely lew X'SO 1 priority. 

If the EBEBUSY bit (X^O 1 ) is on in the process entry wcrk area 
field PEWAELG, the ERE for the Get Scheduler is currently tposted and 
therefore not available to obtain a buffer for the messaqe to be 
retieved. In this case, the Get Scheduler sets a flaq (X'OI 1 ) in 
PEWAELG to indicate that a retrieve element is waitinq to be 
processed. The scheduler then branches to the DSPDTSP entry point of 
the TCAM Dispatcher to allow time for the EBB to be serviced. 

When the Get Scheduler reqains control, it turns off the EBBBUSY 
bit, processes the EBB, and then tests the PEWAELG field for retrieve 
mode (X'OIM- If retrieve mode is indicated, the Get Scheduler turns 
off the flaq iust tested and continues processinq at the same point at 
which processinq beqins when the EBB is net busy. 

After the EBB is serviced and back en the Bead-ahead QCB, or if 
the EBB was not busy in the first place, the Get Scheduler moves the 
current read data from the SCB to the process entry work area in order 
to set up to read the queue-back chain of buffers from the disk 
messaqe queues data set. The scheduler gets the appropriate 
Destination QCB from the terminal entry pcinted to by the third word 
of the retrieve control block in the application proqram access method 
work area. The Get Scheduler then moves the queue-back pointer from 
the Destination QCB (QCEOBACK) to the SCB to identify the first disk 
record to be read. 

In the retrieve situation, the EBB in the process entry wcrk area 
is servinq as a "dummy" or partial LCB . The Get Scheduler sets the 
"recall" bit in the EBB (LCBBCLNN) , initializes the LCEEBBCT field to 
one to indicate that one buffer is to be read, and moves any buffers 
currently on the element chain of the Bead-ahead QCE to the link 
address chain of that QCB. At this point the SCB is set up to recall 
a buffer, and the EBB/LCB is partially complete. 

The Get Scheduler completes the EBB/LCE by movinq in the Bead- 
ahead QCB address, the GET/BEAD EBB priority of X'DO 1 , and the SCB 
address. The scheduler then sets the EBBEUSY flaq, and tposts the 
EBB/LCE to the Disk I/O QCB for the messaqe buffer to be read from the 
messaqe queues data set. 

When the messaqe buffer pcinted to by the queue-back chain in the 
Destination OCB has been read from disk, its EBB is tposted to the 
Bead-ahead QCB to reactivate the Get Scheduler. 
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When the Get Scheduler gains ccntrcl, it tests the "recall" bit 
(LCBRCLNN) in the ERB to determine whether this is a buffer of the 
messaqe desiqnated to be retrieved for the requesting application 
proqram. At this point, the Get Scheduler tests the message type 
field in the special retrieve element for I or 0, an input or an 
output messaqe. 

If an input messaqe is beinq retrieved, the Get Scheduler 
determines whether the buffer iust read is the first buffer of a 
messaqe by exairininq the PRFSTAT1 . field of the buffer prefix. If this 
field is equal tc X'01', it is the last buffer of a messaqe; 
otherwise, it is the first buffer. The activity of the Get Scheduler, 
at this point, depends on the status of this buffer. , 

• Input messaqe retrieval - first buffer of a messaqe. 

The Get Scheduler compares the input sequence number (PREISEQ) in 
the buffer to the sequence number in the special retrieve element. If 
a match is fcund, the scheduler tposts the buffer to the Read-ahead 
OCE, and tposts the application prcqram GET/READ ERE tack to the Read- 
ahead QCB to qet the rest of the buffers of the messaqe. When the 
last buffer of the messaqe is read, the "recall" bit at LCBRCLNN is 
turned off, the SCB is restored to its pre-retrieve status, the Read- 
ahead OCE is restored, and the scheduler resumes its reqular 
processinq. 

If the sequence numbers do not match, the Get Scheduler moves the 
text queue-back chain pointer of the buffer to the SCE (SCEDEOB) and 
tposts an ERB to read the next messaqe buffer on the input queue-back 
chain. If this is the first buffer read in the queue-back chain, the 
scheduler qets the text chain pointer from the buffer prefix field 
PR^TQECK. After that, PRETQBCK is obtained from the process entry 
work area at PES AVE + 12. 

• Input messaqe retrieval - last buffer of a messaqe 

If this is the last buffer of a messaqe, the Get Scheduler must 
qet the first buffer of the messaqe in order to compare the input 
sequence numbers. (The input sequence number for a messaqe is stored 
only in the prefix of the first buffer of the message.) The Get 
Scheduler first saves the text queue-back chain pointer (FRFTQECK) at 
PESAVE + 12 so that the chain can be searched in order if this is not 
the correct messaqe. The routine places the first-buffer pointer 
(PRFCHDR) in SCBDEOB and tpcsts an ERB to read the first buffer of the 
current messaqe. The Get Scheduler then exits to the DSFDISP entry 
point of the TCflM Dispatcher. 

The Get Scheduler reqains control when the first buffer of the 
messaqe has been read and continues processinq by testinq the LCBRCLNN 
bit and by exairininq the buffers as described in the precedinq 
paraqraphs. This loop continues until the specified messaqe is found. 

If an output messaqe is beinq retrieved- the Get Scheduler reads 
the PRFHQBCK chain until a buffer is found that has the ccrrespondinq 
output sequence number (PREOSEQ) . When the specified buffer is found, 
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the Get Scheduler tposts the buffer to the Bead-ahead QCE, posts the 
application proqram GET/BEAD ECE complete, and tposts the EBE back to 
the Bead-ahead CCE to get the rest of the buffers of this messaqe. 

When the last buffer of the messaqe is read r the Get Scheduler 
performs the same functions as described under Betrieval of an Input 

Messaqe. 

When the ECE cf the application proqram GET/BEAD routine is posted 
complete, the application proqram reqains control at the first 
instruction after which the WAIT macro was issued. At this point the 
GET/BEAD routine tests the return cede in reqister 15. If the return 
code has a nonzero value, the messaqe was not retrieved. If the 
return code is equal to X'OO', the messaqe has been retrieved. The 
application proqram uses reqular GET/BEAD loqic to obtain the rest of 
the buffers of the messaqe. After all the buffers are read, the 
proqram turns off the "retrieve" bit at GWAOPTCD in the access method 
work area. 



COMPATIBLE QTAM 

Compatible QTAM GET/PUT Support 

I... , i i <, 

When an application proqram was oriqinally assembled to run with a 
QTAM MCP and has been reassembled to run with a TCAM MCP, special GET 
and PUT routines are used. These compatibility versions cf GET and 
PUT contain the internal differences required to process QTAM DCEs. 
The basic loqic of the routine is the same as for the reqular GET and 
PUT routines. 

Items that the compatible GET and PUT routines must support are: 

• A buffer, or iressaqe seqment, is a wcrk unit. 

• The user must provide the work area prefix. 

• The name of the destination must be provided for the user. 

• A different format DCE is used. 

Compatible QTAK Messaqe Betrieval Support 

The Betrieve Service routine and the Betrieve Scheduler provide 
compatible OTAM support for messaqe retrieval. If there is a QTAM 
application proqram operatinq in the system, the Cpen/Close subtask 
loads the Betrieve Scheduler in the MCP. The Betrieve Service routine 
is called by a BETBIEVE macro expansion in the application proqram. 
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The primary difference between message retrieval in TCAM and in 
compatible OTAM is that in compatible QTAM cnly one buffer at a time 
is requested. Cne RETRIEVE macro must be issued for each buffer of 
the message, and the Retrieve Service routine reads the buffer 
information from the element chain of the Retrieve Scheduler QCB in 
the MCP. 



The RETRIEVE macro expansion puts certain message retrieval 
in input registers for the Retrieve Service routine: 



data 



Register - the address of the user work area, which contains the 
terminal name of the message destination. 



• Register 1 - for initial buffer retrieval, the output seguence 
number for destination retrieval or the input seguence number for 
source retrieval; for subsecuent buffer retrieval, the disk 
relative record address. 

The Retrieve Service routine uses a special non-register saving 
entry point of the User Interface routine (IEDQUI) to call the Binary 
Search routine (IEDQA1) to obtain the Termname Table entry offset for 
the destination terminal. The Retrieve Service routine then uses this 
data and the input register data to build a special retrieve element 
to be tposted to the Retrieve Scheduler QCB in the MCP. The format of 
this element is: 



Offset 

o 

+4 
+8 
+12 



+1 



Key 


Retrieve Scheduler QCB Address 


Priority 
X'D4' 


Link Address 


Element 
Type l,O,0 


Terminal Entry Address(lriitial Request) 
or Relative Record Address 
(Subsequent Request) 


Message Sequence 
Number 


Termname Table 
Offset 



If the buffer to be retrieved is the initial buffer of an input 
message, the Retrieve Service routine places the character I at offset 
+ 8. If the buffer is the initial buffer of an output message, the 
routine places the character at that offset. The value X'OO 1 in 
that field is for a subseguent buffer reguest. 

Once the special retrieve element is built, the Retrieve Service 
routine uses AQCTL SVC 102 to tpost the element to the Retrieve 
Scheduler QCB in the PCB of the MCF. The Retrieve Service routine 
then issues a WAIT macro to allow time for the buffer to be retrieved 
from the messaqe gueues data set. 



When the special retrieve element gets to the top of the MCP ready 
gueue, the Dispatcher activates the Retrieve Scheduler. The Retrieve 
Scheduler recoqnizes the special retrieve element by its X'DU' 
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priority. If the element type field (offset +8) is equal to zero, I, 
or 0, the scheduler issues a GETMAIN macro for main stcraqe for a 
special LCB and SCE to handle the retrieve function. Failure of the 
GETMAIN results in a return code of X'04' in the PCB (PCEOBC) , an ECB 
post complete, and an exit to the TCAM Dispatcher. 

If the GETMAIN is successful, the activity of the Retrieve 
Scheduler depends on the element type: 

• I or - The Retrieve Scheduler obtains the QCEQBACK pointer from 
the Destination QCE and places it in the SCB. The scheduler then 
tposts the ERE in the LCB to the Disk I/O QCB to read the buffer 
and exits tc the TCAM Dispatcher. 

• Zero - If the buffer to be retrieved is a subsequent buffer, the 
next-text pointer, the current seqment address, and the header 
buffer address are already in the PCB. The Retrieve Scheduler, at 
this point, sets a subsequent retrieve flaq in the PCE (PCBRETVN) 
and tposts an ERB for the next buffer of the messaqe. 

After the ERB reauest has been satisfied by the disk I/O routines, 

it is tposted back to the Retrieve Scheduler QCE. The scheduler 

recoqnizes the ERE by its X'DO 1 priority and knows that it now has 

either an error condition or a retrieved buffer to process. An error 
condition is handled as in reqular TCAM processinq. 

If the retrieved buffer is for an initial request, the Retrieve 
Scheduler processes it -just as the Get Scheduler processes a reqular 
TCAM retrieved buffer. The only difference is that the buffer for a 

compatible QTAM application proqram is placed on the element chain of 
the Retrieve Scheduler, not the Read-ahead, QCE. 

However, if the "subsequent retrieve" flaq (PCBRETVN) is set, the 
Retrieve Scheduler is handlinq a subsequent buffer retrieval and 
Derforms different functions. It places the next-text pointer of the 
buffer in the PCB, sets a completion code of X'OO 1 , puts the buffer on 
the element chain of the Retrieve Scheduler QCB, posts the application 
proqram Retrieve ECE complete, issues a EREEMAIN for the LCB and SCB, 
and exits to the TCAM Dispatcher. 

When the Retrieve ECB is posted complete, the Retrieve Service 
routine in the application proqram reqains control. At this point the 
routine tests the return code at PCBCRC. A nonzero return code 
indicates an error and is passed en to the user's code. Otherwise, 
the Retrieve Service routine uses the retrieved buffer to build a QTAM 
formatted buffer in the user work area. The routine then places a 
value of X'OI 1 in the element type field of the special element and 
tposts the element back to the Retrieve Scheduler QCE for buffer 
return processinq. 

The Retrieve Scheduler, upon findinq the X'01' element type value, 
tposts the processed buffer to the Buffer Return QCE. The scheduler 
then exits to the TCAM Dispatcher. 
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FUNCTIONS OF THE NETWORK CONTROL FACILITIES 

Interface with Operator Control 

The Operator Control/Application Proqram Interface routine allows the 
user to perform a subset of the TCAM operator control functions from 
an application proaram without actually issuinq a PUT for an operator 
control message. 

Foldout Chart 24 illustrates the way that this interface 
functions . 



Network Control with an Application Proqram 

Bv usinq the macro instructions TCOPY, ICCPY, or CCOPY, the user can 
examine the contents of a Terminal Table entry, an invitation list, or 
a Destination QCB , respectively. Using the macros TCHNG or ICHNG, he 
can modify the contents of a Terminal Table entry or an invitation 
list, respectively. 

The routines for TCOPY, TCHNG, and CCCPT? find the specified entry 
by locatinq and scanninq the Termname Table. The routine for ICOPY 
must find the TIOT and DCB to locate the LPNAME for the specified 
invitation list. An operator control routine (IEDQC1) handles the 
TCHNG function when the EDNAME and relative line number are supplied 
by the application proqram. 

If the user wishes to examine the specified entry, the network 
control routines read the entry directly into the application proqram 
work area. However, to write in the WCP partition to chanqe an entry, 
the AOCTL SVC 1C2 routine (IGC102) must be used. 

holdout Chart 25 illustrates the functional flow of application 
proqram network control. 



OPERATOR CCNTRCI 

The Operator Control facility provides a wide variety of functions 
that allow the user to alter or examine the status of the 
telecommunications network. Operator control commands can be entered 
from an Operator Control terminal, an application proqram, or the 
system console, and each operator control messaqe must be contained 
within a sinqle buffer. 

Initialization for usinq the Operator Control facility is 
accomplished throuqh the operands of the INTFO, TERMINAL, and TPROCESS 
macros. INTRO specifies the control characters to be used to identify 
a control messaqe and the specific terminal to be used as the primary 
control terminal. The TERMINAL and TPROCESS macros associated with 
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the terminals selected as Operator Control terminals have operands to 
indicate initial specification as secondary control terminals. The 
TPROCESS macro also specifies an alternate destination, because 
messaqes cannct be returned to an application proqram. The values are 
stored in the AVT. 

The Operator Control task is attached in the same partition as the 
MCP by the Attach routine (IEDQOS) durinq the execution of the INTRO 
initialization functions. The Pesident Operator Control module 
(TEDOCA) is the only module that is attached as a resident routine, 
unless the user specifies that some or all of the Operator Control 
processing routines are to be resident. The Operator Control task has 
the lowest priority of the tasks in the MCP partition. 

The Resident Operator Control module loads and activates Load of 
the Operator Control control module (IGCC010D). There are six loads 
(IGC0010D, IGC0110D, IGC0210C, IGC0310D, TGC0410D, and IGC0510D) of 
this control module. Each of these loads is transient, and all except 
Load are loaded by ether loads of the control irodule as needed to 
continue decodinq or processinq an operator control command. Load 
can be activated by OS, by IEDQCA, or by one of the other loads of the 
control module. 

The Operator Control task, in the form of Load of the control 
module, is activated when one of its two ECEs is posted. This allows 
Operator Control to vie with ether tasks to be activated by OS Job 
Manaqement. One ECB is defined in the TCAH AVT and the other in the 
OS Communications Parameter List. The Operator Control ECE is posted 
whenever an operator control command (messaqe) is issued. There are 
three basic types of operator control commands to be handled: 

• A standard operator command frcm an Operator Control terminal or 
an application proqram, 

• An operator control command from the system console, 

• A STAF.TLN, STCPIN, MBEIEASE, EELEASEM, ICHNG, MCPCICSE, or CLOSEMC 
command frcm an application prcqram. 

Each of these three situations is handled differently by the Operator 
Control task. 

Eoldout Chart 26 depicts the functional flow for processing an 
operator command. 

Processinq Standard Operator Contrcl Commands 

When an operator control command is entered frcm an Operator Control 
terminal or from an application proqram, it is handled just like any 
other incominq messaqe until it reaches the CODE macro expansion in 
the IUHDB subqroup. The CODE macro expansion first activates the 
Translate Buffer routine (IEDQAW) to translate the messaqe to EBCDIC. 
It then activates the Operator Control Interface routine (IEDQAQ) , 
which compares the acceptable operator contrcl characters in the AVT 
with the data field referred to by the scan pointer in the input 
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buffer. If th€ fields do not match, the buffer does not contain an 
operator contrcl command, so it is returned to the next instruction in 
the MH. If the characters match, the Operator Control Interface 
routine tposts the buffer to the Operator Ccntrol QCE (AVTOPCOB) by 
exiting to the DSPPOST entry point of the TCAM Dispatcher. 

The interface routine also checks to be sure that the command is 
complete in one buffer and that the command was entered by a valid 
secondary terminal. 

when the element (buffer) gets to the top of the ready gueue, the 
TCAM Dispatcher recognizes that it is tposted to a QCB that represents 
an attached task (the MCFL field of the STCB is equal to X'C^M- The 
TCAM Dispatcher, as a result, issues an CS POST to the ECB for that 
task. This ECB resides in the seccnd word of the QCE. The element 
that was on the ready gueue, in this case the operator control 
command, remains en the element chain of the Operator Contrcl QCB, and 
the Operator Ccntrol task can begin vying for control of the system. 

When the Operator Control task gains control, lead of the 
Operator Contrcl contrcl module is activated. The Operator Control 
control module first processes any commands that are waiting on a 
special CIB chain (see the following sections on Processing System 
Commands and Processing Special Application Program Commands). After 
these commands have been processed, the ccntrcl module examines the 
Operator Contrcl OCE. If there is a command on the element chain of 
the OCB, the ccntrol module links to the appropriate Operator Control 
routine to process that command. Upon the completion of the 
processing routine, it returns to the ccntrcl module. The control 
module builds the response message to overlay the original command, 
and returns the buffer to the MH. The buffer is tposted to the 
Destination QCB for the source of the command, unless it is a process 
entry, in which case the control module ttosts the buffer to the 
Destination OCE fcr the alternate destination. 

The control module then reexamines the special CIB chain and, if 
no commands have arrived, checks for another command en the Operator 
Control OCB. If there is another command present, it is processed as 
-just described. When all of the commands have been processed, the 
Operator Contrcl control module issues a multiple WAIT on its two ECBs 
to relinguish ccntrol to the operating system. If the closedown 
switch in the AVT for the MCP is on after all of the commands have 
been processed, the ccntrcl module issues a BETTJEN to OS, rather than 
issuing a WAIT command. A BETURN terminates processing by this task. 

Processing System Console Commands 

System console operator control commands are placed in a Command Input 
Buffer (CIB) and the CIB is chained off the seccnd word of the 
Communications Parameter List, which is pointed to from the AVT. When 
a command is issued at the system console, the TCAM Command Scheduler 
(SVC 34) places it in the CTE and posts the Operator Control ECB, 
which is pointed to by the first word of the Communications Parameter 
List. The Communications Parameter List is a two-word field in the OS 
Control Scheduling Control Block, and it has the following format: 
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Offset 


+4 



Address of Communications ECB 



Address of First CIB in the CIB Chain 
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After all the commands on the CIB chain and on the element chain 
of the Operator Control QCB have been process€d, the control module 
issues a multiple WATT on its two ECBs. However, if the MCP closedown 
switch is on, the control module dees not issue a WAIT, but terminates 
processinq of this task by issuinq a PETtJEN directly to the operatinq 
system. 



Processing Special Application Program Commands 
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When the CIB tposted to the Operator Control QCE reaches the top 
of the MCP ready gueue, the TCAM Dispatcher recognizes it as an 
element for an attached task. The TCAM Dispatcher acts exactly as it 
does when a standard command is on the ready gueue: it pests the ECB 
for the attached task so that the task can vie for ccntrcl of the 
system in order to process its element. 

When the Operator Control task gains control, it processes the CIB 
exactly as it does a regular messaqe en the Operator Control QCB, 
except that the response message built consists of the CIB with a 
return code added. Since the CIB is from an application program, the 
control module also posts the ECB for the application program 
complete. 
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Operator Control/Checkpoint Interface 

Each time an operator control command causes any change in the AVT, 
terminal Table, Option Table, LCE, or invitation lists, the Operator 
control task determines whether a checkpoint should be taken. If it 
should, the Operator Control control module tposts the "operator 
control checkpoint request" element to the Checkpoint CCE and issues 
a WAIT on the Operator Control ECE in the AVT. A checkpoint needs to 
be taken if the checkpoint data set was opened (nonzero value in 
AVTCKGET) . A checkpoint is needed for a change in invitation lists 
only if "I" was specified on the INTRO STARTUP operand. 

When the Checkpoint Executor gains control, it loads the Incident 
Checkpoint for Operator Control routine. The Incident Checkpoint for 
Operator Control routine moves control information for the command 
from the operator control work area to the incident checkpoint record. 
After the record is written on disk, the Checkpoint Executor posts the 
Operator Control ECB complete. 

At restart time the above process is reversed - the 
Checkpoint/Pestart from Incident and CKREQ Records routine (IGG01944) 
moves the control data from the incident record (except start/stop 
line records) to the operator control work area, posts the Operator 
Control ECB, and issues a WAIT macro. Operator Control examines the 
"ready complete" tit in the AVT, recognizes the restart situation, 
reprocesses the operator control command, and posts the Checkpoint ECB 
complete. 

Operator Control Processing Routines 



The functions of the operator control processing routines are 
explained under the description of each routine in the Program 
Organization section of this publication. 



CHECKPOINT 

The TCAM Checkpoint facility provides for records to be taken of the 
MCP environment from which restart can be made in the case of 
closedown or system failure. Records of individual data paths are 
maintained to preserve the integrity and continuity of message flow to 
and from a terminal (or component). Only the last message entered 
from or accepted at a buffered terminal may need to be resent to make 
sure no message is lost (for ncnbuffered terminals, at most one 
message per line may need to be resent) . Checkpoint records are 
maintained for all main storage gueues that have full copies on disk 
(if main-storage-only gueues are used, no checkpoints are taken of 
message gueues) . 

There are four types of checkpoint records: the control record, 
environment records, incident records, and CKREQ records. The control 
record contains information concerning the format of the checkpoint 
data set. Environment records are concerned with checkpoints for the 
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total operatinq environment; incident records and CKKEQ records are 
concerned with checkpoints of specific incidents durinq operation. 
The TCAM restart procedure uses the incident and CKFEQ records to 
update the TCAM environment from the time that it was recorded bv the 
most recent complete environment record tc the time of system 
closedown or failure. 

The Checkpoint Executor manaqes the routines that write checkpoint 
records. The Checkpoint Executor qains ccntrol when a checkpoint 
request element is placed on the ready queue in the MCP. 

The TCAM Dispatcher, upon findinq a checkpoint request element on 
the ready queue, chains the element off the element chain of the 
Checkpoint QCB in the AVT. The ECB for the Checkpoint subtask is then 
posted complete, and when an OS WAIT command is issued, the Checkpoint 
Executor can qain control. 

EUNCTION OE THE CHECKPOINT EXECUTCE 

The Checkpoint Executor causes all of the checkpoint request elements 
chained off the element chain of the Checkpcint QCB in the AVT to be 
processed. This routine continues processinq until all the elements 
are processed or until a task with a hiqher priority seizes control 
after an interruption. 

The Checkpcint Executor first examines the ECB for the Checkpoint 
Disk I/O routine to determine whether an I/O operation has been 
completed. If an I/O operation has been completed, the Executor 
transfers control to the Checkpcint Notification and Disposition 
routine. 

If an I/O operation has not been completed, the Checkpoint 
Executor examines the checkpoint disk I/O queue to see if there is a 
record ready tc be written. If there is a reccrd ready to be written, 
the Executor transfers control to the Checkpoint Disk I/O routine. 

If no I/O operation has been completed and there is not a record 
on the checkpoint disk I/O queue, the Checkpcint Executor examines the 
key field of the first "checkpoint request" element on the element 
chain of the Checkpoint OCB. The value of this key field determines 
which of the fcllowinq checkpoint routines will be loaded to process 
the element. 

The Environment Checkpoint routine 

The Incident Checkpoint for MH routine 

The Incident Checkpoint for TCHNG routine 

The Incident Checkpcint for Operator Ccntrcl routine 

The Build CKEEQ Disk Record routine 
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After a checkpoint routine has completed its processing, it 
returns to the Checkpoint Executor in one of two ways. The returning 
routine can indicate that the Checkpoint Executor is to continue 
processing as normal, or it can indicate that the Checkpoint Executor 
is to immediately load and activate the routine indicated by an offset 
value returned in register 15. 

The Checkpoint Executor determines the name of the routine to be 
loaded by using an offset into a table of names stored in the 
Checkpoint Executor module. 

Eoldout Chart 27 illustrates the functional flow of the checkpoint 
routines. The function of the Checkpoint Executor is not included 
since it is primarily a control module for the routines that build and 
write the checkpoint disk records. 



THE ENVIRONMENT CHECKPOINT ROUTINES 

Environment checkpoint records include disk gueuing pointers, seguence 
numbers, terminal status, invitation list status (if specified), DCB 
information, line status, and Terminal Table option fields. 
Checkpoints are taken on all information that can be altered by 
Operator Control commands or application program macros. 

Environment checkpoint records are taken at specific points during 
the execution of the MCP: 

• At the beginning of execution (from REAEY) . 

• When the incident checkpoint area is full. 

• At zone change-overs when using any reusable gueues. 

• After a user-specified time interval. When any total checkpoint 
is taken, the interval is reset for the time interval checkpoint. 

• During any MCP closedown. 

There are at least two environment records on disk; the number is 
provided by the user in an operand of INTRO. The records are used 
alternately and the control record contains an indication of the most 
recent environment record. 

The Environment Checkpoint routine gains control from the 
checkpoint Executor when the checkpoint reguest element was issued 
either by READY, by the Reusability-Copy subtask, by the Time Delay 
subtask, by an MCPCLOSE macro in an application program, or by a HALT 
command from the system console or a terminal. 

The Environment Checkpoint routine first issues a GETMAIN macro to 
obtain main storage space in which to build an environment checkpoint 
record. The routine builds one segment of the record in this area and 
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then returns tc the Checkpoint Executor with the offset of the 
Checkpoint Oueue Manager in reqister 15. This causes the Checkpoint 
Executor to immediately activate the Checkpoint Queue Manaqer. 

Tf the GETMATN issued by the Environment Checkpoint routine is not 
satisfied , the Environment Checkpoint routine returns to the 
Checkpoint Executor with the offset of the Checkpoint - No Available 
Core routine in reqister 15. The No Available Core routine first 
tests to determine whether any previous GETMAIN has been issued that 
is not yet free. Tf there is one , the routine returns to the 
Checkpoint Executor to allow time for that area to be freed. If there 
is not an outstanding GETMAIN area, the No Available Cere routine 
issues a WTO error messaqe to indicate the situation and turns on the 
hiqh-order bit of the "last element for which a disk record was built" 
field in the checkpoint work area. The No Available Cere routine then 
returns to the Checkpoint Executor with the offset for the Checkpoint 
Notification and Disposition routine in reqister 15. In this 
situation, the Checkpoint Notification and disposition routine removes 
this unsatisfied checkpoint request element from the Checkpoint QCB. 

The Checkpoint Oueue Manaqer is activated after an initial disk 
record has been built. This routine places a pointer to the record on 
the checkpoint disk I/O queue. If the record put on the checkpoint 
disk I/O queue is an environment checkpoint record, the Checkpoint 
Oueue Manaqer frees any incident records already en the checkpoint 
disk I/O queue and turns on the "incident overflow" bit in any 
incident checkpoint request element en the Checkpoint QCE. (When the 
last record of an environment checkpoint has been written en disk, the 
Checkpoint Notification and Disposition routine removes any element 
with its "incident overflow" bit en from the Checkpoint QCB, since its 
request was satisfied by the last environment checkpoint record.) The 
Checkpoint Queue Manaqer then returns to the Checkpoint Executor. 

T tfhen the Checkpoint Executor reqains control, it beqins execution 
by examininq the ECB of the Checkpoint Disk I/O routine. If a disk 
I/O operation has not been completed and there is a record on the 
checkpoint disk I/O oueue, control is passed to the Checkpoint Disk 
I/O routine. This routine takes the record off the checkpoint disk 
I/O queue, builds CCWs and an IOB, and issues an EXCP tc write the 
record on disk. The main storaqe address of the record is placed in 
the current-EXCP field in the checkpoint wcrk area. The Checkpoint 
Disk I/O routine then returns to the Checkpoint Executor. 

^hen the channel has finished writinq a record on disk, an I/O 
interruption qives contrcl to the Checkpoint Disk End Appendaqe. The 
Checkpoint Disk End Appendaqe examines the key field of the record 
iust written (found via the write CCW) and if the record was the last 
seqment of an environment checkpoint, rewrites the checkpoint control 
record. The checkpoint control record indicates the last complete 
environment checkpoint taken. An updated copy of the control record 
is in the checkpoint work area. The Checkpoint Disk End Appendaqe 
returns contrcl to the operatinq system. 
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If, upon reqaininq control, the Checkpoint Executor finds that a 
disk I/O operation has teen completed, it passes control to the 
Checkpoint Notification and Disposition routine. This routine 
examines the key field of the disk record iust written (found via the 
current-EXCP field of the checkpoint work area) . If the key field 
indicates that the record was the last record of an environment 
checkpoint operation, the routine frees the record area (via a 
^SEEMAIN macro), zeros the current-EXCP field, and turns off the 
checkpoint request bits in the AVT. If the environment checkpoint 
request is from the MCP Closedown Processinq routine, the Checkpoint 
Notification and Disposition routine tposts the "closedown completion 
request" element to the ready queue; otherwise, the Checkpoint 
Notification and Disposition routine removes the "environment 
checkpoint request" element from the Checkpoint QCE and tposts it to 
the time delay queue. If the checkpoint was not complete (not the 
last record) , the Checkpoint Notification and Disposition routine 
returns to the Checkpoint Executor with the offset for the Environment 
Checkpoint routine in reqister 15. 

Nhen the Environment Checkpoint routine builds a disk record, it 
saves data necessary to build subsequent records for the same 
checkpoint in the checkpoint work area. As a result, when the 
Notification and Disposition routine instructs the Checkpoint Executor 
to return control to the Environment Checkpoint routine, this routine 
can resume buildinq the next record. The address of the first record 
built is stored in the current-EXCP field of the checkpoint work area. 
^he Environment Checkpoint routine obtains this address and builds the 
new disk record over the old one. If the new record is the last 
seqment of the checkpoint, the key field indicator is set to XMC*. 
If the new record is a continued seqment, the key field indicator is 
set to X f 20*. This routine then returns to the Checkpoint Executor 
with the offset of the Checkpoint Disk I/O routine in reqister 15. 

Note that after the Environment Checkpoint routine builds the 
initial record of a checkpoint, it indicates that control is to be 
passed to the Checkpoint Queue Manaqer to have the record placed on 
the checkpoint disk I/O queue. Since each subsequent record of a 
checkpoint is built in the same main storaqe area as the first record, 
and since this main storaqe address is saved in the current-EXCP field 
of the checkpoint work area, the Checkpoint Disk I/O routine has all 
the information it needs to immediately issue an EXCP for a record. 
Subsequent records do not need to be placed on the checkpoint disk I/O 
queue. 

Eoldout Chart 2P illustrates the flew of control amonq the 
checkpoint routines as an environment checkpoint is taken. 



THE INCIDENT CHECKPOINT POOTINES 

Incident checkpoint records are taken as a result of MH macro 
instructions, application prcqram macros, and operator control modules 
that effect chanqes in the MCP environment. The records contain only 
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the data for that chanqe. Incident checkpoints record changes in 
terminal status, invitation lists (if specified) , Terminal Table 
option fields, pollinq intervals, the primary Operator Control 
terminal, and the TCAM Trace facility. 

There are three incident checkpoint routines. Each one qains 
control as a result of a specific macro or command havinq been issued 
in the TCAM system: 

• Incident Checkpoint for MH routine - qains control when functions 
of the CHECKPT macro are executed in an MCP. 

• Incident Checkpoint for TCHNG routine - qains control when a TCHNG 
macro is issued in an application proqram. 

• Incident Checkpoint for Operator Control routine - qains control 
when a VARY, MODIFY, HOLD, or RELEASE command is issued from the 
system console or from a terminal; or when an ICHNG or MRELEASE 
macro is issued in an application proqram. 

A count of the number of available incident checkpoint records on 
the disk is kept in the checkpoint work area. Each time one of the 
incident checkpoint routines builds a record, it subtracts one from 
the available incident disk records count. If the count is equal to 
zero when the incident routine is ready to decrement it, the incident 
routine immediately returns to the Checkpoint Executor with the offset 
to the Checkpoint - No Incident Records routine in reqister 15. 

The function of the No Incident Records routine is to cause an 
environment checkpoint to be taken so that the incident records area 
on the disk can be reused. The No Incident Records routine determines 
the status of the "environment checkpoint request" element by 
examininq its key field in the AVT. If the element is already on the 
Checkpoint QCE, it is moved to the "next request element to be 
serviced" position on the element chain of the QCB (a field in the 
checkpoint work area points to the last element for which a disk 
record has been built on the Checkpoint QCB) . if the "environment 
checkpoint request" element is net on the Checkpoint QCB, it is 
removed from the Time Delay OCB and placed in the "next element to be 
serviced" position in the element chain of the Checkpoint QCB. The No 
Incident Records routine then returns to the Checkpoint Executor so 
that it can, in normal processinq procedures, qive control to the 
Environment Checkpoint routine to service the element iust placed on 
the Checkpoint QCE. 

An LCB serves as a "checkpoint request" element for the MH. The 
LCB is placed on the ready queue by the Euffer Disposition subtask. 
The address of the Checkpoint QCB is in the last three bytes of the 
first word of the LCB, so the TCAM Dispatcher places the LCE, actinq 
as an "MH checkpoint request" element, en the element chain of the 
Checkpoint QCE. 

An "application proqram checkpoint request" element is physically 
located in the PCB for that application prcqram. The TCAM Dispatcher 
places a pointer to this checkpoint request element on the element 
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chain of the Checkpoint OCB after the Dispatcher gains control from 
the Application Prcqram/Checkpoint Interface routine. A code for the 
specific macro requestinq the checkpoint is in the key field of the 
element. 

An "operator control checkpoint request" element is physically 
located in the AVT. The TCAM Dispatcher places a pointer to this 
checkpoint request element on the element chain of the Checkpoint QCB 
after it qains control from an operator control routine. The key 
field of the element indicates whether the checkpoint was requested by 
an operator ccntrcl command. 

Incident Checkpoint for MH: The Incident Checkpoint for MH routine 
builds an incident checkpoint record in the buffer -just processed by 
the MH routines. The incident checkpoint record is then processed as 
described in The Environment Checkpoint Routines section with two 
exceptions: 

• The Checkpoint Disk I/O routine obtains the actual disk address 
for the record by examininq a field in the checkpoint work area 
that contains the track and record number of the last incident 
checkpoint record written on disk. 

• The Checkpoint Notification and Disposition routine frees the LCB 
by tpostinq it to the Buffer Disposition QCB for the Chain 
routine. 

Incident Checkpoint for TCHNG: The Incident Checkpoint for TCHNG 
routine issues a GETWATN macro for an area in which to build an 
incident checkpoint record. The incident checkpoint record is then 
processed as described in The Environment Checkpoint Routines section, 
with two exceptions: 

• The Checkpoint Disk I/O routine obtains the actual disk address 
for the record by examininq a field in the checkpoint work area 
that contains the track and record number of the last incident 
checkpoint record written on disk. 

• The Checkpoint Notification and Disposition routine must post the 
application proqram ECB complete. 

Incident Checkpoint for Operator Control: The Incident Checkpoint for 
Operator Control routine issues a GETMAIN macro for an area in which 
to build an incident checkpoint record. The incident checkpoint 
record is then processed as described in The Environment Checkpoint 
Routines section, with two exceptions: 

• The Checkpoint Disk I/O routine obtains the actual disk address 
for the record by examininq a field in the checkpoint work area 
that contains the track and record number of the last incident 
checkpoint record written on disk. 
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The Checkpoint Notification and Disposition routine must post the 
operator control task ECB complete. 
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THE CKREO CHECKPOINT ROUTINES 

CKREO checkpoint records are taken as a result of a CKREQ macro issued 
in an application proqram. There is cne record built for each open 
Destination OCB associated with the application program that is 
issuinq the CKREQ macro. The restart procedure uses each record 
durinq a restart to update the environment checkpoint records. 

The Build CKREO Disk Record routine issues a GETMAIN macro for an 
area in which to build a CKREQ record. The CKREQ record is then 
processed as described in The Environment Checkpoint Routines section, 
with three exceptions: 

• The Checkpoint Disk I/O routine obtains the actual disk address 
for the record by usinq from the checkpoint work area the table 
name offset that associates terminal name offsets with track and 
record number addresses. (There is cne CKREQ record on disk for 
each destination associated with the application proqram issuing 
a CKREO macro.) 

• If this checkpoint requires more than one disk record, the 
Notification and Disposition routine returns to the Checkpoint 
Executor with the offset of the Build CKREQ Disk Record routine, 
rather than the offset of the Environment Checkpoint routine, in 
reqister 15. 

■• The Checkpoint Notification and Disposition routine must post the 
application proqram ECB complete. 



ERROR RECOVERY PROCEDURES 



The TCAM error recovery procedures (ERPs) consist of fifteen modules 
that operate in the nucleus error transient area under the supervisor 
protection key. If the TCAM Line End Appendaqe (IGG019R0, IGG019Q2, 
TGG019O3, TGG019Q4 or IGG019Q5) detects an error status on a 
telecommunications device, it returns to the I/O Supervisor indicatinq 
that control is to be passed to ERP. The I/O Supervisor (ICS) qives 
control to either the Start/Stop ERP Control module (IGE0004G) or the 
BSC ERP Control module (IGE0004H) . The ERP control modules analyze 
the error and transfer control to another module to handle the error. 

The Start/Stop ERP Control module can link to any of the followinq 
ERP processinq modules: 

IGE010HG Bead/Write Unit Check and Unit Exception ERP Module 

IGE0204G Non-Operational Control Unit ERP Module 

IGE0304G Unit Check for Non-read, Ncn-write, and Non-poll CCWs 
ERP Module 

TGE0404G Auto Poll and Read Response to Poll Unit Check and 
Unit Exception ERP Module 
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IGE0504G Error Post and Second Level CCW Return Module 

IGE06 04G Unit Check and Unit Exception on Pead/Write CCWs for 
Audio and 2260 Local Devices ERP Module 

IGE0804G Start/Stop Channel Check ERF Module 

TGE0Q04G Closedown Terminal Statistics Recording Mcdule 

The BSC EPP Control module can directly activate any of the 
followinq EPP processinq mcdules: 

TGE0104H BSC Pead/Write Equipment Check, lest Data, 
Intervention Required, and Unit Exception ERP Module 

TGE0204H BSC Pead/Write Data Check, Cverrun, and Command Reject 
EPP Module 

IGE0404H ESC Second Level CCW Return Module 

TGE0504H ESC Error Post Module 

TGE080UH ESC Channel Check ERP Module 

TGE0204G Ncn-operational Control Unit EPP Module 

TGE0304G Unit Check for Non-read, Non-write, and Ncn-pcll CCWs 
ERP Module 

TGE0404G Auto Poll and Read Response to Poll Unit Check and 
Unit Exception ERP Module 

IGE090UG Closedown Terminal Statistics Recordinq Mcdule 

The Start/Stop Error Post and CCW Return module (IGE0504G) and the 
BSC Error Post module (TGE0504H) are activated by certain ERP 
processinq modules. 

In addition to the linkaqes illustrated in foldout Charts 29 and 
30, each module may exit usinq the followinq SVC sequence: 

SVC 15 Error EXCP 

SVC 3 Return - free the transient area 

When the SVC 15 is issued, IOS acts accordinq to the flaq settinq in 

LCBELAG1: 

X»24 f - Petry by IOS and return control directly to ERP after the 

interrupt 

X f 04 f - Transfer control to the abnormal line end appendaqe 

X'00* - Transfer ccntrcl to the normal line end appendage 

Tn TCAM, both the normal and abnormal line end appendaqe addresses 
point to IGG019R0, IGG019Q2, IGG019Q3, or IGG019QU. 

140 



Linkaqe between the modules is performed by IOS throuqh the XCTL 
routine with a branch on reqister 14. The last four diqits of the 
module name are placed in reqister 13, and the address cf the XCTL 
routine is placed in reqister 14. The linkaqe between the start-stop 
modules is shown in foldout Chart 29 and linkaqe between the ESC 
modules is shewn in foldout Chart 30. 

There is a description of each of the FFP modules in the Proqram 
Orqanization section of this publication. The descriptions explain 
the action taken accordinq to the different types of commands. 

Generally, if there has been no text transfer, the channel proqram 
is retried. If there is an error after two retries for start-stop or 
six retries for BSC, the error is considered permanent. In the case 
of a permanent error, a messaqe is either written to the system 
console or scheduled to be sent to the Cperator Control terminal. 

For conditions that should not happen, the "should not occur" bit 
(bit 7) is set in the SCE. This condition is considered to be a 
permanent error. 

When there has been an error en a Read Response to Auto Poll, the 
invitation list address and entry size are obtained. The invitation 
list is searched for an equal comparison on the index byte. If no 
match is found, the channel proqram is restarted with the existinq 
Poll CCW. If there is an equal comparison, the address of the 
matchinq entry is used, and the count is set to the new count plus the 
initial address minus the address of the matching entry. 

When there is an error on the Poll CCW, the pollinq list address 
and entry size are obtained. The count is set to the residual count 
plus the width of the poll characters. The data address is the poll 
list address and oriqinal count minus the new count. 



MESSAGE HANDLING WITH TIME SHARING CPTICN SUPPORT 

TSO Line Management Support 

In order to implement line manaqement in TSO support, TCAM uses its 
Receive and Send Schedulers. When a scheduler is dealinq with a 
terminal that is dedicated to a time sharinq session, the scheduler 
branches to a TSO routine (the Time Sharinq Scheduler), which performs 
special checkinq functions. 

If a receive interrupt has iust occurred en input, the Time 
Sharinq Scheduler tposts the LCE to the TSO Attention routine. No 
input operation is initiated if there are insufficient TSC buffers or 
when there is output to send. If the terminal in question does not 
have the transmit interrupt feature, no read channel prcqram is built 
until after a GET has been issued from the TSO foreqreund proqram; 
otherwise, the Receive Scheduler performs a read-ahead operation. If 
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no input operation is to be initiated, the scheduler determines 
whether to start a simulated attention channel program or to place the 
OCE in the time delay queue for a simulated attention by time 
interval. If no other I/O is to be started on the line and the 
terminal has the receive interrupt feature, the scheduler places a 
prepare on the line to monitor for receive interrupts (attentions) . 

The Send Scheduler is activated and an output operation is 
initiated when the TPUT SVC tposts the Destination CCE to itself on 
the disabled ready queue. The Send Scheduler branches to the Time 
Sharinq Scheduler, which determines whether a TPOT with the break 
option is requested. If so and if an input operation is in proqress 
on a terminal with the transmit interrupt feature, the Time Sharing 
Scheduler halts the I/O operation. When the interrupt occurs, the 
Line End Appendage builds a break CCW to step terminal transmission. 
When the Send Scheduler is dispatched from the ICE, the Time Sharing 
Scheduler determines whether a simulation attention or a read 
operation has priority over output. If so, the Time Sharinq Scheduler 
takes steps to initiate the appropriate operation, For a send 
operation, the Send Scheduler tposts the ERE to the TSOOTPUT routine, 
which moves the data from the TSO buffer in the TSO partition into the 
TCAM buffers in the TCAM region. 

When the TCAM Activate subtask qains ccntrol, it also branches to 
the Time Sharinq Scheduler. This module, in turn, determines whether 
a receive interrupt has occurred or an output operation has been 
requested. If a receive interrupt has occurred, the Time Sharinq 
Scheduler frees the buffers that were acquired for input, tposts the 
LCB to the TSC Attention routine, and exits to the Dispatcher. If an 
output operation has been requested, the Time Sharinq Scheduler frees 
the buffers, trcsts the ICE to itself, and exits to the Dispatcher. 
If there is a prepare on the line to monitor for a receive interrupt, 
the Time Sharinq Scheduler issues a TCAM HAIT I/O. The scheduler then 
returns to Activate. 

The TCAM line End Appendaqe supports recoqnizinq receive 
interrupts, issuinq transmit interrupts, recoqnizinq hangups on a dial 
line, and identifying 2741s and 1050s on the same line. The Line End 
Appendaqe handles a neqative poll response on a leased line by 
branchinq to the Time Sharinq Scheduler. 

when a line that is dedicated to a time-sharinq session is to be 
freed, the QEVENT routine branches to the Time Sharinq Scheduler to 
place a prepare on the line to monitor for receive interrupts to 
terminals with the receive interrupt feature. 

TSO BUFFER MANAGEMENT SUPPORT 

Each TSO buffer has a 21-byte buffer prefix. Line buffering is the 
same as in TCAM, except that for a send operation the Send Scheduler 
tposts the ERE to the TSOUTPUT routine, not to CPB Initialization. 
The TSOUTPUT routine builds TCAM buffers and moves data from the TSO 
buffers in the TSO reqicn into the TCAM buffers in the TCAM region. 
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There is a special STARTMH subtask for TSC support in TCAM. This 
subtask performs the same types of furctions as the regular TCAM 
STARTMH subtask. In addition, it does net set aside any reserve 
characters in buffers supporting time-sharinq sessions. If a buffer 
with data for a main storaqe or disk messaqe queues data set is routed 
to a TSO MH, the STARTMH subtask routes the messaqe to a different MH, 
if one is specified; otherwise, the subtask cancels the messaqe. 

The TSO Loqcn routine, as called from the INHDR subqroup of a TSO 
MH, scans the first buffer for a time-sharinq session tc determine 
whether to initialize for the session. If not, the buffer is routed 
to another MH, if specified, or canceled. 

The TSO Carriaqe routine, as called from the TNBUE subqroup of a 
TSO MH, keeps track of the carriaqe positicr. of the enterinq terminal 
and removes line control characters from the incominq messaqe. The 
TSO Simulated Attention routine scans the input buffers for a 
simulated character strinq, if this function is requested. 

In the INMSG and OUTMSG subqroups of a TSO MH, the TSO Attention 
routine processes receive interrupts. The TSO Hanqup routine 
determines actiens based on hardware errors. 

The Buffer Disposition subtask tposts incominq TSO buffers to the 
OCB of the TSINPUT routine, as opposed to the Disk I/O QCE. 

TSO QUEUE MANAGEMENT SUPPORT 

In a TCAM MCP, the TSO queuinq and destination assiqnment functions 
are handled by the TSINPUT and TSOUTPUT routines. For an incominq 
messaqe. Buffer Disposition tposts the line buffers to the TSINPUT 
routine. The TSINPUT routine uses the QTIP SVC to move data from TCAM 
buffers in the TCAM reqion to TSO buffers in the TSO reqion. The 
routine then frees the TCAM buffers by tpostinq them to the Buffer 
Return OCB. When the TSINPUT' routine qets the last buffer of a 
messaqe, it flaqs complete all the TSO buffers associated with this 
messaqe. If a CANCELMG macro has been executed, the TSO buffers are 
freed. 

When a TSC foreqround proqram issues a GET macro, the TGET SVC 
moves data into the proqram work area. An input editinq routine 
performs any data editinq that is requested on operands of the GET 
macro. 

"For an cutqeinq messaqe, the TSO fereqreund proqram issues a PUT 
macro, which causes the TPUT SVC to move data from the program work 
area into TSC buffers. If no output operation to the terminal is in 
proqress, the TPUT routine also disables itself and tposts the 
Destination QCE to itself on the disabled ready queue. When the Send 
Scheduler is ultimately dispatched off the ICB, it tposts the ERB to 
the TSOUTPUT routine. The TSOUTPUT routine obtains TCAM buffers and 
moves the data from the TSO buffers in the TSO reqion into the TCAM 
buffers in the TCAM reqion. The Send Scheduler uses the TSO TTOC Edit 
routine to perform any editinq functions requested by operands of the 
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^UT macro in the TSO foreground prcqram. When the last buffer of the 
messaqe has been sent, Buffer Disposition tposts the buffer back to 
the TSOUTPUT routine, which frees the associated TSO buffers. 

TSO MCP CLOSEDOWN PROCESSING SUPPORT 

If a TSO program is usinq TCAM for terminal support, all TCAM requests 

for closedown are iqnored until TSO is no lonqer operatinq in the 

system. This is done because TSO is not desiqned to continue 
processinq after TCAM is closed down. 
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SECTION 3. PROGRAM ORGANIZATION 



SYSTEM SEKVTCE ROUTINE 

Disk Message Queue Initializer (Chart XA) 

Module Name; IEECXA 

Entry Point: TEDQXA 

Function: This routine is a utility prcqram used to build a formatted 
disk data set. The data set can then be used by a TCAM MCP to contain 
either a reusable or nonreusable disk message queues data set. Before 
a TCAM MCP is loaded into the system, the Disk Message Queue 
Initializer must be run as a separate lot step for every disk messaqe 
queues data set specified in the MCP. 

Input to this routine is supplied by the Job Ccntrcl Lanquage 
(JCL) parameters for executinq the iob step. Sample JCL for the Disk 
Messaqe Oueue Initializer is as follows: 

//iobname JOB 

//stepname EXEC PGM=IEDQXA 

//SYSPKINT DD SYSCUT= A, SPACE= (TRK , (1 , 1) ) 

//IEDQDATA CD ESN AME=anyname r DISP= ( ,C ATLG) , * 

// SPACE=(CYL, (n,n) , ,CCNTIG) , * 

// UHIT=(23xx,y) , * 

// VOLUME=SEP=(aaaaaa r ttbbbb r . . .) , * 

// DCB=( r KEYlEN=mm) 

The variables are defined as fellows: 

anyname - the user selects a name for the data set. 

This same name is used in the JCL for a TCAM -job 
to define the use of this data set. 

n - the number of cylinders must be the same for 
all extents. Primary and secondary alloca- 
tions must be identical, and allocation must 
be by cylinders. 

xx - 1t or 14. Any one data set must have all extents 
on one type of disk. 

y - 1 to 16. The total number of volume serial numbers 
listed in the "VOLUME" parameter. 

aaaaaa,bbbbbb, . . . - each volume serial number of each volume 
to contain an extent of the data set. There is 
one extent per volume, with a maximum of 16 
volumes. 
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mm - the size of the key portion of the disk data records 
to be written. The maximum key size is 255 bytes; 
the minimum is 33. "mm" is the same value as the 
"unit" size specified in the "KEYIEN" keyword of 
an MCP INTRO macro. The data field lenqth is an 
internally fixed constant of 6 bytes. This is 
added to the "KEYLEN" value to obtain "BLKSIZE". 

The two required DD cards define the two output data sets. The 
SYSPRINT data set contains a copy of typewriter messages, and has the 
attributes of DCB= (RECFM=U,ELKSIZE=80) . This data set may be 
suppressed by specifyinq //SYSPRTNT DD DUMMY. 

The IEDODATA data set is the new data set to be created as a TCAM 
message queue. The reguired keywords are shown in the sample JCL 
above. 

The execution of the Disk Message Queue Initializer is in two 
phases: the open and verification phase, and the formatting phase. 

During the open and verification phase, the Disk Message Queue 
Initializer checks the JCL variables to determine whether they are 
defined according to specifications. If any exception is found, the 
routine terminates with a diagnostic statement defining the problem. 
Messages that can be generated for the SYSPRINT data set and the 
system console are as follows: 

• "IED066I UNAEIE TO OPEN SYSPBINT" - Return code 20. A SYSPRINT DD 
card must b€ present. (Console only.) 

• "TED067I TCAM INITIALIZATION BEGUN" - The SYSPRINT data set is 
opened. Processing continues. 

• "TED068I UNABLE TO OPEN IEDQDATA" - Return code 20. An IEDQDATA 
DD card must be present. 

• "TED069I INVALID KEYLEN FOR IEDQDATA" - Return code 8. The KEYLEN 
parameter is either missing or not within acceptable limits. 

• "IED070I IEDQDATA DOES NOT SPECIFY CCNTIG SPACE IN CYLINDERS" 
Return code 16. SPACE must specify CYL and CONTIG. 

• "IED071I UNEQUAL PRIMARY AND SECONDARY EXTENTS ON IEDQDATA" - 
Return code 16. Primary and secondary extents sizes must be 
identical. 

In the formatting phase of the routine there is a loop built 
around a WRITE macro that writes a zero-filled record on the disk. 
Each formatted record contains count, key, and data fields. The count 
field has a CCHHR absolute address; the key and data fields are areas 
to receive TCAM message header and text information. 
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after the routine fills the extent of a volume with records, it 
checks the field that indicates the number of specified volumes to 
determine if that was the last volume to be filled. If it is not the 
last volume, the routine issues an FEOV macro to cause secondary 
allocation tc be made from the next volume in the list; in this way, 
each volume has only one extent. After the routine formats the last 
volume, it issues a successful return to OS Job Management. 



At the end of each volume the initializer issues a statement to 
the SYSPRINT data set and to the system console. This statement 
contains the total record count from the beqinninq of the data set 
throuqh the volume lust completed. The number of these statements is 
the number of extents (or volumes) successfully formatted. 

Messaqes that can be qenerated durinq the second phase of 
execution are as follows: 

• "IED072I I/C ERROR ON IEDQDATA" - -Return code 12. Unable to 
recover frcm a disk I/O error en the disk messaqe queues data set. 

• "IEB073T I/O ERROR ON SYSPRINT" - Return code 4. (Console only.) 
Unable to recover from an I/O error on the SYSPRINT data set. 

• "TED074I TCAM INITIALISATION COMPUTE" - Return code 0. 
Successful completion. 

• "IED075I END OF EXTENT. RECORD COUNT IS number" - The total 
record count up throuqh the current extent. This statement 
appears at the end of fcrmattinq each vclume. The final count is 
for the entire data set. 

External Routines ; 

SVC 64 - reads JFCB of the IEDQDATA data set for JCL verification. 

BSAM - writes dummy records to the disk usinq WRITE, CHECK, OPEN, 
CLOSE, and DCE macros. 

OS WTO routine (SVC 35) - handles output to the system console. 

OS Getmain routine (SVC 4) - obtains main storaqe for a buffer 
work area. 

OS Freemain routine (SVC 5) - frees main storaqe. 

SVC 31 - shifts from one volume to another. 

Tables/Work Areas: The JFCE is read into a local constant area. The 
output buffer is a GETMAIN area initialized tc zero. 

Attributes: Reusable. 
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INITIALIZATION ROUTINES 

Link Routine (Chart OA) 

Module Name: IEDCCA 

Entry Point: IEDGOA - called by the INTRO iracro expansion. 

Function: This routine controls the transient routines that perform 
initialization processinq at INTRO execution time. 

The Link routine issues a" LINK to load and activate first the WTOR 
Interpreter routine, then the Password Scrambler routine, then the 
INTPO GERMAIN routine, then the Termname Table Sort routine, and last 
the Attach routine. Upon return from the WTOR Interpreter, the INTRO 
GETMAIN routine, and the Sort routine, the link routine examines a 
return code in reqister 15 to determine whether the returninq routine 
was successfully completed. If the return code is equal to zero, the 
Link routine links to the next initializaticn routine or, if all five 
routines have been executed, it returns to the INTRO macro expansion. 
If the return code is nonzero, the Link routine passes it tc INTRO in 
reqister 15 and sends a diaqnostic messaqe to the system console, 
^he format of this messaqe is as fcllcws: 

"IED065I INITIALIZATION ERROR xxxx", where xxxx is the value that 
TN^RO passes in reqister 15. 

External Routines: 



• OS Link routine (SVC 6) - to activate the followinq modules: 

TEDOOB - WTOR Interpreter routine - to alter certain INTRO 
parameters. 

TED0E6 - Password Scrambler routine - to scramble the MCP 
password. 

TEDOOG - INTRO GETMAIN routine - to acquire main storaqe for 
buffers and tables. 

IEDOOM - Termname Table Sort routine - to sort the Termname Table. 

TEDQOS - Attach routine - to attach On-line Test, FE Common Write, 
and Operator Control. 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

Tables/Work Areas: This routine passes the address of the AVT to each 
external routine. 

Attributes: Reusable, transient, problem proqram mode. 
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WTOR Interpreter Routine (Chart OB) 
Module Name: IEDQOE 

Entry Point : IEDQOB - called throuqh a LINK SVC by the link routine 

(TEDOOA) . 



Functions: This routine permits system redefinition without 
reassembly. The system console operator can enter new values to 
replace values specified on specific keyword parameters of the INTRO 
macro at assembly time. 

If the INTRC macro is assembled with the KEYLEN, CFB (or DISK=NO) , 
STARTUP, and LNTJNITS parameters properly specified, the operator is 
not qiven the opportunity to modify any INTRO operands at execution 
time, and when the WTOR Interpreter is trouqht into the system, it 
does not issue the WTOR command. Tc make execution time 
modifications, at least one of the above operands must be omitted from 
the INTRO assembly. 

The Link routine (IEDQOA) issues a LINK SVC to load and activate 
the WTOR Interpreter routine from SYS1 . LINKIIB. When WTOR Interpreter 
qains control, it sends the following messaqe to the system operator: 

• "TED001I TCAM JOB iotname, stepname, procstepname, ADDRESS OF AVT 
address" - where iotname is the -jet name, stepname is the step 
name, procstepname is the procedure step name, and address is the 
AVT address. 

The WTOR Interpreter then checks the TCAM wcrd in the CVT. If 
this word contains a nonzero value, there is a TCAM MCP already active 
in the system. The Interpreter, in this case, displays the followinq 
messaqe and returns to the Link routine with an error code of X'OU 1 . 

• "IED014I TCAM ALREADY IN SYSTEM" 

If the TCA.M word in the CVT is equal to zero, the WTOR Interpreter 

checks the INTRO parameter list to determine whether any of the 

required operands are missinq. If one cr more of the required 

operands is missinq, the WTCR Interpreter sends the followinq message. 

• "IED002A SPECIFY TCAM PARAMETERS" 

After sendinq this messaqe, the system waits for an operator 
response. The response, in the form of keywords (either full or 
abbreviated) separated by commas, is limited to 41 characters. The 
routine examines the response field from left to riqht. An error in 
one keyword prevents examination cf other keywords to its riqht. 
(These keywords may be placed in another response.) The WTOR 
Interpreter repeats the request for input until the operator indicates 
that he has finished enterinq keywords by codinq "D" as the last 
keyword. 
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If the WTOR Interpreter finds an error in a keyword entered by the 
operator, it sends the following messages, 

• "IED003A INVALID KEYWORD xxxx" - xxxx is the first four characters 
of the undefined keyword. All keywords to the riqht of this are 
iqnored. All keywords to the left of the error have been 
interpreted. 



• "IED004A REQUIRED PARAMETER MISSING. SPECIFY xx" - after the user 
codes "U" indicating he is through entering parameters, this 
statement reminds him of a reguired parameter he has yet to code. 
xx is the keyword needed. The user should reply with the 
indicated keyword (or keywords) and again indicate that he has 
finished responding by coding "0". The reguired keywords that may 
be called fcr are: 

S= "STARTUP" - cold or warm start 

B= "LNUNITS" -»■ number of line buffers 

K.= "KEYLEN" - size of each buffer unit 

D = "CPB" - number of CPEs '- reguired cnly if disk is being used. 

• "IED005A MSUNTTS (M) SPECIFICATION NCT PERMITTED. CONTINUE 
RESPONSE" - the user has coded the "M=" keyword to set the number 
of main storaoe message gueue records, but main storage gueuing 
was not. specified at INTRO assembly time. The "m = " response is 
legal only if main storage gueuing (INTRO MSUNITS=YES or integer) 
is specified at assembly time. 

• "IED006A INVALID OPERAND ON KEYWORD. RESPECIFY keyword" - where 
keyword is the keyword that contains the illegal value. All 
keywords to the right of the illegal one are ignored. All 
keywords before this keyword have been interpreted. 

The WTOR Interpreter routine modifies the AVT entry that is set by 
the keyword being examined. The fields in the AVT with the related 
keyword and response are as follows: 



INTRO Keyword Response Keyword AVI Field 



Fiel d Length 



STARTUP 

LNUNITS 

MSUNITS 

RESTART 

KEYLEN 

tTNITSZ 

C*>INTVL 

CONTROL 

PRIMARY 

INTVAL 

PASSWRD 



AVTBIT3 


3 


bits 


AVTNOLBF 


2 


bytes 


AVTTOTNC 


4 


bytes 


AVTCKRST 


1 


byte 


AVTKEYLE 


2 


bytes 


AVTKEYLE 


2 


bytes 


AVTCKELV 


2 


bytes 


AVTCTLCH 


8 


chars 


AVTDOUEX 


8 


chars 


AVTTNTLV 


2 


bytes 


aVTPASWD 


8 


chars 
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CKREOS R AVTNCKPR 1 byte 

CPB D BVTCPENO 2 bytes 

CPRCDS E AVTCPRCD 1 tyte 

CBOSSFF F AVTCRSRF 4 bytes 

COMWRTE G AVTCWFL1 1 bit 

TRACE T AVTRACE . 4 bytes 

DTRACE A AVTDISTR 4 bytes 

CTB C AVTCTB 1 byte 

MSMIN Y AVTCMIN 4 bytes 

MSMAX X AVTCMAX 4 bytes 

DLQ Q AVTDLQX 8 bytes 

OLTEST AVTOLTST 1 byte 

^OPMSG H AVTEIT2 1 bit 

Other keywords cannot be modified. 

Once the operator has entered the required keywords and the "U" 
response , WTOR Interpreter returns to the link routine with a X'OO 1 
return code in register 15. 

External Routines : 

• OS WTO routine (SVC 35) - to write a messaqe to the operator. 

• OS Wait routine (SVC 1) - to wait for an operator response. 

Tables/Work Areas: AVT, CVT, TCB. 

Attributes: Transient, nonreusable, nonrefreshable, enabled, problem 
prcqram mode. 



INTRO GETMAIN Routine (Chart OG) 
Module Name: IEDCOG 

Entry Point: IEDOOG - called throuqh a LINK SVC by the link routine 

(TEDOOA) . 

^unctions: This routine uses the OS GETMAIN macro to obtain main 
storaqe for and initialize line buffers, a main storaqe messaqe queues 
data set (if requested) , channel proqram blccks, and any trace tables 
or cross reference tables requested by the user. 

If the INTRC GETMAIN routine is able to satisfy all the required 
GETMAIN requests, it returns to the Link routine with the successful 
return code X'OC 1 in reqister 15. The value X'OS' in reqister 15 
indicates that sufficient main storaqe was not available to satisfy a 
GETMAIN request. 

External Routine: OS Getmain routine (SVC 4) - to obtain main storaqe 
space. 
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Tables/Work Areas; AVT. 

Attributes; Transient, reusable, refreshable, problem program mode. 

^ermname Table Sort Poutine (Chart OH) 
Module Name; IEBCOM 



Entry Point; IEDQOM - called throuqh a LINK SVC by the Link routine 
(IEDQOA). 

Functions ; This module sorts the Termname Table entries into 
alphabetical sequence. After the sort is finished, this routine 
recalculates the Termname Table offsets for any distribution lists, 
cascade lists, and invitation lists that refer to specific entries in 
the Termname Table. This routine also recalculates the offsets for 
alternate destinations. 

The Termname Table Sort routine initializes the Termname Table 
fields that are necessary for the Binary Search routine. It also 
checks for the presence of a primary operator control terminal. If a 
dead-letter crueue is specified, this routine calculates its Termname 
Table offset and places the offset at AVTDLQX in the AVT. If, 
however, the dead-letter queue is specified to a TSO terminal, this 
module proceeds as thouqh nc dead-letter queue was specified. 

If this routine is successfully executed, it returns to the Link 
routine with a X^O 1 return code in reqister 15. The three error 
conditions that can occur are indicated by the followinq return codes 
in reqister 15: 

• XM2 f - main storaqe is not available to satisfy a GETMAIN 
request. 

• X f 1f f - terminal definition error. Error messaqe "IEDQ007I 
terminal name ILLEGAL DESTINATION" is sent to the system console 
for each Terminal Table entry that contains an error. 

• X'20' - primary operator control terminal definition error. 
External Poutines: 

• OS Getmain routine (SVC 4) - to obtain main storaqe. 

• OS W^O routine (SVC 35) - to send a messaqe to the system 
operator. 

Tables/Work Areas: AVT, Termname Table, Teririnal Table. 

Attributes: Transient, reusable, refreshable, problem prcqram mode. 
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Attach Routine (Chart OS) 
Module Name: I ED COS 

Entry Point: IEDCOS - called throuqh a LINK SVC by the link routine 
(IEDQOA) . 

Functions: This routine attaches the Operator Control task, the On- 
line Test module (if requested), and the EE Common Write routine (if 
requested) as tasks in the same partition cr reqion as the MCP. This 
routine determines the need for attachinq Cn-Line Test and FE Common 
Write by testinq switches in the AVT. 

The Attach routine also loads modules that depend on operands on 
the INTRO roacrc. If the system delay interval in AVTTNTLV is equal 
to zero, the Attach routine loads the System Delay subtask (IEDQHI) , 
and places its address in the AVT. If PRIMARY is not specified as 
SYSCON, the Attach routine loads the Operator Awareness Messaqe Router 
(TEDONX) and places its address in the AVT. 

Upon completion, the Attach routine returns to the Tink routine. 

External Routines: 

• OS Attach routine (SVC 42) - to attach the requested tasks. 

• OS Extract routine (SVC 40) - to build a communications parameter 
list. 

• OS Load routine (SVC 8) - to load TCAM modules. 
Tables/Work Areas: AVT. 

Attributes: Transient, reusable, refreshable, problem program mode. 



Disk Message Queues Open Routines (Charts IE, IC, ID) 
Module Names: IGGC1930, IGG01931, IGG01934 
Entry Points: 

• IGG01930 - entered by an XC^L from an I/O support module or 
another access method open executor when an OPEN DCE for a messaqe 
queues data set is issued in an MCP. IGG01930 can also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart LB) 

• IGG01931 - entered by an XCTL from IGG01930 after IGGC1930 is 
completed. IGG01931 can also be reentered by a loop from itself 
if there are multiple DCBs to open. (Chart LC) 
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• IGG01934 - entered by an XCTL from IGG01931 after IGG01931 is 
completed. IGG01934 can also be reentered by a loop from itself 
if there are multiple DCBs to open. (Chart LD) 

Functions: The functions of each routine are defined accordinq to 
entry point. 

• IGG01930 

This routine qets main storaqe for and initializes a Data Extent 
Block (DEB) in subpool 254 for a message queues DCB. IGG01930 
analyzes the the device type information prcvided in the Unit Control 
Block (UCB) to determine the type of direct access devices used for 
the messaqe queues. 

If TGG0193C finds an error condition, it sets error indicators in 
the AVT and issues an XCTL to the Open Error Handler routine 
(TGG01933) . 

When no errcrs are fcund, TGG01930 places the address of the next 
entry in the CCE parameter list in reqister 7 and the address of the 
next entry in the system Where-to-Go Table in reqister 8. The routine 
updates the Disk Messaqe Queue Open entry in the Where-to-Gc Table to 
point to load II — IGG01931. IGGC1930 then issues an XCTL command to 
the module identified by the next ncnzero entry in the Where-to-Go 
Table, specifically TGG01931. 

• TGG01931 

This routine completes the initialization of the DEB extents and 

calculates various values required by EXCP Driver. TGG01931 also 

builds and initializes all I/O Blocks (IOBs) , one per DEE extent, 
required for disk operation. 

If IGG01931 finds an error condition, it sets error indicators in 
the AVT and issues an XCTL to the Cpen Error Handler routine 
(IGG01933). 

When no error is found, IGG01931 places the address of the next 
entry in the DCB parameter list in reqister 7 and the address of the 
next entry in system Where-to-Go Table in reqister 8. It updates the 
Disk Messaqe Queues Open entry in the Where-to-Go Table to identify 
Load III — IGG01934. IGGC1931 issues an XCTL command to the module 
identified by the next nonzero entry in the Where-to-Go Table 
IGG0193I*. 

• IGG01934 

This routine performs all the disabled initialization functions 
that are required by TCAM. This includes lcadinq the TCAM Dispatcher, 
EXCP Driver, Disk End Appendaqe, and the Beusability-Copy subtask, if 
it is requested. In order to load a module, IGG01934 activates IOS, 
which checks the OS Contents Directory to determine whether that 
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module has already been loaded. If there is an entry for the module 

in the directory, IOS adds one to the directory usaqe count. If there 

is not an entry for the module in the directory, IOS makes a two-byte 

entry in the directory, adds one to the usaqe count, and loads the 
module. 

Note: IGG01934 loads the Disk End Appendaqe for a Sinqle CPB and 
EXCP Driver fcr a Sinqle CPB when CPB=1 is specified by the user. 
Otherwise, IGG01934 loads the reqular version of each of these 
modules. 

TGG01934 places the address of the next entry in the DCB parameter 
list in reqister 7 and the address of the next entry in the system 
Where-to-Go Table in reqister 8. TGG01934 issues an XCTL to the 
module identified by the next nonzero entry in the Where-to-Gc Table, 
either TGG01941, IGG01935, or system open. 

External Routines: 

• OS Getmain routine (SVC 4) - to obtain main storaqe space for the 

DEBs and TOEs. 

• OS Load routine (SVC 8) - to load TCAM modules. 

^ables/Work Areas: System Where-tc-Go Table, DCB parameter list, Open 
work area, AVT, DEB, IOB, UCB. 

Attributes: Transient, enabled, reentrant. 



Checkpoint Open Bcutine (Chart MA) 

Module Name: IGGC1941 

Entry Point: IGG019U1 - activated by an XCTL from IGG01934 when the 
OPEN checkpoint data set DCE is specified in an MCP. 

^unctions: This module opens a checkpoint data set in the MCP, To 
accomplish this, it performs the followinq activities: 

• Determines the size of the GETMAIN work area (the size varies as 
a result cf the TNTFO operands "CKREQS" and "CPBCDS") , 

• Issues a GETMAIN macro for the work area and puts the address in 
the AVT field AVTCKGET, 

• Determines the beqinninq of the CKREC^TTB table, 

• Initializes the IOB and the disk channel proqram in the checkpoint 
work area. 
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• Determines the type of start-up required (cold, warm, or 
continuation) by investiqatinq the disposition field ceded on the 
OPEN macro, the start parameters (on INTRO) , and the "normal 
closedown" bit in the checkpoint data set control record, 
Dependinq on these results, transfers control (XCTL) to either the 
Checkpoint Disk Allocation module or the Checkpoint/Restart from 
Environment Record module. The following conditions determine the 
type of start-up required and therefore indicate the routine to 
qain control: 

1. DISP=NEW 

XCTL to the Checkpoint Disk Allocation routine 

2. DTSP=OLD, S=C, normal closedown 

XCTL to the Checkpoint Disk Allocation routine 

3. DISP=OLD, S=C, abnormal closedown 

XCTL to the Checkpoint/Restart modules and scan the messaqe queues 

4. DISP=OLD, S=CY, normal closedown 

XCTL to the Checkpoint Disk Allocation routine 

5. DISP=OLD, S=CY, abnormal closedown 

XCTL to the Checkpoint Disk Allocation routine 

6- DTSP=OLD, S=¥, normal closedown 

XCTL to the Checkpoint/Restart modules and do not scan the message 
queues 

7. DISP=OLD, S=W, abnormal closedown 

XCTL to the Checkpoint/Restart modules and scan the messaqe queues 

B. DISP=OLD, S=WY, normal closedown 

XCTL to the Checkpoint/Restart modules and do not scan the messaqe 
queues 

9. DISP=OLD, S=*!Y, abnormal closedown 

XCTL to the Checkpoint/Restart modules and do not scan the messaqe 
queues 
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If, durinq execution, the Checkpoint Cpen routine determines that 
there is insufficient main storaqe for the checkpoint work area or if 
a disk I/O error occurs while readinq the control record of the 
checkpoint data set, the routine sends an error messaqe to the system 
console, sets AVTCKGET equal to zero, and passes control to the next 
module in the system Where-tc-Go Table. 

External Routines: 

• OS Getmain routine (SVC 4) - to obtain main storaqe for a work 
area. 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

• OS Load routine (SVC 8) - to load a checkpoint module. 

• OS EXCP routine (SVC 0) - to read a record from disk, 

Tables/Work Areas: CVT, AVT, Checkpoint DCB, Checkpoint DEB, 
checkpoint work area, I/O work area, JECB. 

Attributes: Reentrant. 



checkpoint Disk Allocation Routine (Chart MM) 

Module Name: IGGC1949 

Entry Point : IGG01949 - called by the Checkpoint Cpen routine when 
initialization of the checkpoint data is required. 

Functions: This module determines the size of the various records for 
the checkpoint data set. The Checkpoint Disk Allocation routine first 
scans the TCAM tables to determine the size of an environment 
checkpoint record and the number of disk records necessary to contain 
it. The routine then finds the maximum number of priority level QCBs 
to be used for any one application proqram Destination QCE, and uses 
this number plus the lenqth of the lonqest option area for any 
terminal entry to calculate the lenqth of a CKREQ record. The lenqth 
of an incident record is equal to the lenqth of the lonqest option 
area or the lenqth of the operator control data area, whichever is 
qreater. 

The Checkpoint Disk Allocation routine then calculates the number 
of each of the types of checkpoint records that will fill one track of 
the checkpoint data set. The routine uses the device type index (from 
the UCB) and the CS I/O Device Characteristics Table (address from the 
CVT) fields to calculate the number of records per track. 

The Checkpoint Disk Allocation routine places the number of tracks 
in the checkpoint data set, the size of each disk record, and the 
number of records per track in the checkpoint work area. This routine 
also places the count and lenqth of the various records in the 
checkpoint disk data set control record. 
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The Checkpoint Disk Allocation routine exits by issuing an XCTL to 
the next nonzero entry in the system Where-to-Go Table - IGG01942. 

External Routines; None. 

Tables/Work Areas: CVT, AVT r checkpoint work area, Option Table, 
Termnarae Table, Terminal Table, QCE, DEE, CCB , invitation list, OS I/O 
Device Characteristics Table. 

Attributes : "Reentrant, transient, refreshable, enabled, supervisor 
mode. 



Checkpoint Disk Initialization Routine (Chart MB) 

Module Name; IGGC1942 

Entry Point': IGG01942 - called by the Checkpoint Disk Allocation 
routine to initialize the checkpoint data set or by the 
Checkpoint/Restart from Environment Record routine to perform an error 
exit. 

Functions: The Checkpoint Disk Initialization routine initializes the 
disk checkpoint data set into specific areas for a control record, 
environment checkpoint records, CKREQ records, and incident records. 

This routine formats the checkpoint data set with dummy records. 
The CPRCDS operand of the INTRO macro specifies the number- of 
environment checkpoint records to be written in the disk checkpoint 
data set. The CKREOS operand of INTRO indicates the number of CKREQ 
records to be written in the data set. There is one control record. 
The remainder of the space that is allocated to the checkpoint data 
set on the disk is used for incident checkpcint records. 

If, durinq execution, the Checkpoint Disk Initialization routine 
recoqnizes an error condition, it issues an error messaqe via WTO, 
sets AVTCKGET equal to zero, and transfers control to the next entry 
in the system Where-to-Go Table. The followinq error conditions can 
occur: 

• Disk I/O error occurs while writinq. 

• Insufficient disk space for the minimum required checkpoint 
records: 

2 environment records, 

1 control record. 

The number cf CKREQ records specified in the INTRO macro + 3 extra 
records, and 

1 incident record. 
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If the Checkpoint Disk Initialization routine is entered from the 
Checkpoint/Restart from Environment Record routine, the Initialization 
routine issues a WTO messaqe that indicates an unrecoverable disk 
error, sets AVTCKGET equal to zero, and transfers control to the next 
entrv in the system Where-to-Go Table. 

If no errors cccur, this routine transfers control to the next 
entry in the system Where-tc-Gc table. 

External Routines: 

• TECPCNVT - to convert the relative track address to the actual 
disk address. (This is an OS routine, found via a pointer in the 

CVT.) 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

• OS EXCP routine (SVC 0) - to start a channel proqram tc write a 
checkpoint record. 

• OS Wait routine (SVC 1) - to allow time for the channel proqram to 
complete. 

Tables/Work Areas: CVT, AVT, checkpoint wcrk area, Checkpoint QCB, 
Checkpoint DEE, Checkpoint DCB. 

Attributes: Reentrant. 



Checkpoint/Restart from Environment Record Routine (Chart ME) 

Module Name: IGG01943 

Entrv Point: TGG01943 - activated by the Checkpoint Open routine when 
a system restart is required. 

Eunctions: When checkpoint restart is specified, this module uses the 
environment record seqments in the checkpoint data set to reconstruct 
the MCP environment. The Checkpoint/Restart from Environment Record 
routine places information from the environment checkpoint record in 
the MCP tables. 

The Restart from Environment Record Routine determines which 
environment record to use by subtractinq the value of the INTRO 
operand "RESTART=" from the number of the most current environment 
record. The control record (the first record on the checkpoint data 
set) contains the number of the most current environment record. If 
the result cf the subtraction is not a positive value, this routine 
adds the value cf the INTRO operand "CPRCDS" (the total number of 
environment records) to the result. 



Proqram Orqanization 159 



Tf this restart routine finds that the TTR of the environment 
record in the control record is equal tc zero, the environment record 
has had a disk error. In this case, this restart routine issues a WTO 
error messaqe and recovers by usinq the previous environment record. 
If all the TTPs are equal to zero, the routine sets the X'08» bit in 
the first byte of the control record and then transfers control to 
TGG01942, which issues a WTO error messaqe. In this case, no 
checkpoints are taken for the duration of the iob. 

After successful execution, this module exits to IGG01944. If an 
error occurs durinq prccessinq, exit is to the next module in the 
system Where-tc-Gc Table. 

External Routines; 

• IECPCNVT - to convert the relative track address to the actual 
disk address. (This is an OS routine, found via a pointer in the 
CVT.) 

• OS EXCP routine (SVC 0) - to read a checkpoint record seqment. 

• OS wait routine (SVC 1) - to allow I/O to complete. 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

Tables/Work Areas; CVT, AVT, checkpoint work area, TCE, Checkpoint 
DEB, Checkpoint DCB, Checkpoint QCB, Termname Table, Terminal Table, 
invitation list. 

Attributes; Reentrant. 



Checkpoint/Pestart from Incident and CKREC Records Routine (Chart MG) 

Module Name; IGG019.44 ■ 

Entry Point ; IGG01944 - activated by the Checkpoint Open routine 
after the Checkpoint/Pestart frcm Environment Record routine has 
successfully executed. 

"^unctions; This module reads the incident records for step line or 
start line and the CKREQ records from the checkpoint data set and uses 
these records tc update the MCP environment. If STARTUP=WY is 
specified as an operand of the INTRO macro, TCAM does not use the 
incident records to update the MCP environment; otherwise, this 
module performs the followinq functions. 

The routine first compares the time in an incident record to the 
time in the environment record used for the restart. If the incident 
record is more recent, it is used to update the MCP tables. The key 
field in an incident record indicates the type of information in the 
record. Incident checkpoints are taken as a result of a CHECKPT macro 
in an MH, a TCHNG macro in an application proqram, or an operator 
control command. 
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Note; This routine processes only the incident records for Start 
Line and Stop Line operator control commands. All other commands 
are processed after the lines are opened at REAEY time. When this 
routine reccqnizes a Start or Stop Line command, it stores the 
line status in the QCBLINK field of the Destination CCE for the 
line. The Line Open routine uses this status field. 

CKREQ records do not contain the time at which they are written, 
^hese records are used to synchronize the information in Terminal 
Table process entries with an OS Checkpoint taken in an application 
proqram. The Checkpoint Restart from Incident and CKREQ Records 
routine reads all the CKREQ records in the data set. This routine 
moves each TTR and Termname Table offset into the CKREQ-TTR table in 
the checkpoint work area. If the offset value in a CKREQ record is 
not equal to zero, this routine uses the CKREQ data to update the MCP 
tables that pertain to the process entry. 

The Checkpoint/Restart from Incident and CKPEQ Records routine 
exits to the next module in the system Where-to-Go Table - the 
Checkpoint Continuation Restart module (IGGC1945) if this is a restart 
after an abnormal closedown, or the next open executor after a normal 
closedown. Ecr a normal closedown, this routine also sets tit X'01' 
in AVTCKELE to indicate the type of restart. 

External Routines: 

• IECPCNVT - to convert the relative track address to the actual 
disk address. (This is an OS routine, found via a pointer in the 
CVT.) 

• IEDQTNT - Termname Table code - to obtain a terminal entry 

address. 

• OS EXCP routine (SVC 0) - to read a checkpoint record. 

• OS Wait routine (SVC 1) - to allow I/C to complete. 

• OS WTO routine (SVC 35) - to send a message to the system 
operator. 

Tables/Work Areas: AVT, checkpoint work area, QCE, DCE, Terminal 
Table, Termname Table, Cption Table, CVT. 

Attributes: Reentrant. 



Checkpoint Continuation Restart Routine (Chart MJ1 

Module Name: IGGC19U5 

Entry Point: IGG01945 - entered by an XCTL from the 
Checkpoint/Restart from Incident and CKREQ Records routine (IGG01944) 
after an abnormal closedown. 
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Functions: This module performs any required processing of the 
messaqe queues data set at restart time. 

By codinq STARTUP=WY on the INTRO macro, the user specifies that 
after a system failure he wants a warm restart without a scan of the 
messaqe queues. In this case, the Continuation Restart routine 
locates the last messaqe placed on each FEFO queue in the messaqe 
queues data set before the time of the last checkpoint. This routine 
then places zeros in the FEFO chain field of any messaqes that were 
placed on the queue after the checkpoint - these messaqes are 
subsequently lest. 

If SYNC=YES is coded on the TPRCCISS macro, the user has 
synchronized queues for application proqrams. In this situation, the 
Continuation Restart module scans the FIFO messaqe queues for the 
specified process entry and recreates a FEFO queue, in FIFO order, 
that includes all messaqes on the FEFO queue at any time after the 
last checkpoint was taken. To determine which serviced messages 
should be placed on the FEFO queue, this routine compares the disk 
record number of the last seqment of the first messaqe on the FEFO 
queue at the time of the last checkpoint with the disk record number 
of the last seqment of every complete, uncanceled messaqe en the FIFO 
queue. If the record number of the messaqe on the FIFO queue is 
qreater than the record number of the messaqe from the FEFO queue, 
this routine places the messaqe that is on the FIFO queue on the 
restart-FEFO queue. 

If neither of the above situations exists, the Continuation 
Restart routine scans each FIFO message queue and recreates a restart 
FEFO queue in FIFO order. This queue contains all complete, 
unserviced, uncanceled messaqes. The Continuation Restart routine 
must read and check each seqment of a messaqe for loqical read errors 
in order to determine whether the messaqe is completely received. 

In both OS synchronized and reqular continuation restart, this 
routine recreates the FEFO chain, updates the sequence numbers, and 
recreates the queue-back chain. The sequence number in a messaqe is 
only used to update its terminal entry if the number of the messaqe is 
qreater than the number already in the entry. If the queue-back 
pointer in a messaqe is hiqher than the queue-back pointer in its 
Destination QCB, the Continuation Restart routine uses the record 
number of the messaqe buffer, not the queue-back field, to update the 
OCE. 

The Continuation Restart routine exits by issuing an XCTL to the 
module indicated by the next nonzero entry in the system Where-to-Go 
Table. 
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External Routines; 

• IGG019Q8 - Checkpoint Continuation Restart subroutine - to examine 
a terminal entry and to activate TGG019RC. 

• OS load routine (SVC 8) - to load IGGC19Q8. 

• TEPQTNT - Termname Table code - to qet a terminal entry address. 

Tables/Work Areas: AVT, checkpoint work area, CPE, disk data area of 
the messaqe, buffer prefix, OCB, Termname Table, Terminal Table. 

Attributes: Reentrant. 



Checkpoint Continuation Restart Subroutine (Chart OS) 
Module Name: IGGC1908 
Entry Points: 

• IGG019O8 - loaded by the Checkpoint Continuation Restart routine 
(TGG01945) to check terminal entries. 

• TGG01 908+4 - activated by the Checkpoint Continuation Restart 
routine to execute disk I/O. 

• IGG019O8+8 - activated by the Checkpoint Continuation Restart 
routine to update sequence numbers. 

• TGG019O8+12 - activated by the Checkpoint Continuation Restart 
routine to update the AVT value of address for queuinq. 

• IGG01 908+16 - activated by the Checkpoint Continuation Restart 
routine to initialize reqisters. 

Functions: This module is an extension of the Checkpoint Continuation 
Restart routine (IGG01945) . At the IGG019C8 entry point, this module 
examines the terminal entries to determine whether a scan should be 
performed on the messaqe queues. At the IGG019Q8+4 entry point, this 
module sets up the CPB for disk I/O on the messaqe queues data set and 
then activates the EXCP Driver (IGG019RC) to actually perform the I/O 
operation. At the IGG019O8+8 entry point, this module updates the 
messaqe sequence number in the terminal entry. At the IGG019Q8+12 
entry point, this module examines and, if necessary, updates the 
AVTRADDR and AVTNADDR queuinq addresses in the AVT, At the 
TGG019Q8+16 entry point, this module initializes reqisters with values 
for TGG01945. 

The Checkpoint Continuation Restart subroutine always returns to 
the Checkpoint Continuation Restart routine. 
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External Foutines 

• TGG019BC - EXCP Driver - to perform I/O on the disk messaqe queues 
data set. 

• OS Wait routine (SVC 1") - to allow time fcr completion of the disk 
I/O activity. 

Tables/Work Areas: AVT, checkpoint work area. Terminal Table, AVT, 
CPE, QCB. 

Attributes: Reentrant, transient. 

Line Group Open Fcutines (Charts IE, I*, 16, IH, LI, LJ, and IK) 

Wodule Names: IGG01935, IGGC1936, IGG01937, IGGC1938, IGG01939, 
IGG01940, IGG01948. 

Entry Points: 

• IGG01935 - entered by an XCTL from an I/O support module or from 
another access method open executor when an OPEN line group DCB is 
issued in an MCP. It may also be reentered by a loop from itself 
if there are multiple DCEs to open. (Chart LE) 

• IGG01936 - entered by an XCTL from IGG01935. It may also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart IF) 

• IGG01937 - entered by an XCTL from IGG01936. It may also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart LG) 

• IGG01938 - entered by an XCTL from IGG01937. It may also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart LH) 

• IGG01939 - entered by an XCTL from IGG01938. It may also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart LI) 

• IGG01940 - entered by an XCTL from IGG01939. It may also be 
reentered by a loop from itself if there are multiple DCBs to 
open. (Chart LJ) 

• IGG01948 - entered by an XCTL from IGG01940, It may also be 
reentered by a locp from itself if there are multiple DCBs to 
open. (Chart LK) 

^unctions: The functions of each routine are defined according to 
entry point. 

• IGG01935 
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This routine builds and initializes a line DEB. IGG01935 examines 
the Task I/O Table (TIOT) to determine the number of lines in this 
line qroup. It then obtains main storaqe for and initializes a line 
DEB in subpool 254. 

IGG01935 checks each unit control block (UCB) to verify that 
similar devices are attached tc each line and that either a 2701, 
2702, or 2703 control unit is beinq used. This routine also locates 
a typical entry in the Device Characteristics Table for each line 
qroup, sets an index into the branch table in IGG01936, and clears a 
reqister to contain the Line Control Block (LCB) size. 

If IGG01935 finds an error condition, it sets error indicators in 
the AVT and issues an XCTL instruction to qive control to the Open 
Error Handler routine (IGG01933) . If the user has specified a TCAM 
entry in his exit list, the Open Error Handler routine will return 
control to the next nonzero entry in the system Where-to-Gc Table 
after it has processed all error conditions. 

TGG01935 exits by issuinq an XCTL command to the module indicated 
by the next nonzero entry in the system Where-to-Gc Table - IGG01936. 

• IGG01936 

This routine determines the size of the channel prcqrams for all 
devices for the line qroup beinq opened. 

IGG01936 provides the number of channel command words (CCWs) for 
a minimum proqram for all devices. Additional CCWs are provided as 
determined by examininq the optional feature bits in the UCE and the 
typical entry for each applicable device in the Device Characteristics 
Table. 

This routine issues a GETMAIN instruction to qet an LCB for each 
line in the line qroup and then places the Send Scheduler STCE in the 
STCB chain of the Destination QCB. 

When IGG01S36 issues an XCTL to IGG01937 (the next nonzero entry 
in the system Where-to-Go Table) , it passes in reqister 10 the total 
number of CCWs required for each channel prcqram for each device in 
the line qroup. 

• IGG01937 

This routine builds and initializes all the LCEs for this line DCB 
open. 

TGG01937 divides the LCB area into individual LCBs for each of the 
lines and initializes each LCB. If the schedulinq priority for this 
line is send, this routine moves the Send Scheduler STCB into the STCB 
chain for the LCB. 
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TGG01937 exits by issuing an XCTL command to the module indicated 
by the next ncnzero entry in the system Where-tO-Go Table - IGG01938. 

• IGG01938 

This routine builds channel proqrams in the line Control Blocks 
(ICBs) for the lines of the line qroup being opened. 

TGG01938 also tests to determine whether the lines are to be 
opened idle, 

TGG01938 exits by issuinq an XCTL command to the module indicated 
by the next ncnzero entry in the system Where-to-Gc Table - IGG01939. 

• TGG01939 

This routine loads some of the modules required for line 
operation. These modules include the TCAM Dispatcher, the appropriate 
receive schedulers, and the Start-up Messaqe routine (if requested) . 
Tn order to load a module, IGG01939 activates IOS, which checks the OS 
Contents Directory to determine whether that module has already been 
loaded. If there is an entry for the module in the directory, IOS 
adds one tc the directory usaqe count. If there is not an entry for 
the module in the directory, IOS makes a two-byte entry in the 
directory, adds one to the usaqe count, and loads the module. If IOS 
loads the TCAM Dispatcher, it also places a pointer to the address of 
the AVT in the CVT. 

IGG01939 exits by issuinq an XCTL command to the module indicated 
by the next ncrzero entry in the system Where-to-Go Table - IGG01940. 

• IGG01940 

This module completes the loadinq of the modules required for line 
operation. These modules include the Send Scheduler, the PCI 
Appendaqe, and the Line "End Appendaqe. IGGC19U0 also loads the device 
dependent special characters required for initial I/O operations and 
starts I/O on each line in the line qroup. 

Note; The version of Line End Appendaqe that IGG01940 loads 
depends on the user-coded operands en the INTSO macro: 

ENVIECN=TCA* IGG019Q5 

ENVIECN=TSC or MIXED IGG019Q3 

LTNETYP=BISC IGG019Q2 

LINETYP=MINI IGG019Q4 

LINETYP=BCTH IGG019R0 

IGG01940 exits by issuinq an XCTL command to IGG01948. 

• TGG01948 

This routine places line-specific information in the Cross 
Reference Table. The data placed in this table includes the UCB name, 
the UCB address, the LCB address, and the Destination QCB address for 
each line in the line qrcup. 
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Upon entry, IGG01948 issues a TIME macrc instruction to get the 
current time of day from the operatinq system. The routine then tests 
each line (each LCB) to determine whether it has successfully 
completed its initial I/O operations. If the initial I/O is not 
completer IGGC1948 issues another TIME macrc and determines whether 28 
seconds have elapsed. If 28 seconds have not passed, the routine 
continues checkinq for I/O completion until 28 seconds have elapsed or 
until the LCB has been marked to indicate I/O completion. At the end 
of 28 seconds if the I/O has still net completed, IGG01948 writes a 
messaqe on the system console to identify the line that was not 
successfully opened. When I/O operation has completed, the routine 
qoes to the next line in the line qroup and continues checkinq for I/O 
completion. 

IGG01948 exits by issuinq an XCTL command to the module identified 
by the next nonzero entry in the system Where-to-Go Table. This 
module is the system module IGG0190S. 

External Routines; 

• OS Getmain routine (SVC 4) - to obtain main storaqe. 

• OS Load routine (SVC 8) - to lead TCAM modules, 

• OS EXCP routine (SVC 0) - to start I/C en a line. 

• OS Time routine (SVC 11) - to qet the current time of day. 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

Tables/Work Areas: Where-to-Go Table, DCB parameter list, DEB, Device 
Characteristics Table, Special Characters Table, Cross Reference 
Table, TIOT, UCE, LCB, QCB. 

Attributes: Transient, enabled, reentrant. 

Open Error Handler (Chart LA) 

Module Name: IGG01933 

Entry Point: IGG01933 - activated by any of the TCAM open executors 
when an error is detected. 

Functions: This module handles all serious errors detected during the 
openinq of a TCAM application proqram DCB, a messaqe queues data set 
DCB, or a line qroup DCB. The Open Error Handler sends an error 
messaqe to the system console. The value of xx in the messaqe, 
TED008I TCAM OPEN ERR OB xx, depends on the specific parameters passed 
to the Open Errcr Handler by the open executor that detected the error 
condition. 
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If the user does not provide a TCAM error exit, the Open Error 
Handler causes TCAM to abend with a specific abend code. If the user 
does provide an error exit, the Open Error Handler passes control to 
the routine at the address specified by th€ error exit ? The Open 
Error Handler passes an error code in register and an option code in 
register 1 to the user-specified error routine. The option code 
allows the error routine to decipher which of the available options to 
use. The error routine returns a code in register 15 to indicate 
which of the following actions the Open Error Handler is to take: 

1. Abend the TCAM iob (return code = 2 or greater) 

2. Ignore the data set that is in error ( return code = 0) 

3. Continue processing with limited capabilities (return code = 1) 

If the error routine specifies an option that is not available for 
the error in guestion, the open executor sends the same error message 
to the system console again. This loop of sending the message and 
getting a response from the user-specified error routine continues 
until the Open Error Handler receives a valid return code in register 
15. 

External Routines: 

• OS WTO routine (SVC 35) - to send an error message to the system 
operator. 

• OS SYNCH routine (SVC 12) - to go to a user-specified error 
routine. 

Tables/Work Areas; System Where-to-Go Table, DCB, AVT. 

Attributes; Transient, enabled, reentrant. 



Start-up Message Routine (Chart R6) 

Module Name: IGGC19P6 

Entry Point: IGG019R6 - activated when line End Appendage tposts an 
LCB that points to the Start-up Message QCE to the ready gueue after 
receiving an open I/O interrupt. 

Functions: This module obtains and gueues any messages that the user 
has to send to a terminal for the specified LCB at start-up time. 

The Start-up Message routine first locates all the terminal 
entries that are associated with the specified LCB. It then passes 
the address of each entry and the address of the option fields for 
that entry, if present, to the routine specified by a user exit. 
There are two possible user exit addresses specified as operands of 
the READY macro: one is given control if a cold restart is in effect; 
the other, if a warm or continuation restart is in effect. 
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If the routine specified by the user exit has a messaqe to send tc 
a terminal, the user routine returns to the Start-up Messaqe routine 
with the address of the messaqe in reqister 15 and the lenqth of the 
messaqe in the first byte of the messaqe itself. A zero in reqister 
15 indicates that the user routine has no messaqe to enter. 

When there is a messaqe to be sent to a terminal that is main- 
storaqe-only queued, the Start-up Messaqe rcutine removes buffers from 
the Buffer Pequest OCB, builds the messaqe, and passes one unit of the 
messaqe at a time to the Destination Scheduler (IEDQHM02) to be placed 
on the Destination QCE. in the case of restart with main-storaqe-only 
queuinq, there are no raessaqes en the messaqe queue; therefore, no 
special measures are taken to ensure that start-up raessaqes are queued 
first. 

When there is a messaqe to be sent to a terminal that is disk 
queued, the Start-up Messaqe routine removes cne CPB from the free CPB 
pool and, one unit at a time, builds the required number of buffers in 
the CPB work area. After each unit is obtained, the Start-up Message 
routine builds the CPB and branches to the EXCP Driver routine 
(IGG019RC) to write the unit on disk. When EXCP Driver returns to the 
Start-up Messaqe routine, Start-up Messaqe waits en the ECB at 
AVTOSECB to allow time for I/O tc complete before buildinq another 
buffer unit. 

The Start-up Messaqe routine assiqns disk relative record numbers 
in the conventional manner. Eut the routine places the messaqe at the 
first of the EEEO queue by moving the QCBTFEEFO field into the message 
FEFO chain and placinq the record number of this messaqe in QCBEFEFO. 

After the Start-up Messaqe routine has processed all the terminals 
associated with the specified LCB , it increments the count of lines 
processed (AVTSMCNT) and compares the counter with a count of the 
total number of lines opened (AVTLflCNT) . If the counts are equal, 
Start-UD Messaqe tposts the LCB to itself and returns control to the 
TCAM Dispatcher at the DSPD1ETE entry point to have the Start-up 
Messaqe routine deleted. If the counts are not egual, Start-up 
Messaqe tposts the LCB to itself and returns control to the TCAM 
Dispatcher at the DSPPOST entry point. 

External Routines: 

• User routines specified as user exits in operands of the READY 
macro. 

• IGG019RC - EXCP Driver routine - to write the units of a messaqe 
en disk. 

• TEDOHM02 - Destination Scheduler - to place buffers on the 
appropriate Destination OCB. 

• TEDQTNT - Termname Table code - to obtain a terminal entry 
address. 

• OS Wait routine (SVC 35) - to allow I/O to complete. 
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Tables/Work Areas : AVT, LCE, Termname Table, Terminal Table, QCB, 
DCB, Option Table, buffer prefix, CPB, SCE, data area of a message. 

Attributes: Reentrant, resident, problem proqram mcde. 

Ready Routine (Chart ND) 
IEDCND 
IEDOND - activated by the REAEY macro expansion. 



Module Name: 


Entry 


Point: 


Functions: 



If the AVTCKGET field contains a nonzero value, which 
indicates that a checkpoint DCB has been opened, the Ready routine 
reads and processes all incident checkpoint records that are more 
recent than the environment record. If the key field of a record 
indicates TCHNG or CHECKPT, this module updates the TRMSTATE and 
option fields for the associated terminal entry. If the key field 
indicates operator control, but not Start or Stop Line, this module 
moves the data into the operator control work area at GPCCKELE, posts 
the ECB for Operator Control, and issues a WAIT to allow the data to 
be processed. If this module encounters a disk error, it issues a WTO 
error message (IED085I) and iqnores the incident record on which the 
error occurred. 

After all the incident records are processed, this module issues 
a EREEMAIN for the I/O buffer and then issues an ATTACH SVC to attach 
the Checkpoint Executor in the same system partition as the MCP. The 
"Ready routine saves registers in AVTSAVE2 in such a way that the TCAM 
Dispatcher will tpost the environment checkpoint request element to 
the ready queue. This routine also loads IEDQNX if the primary 
operator control terminal is not the system console and IEDQHI if the 
system delay is not zero. 

If On Line Test is specified as an operand of the INTRO macro, the 
Ready routine determines whether there is sufficient main storage for 
On-Line Test to perform its functions. If there is not enough main 
storage for the minimum reguirements of On-line Test, the MCP abends. 
If there is enouqh main stcraqe for minimum On-Line Test requirements, 
but not enouqh for the requested amount, the Ready routine issues a 
warninq WTO messaqe (IED094I) . 

If the Checkpoint and Cn-Line Test tasks are not attached, the 
Ready routine marks complete their respective termination ECBs. 

The Ready routine also checks all the terminal entries in the 
Terminal Table. If CALL is specified en a TERMINAL macro, this 
routine puts the OCE on the time delay queue. 

Upon completion, the Ready routine returns control to the READY 
macro expansion (the address in reqister 14) . 

External Routines: 

• OS Attach routine (SVC 42) - to attach the Checkpoint Executor and 
On-Line Test. 
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OS Getmain routine (SVC 4) - to request the amount of main storaqe 
that is required by Cn-Line Test. 

OS Freemain routine (SVC 5) - to free the main storaqe that was 
acquired by a GETMAIN macro. 

TEDQTNT - Termname Table code - tc obtain a terminal entry 
address. 

OS EXCP routine (SVC 0) - to start an I/O operation. 

OS Load routine (SVC 8) - to load a TCAM module, 

OS Post routine (SVC 2) - to post an ECE. 

OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

OS Wait routine (SVC 1) - to allow time for an event tc complete. 

IECPCNVT - OS Convert routine - to convert the TTR to an MBBCCHHP 
address. 

Tables/Work Areas: AVT, Terminal Table entry r Termname Table, 
Operator Ccntrcl AVT. 

Attributes: Peusable, problem prcqram mode, transient. 



SYSTEM CONTPCL ROUTINES 

TCAM Dispatcher (Chart PB) 

Module Name: IGG019PE 

Entry Points: IGG019PB 

The TCAM Dispatcher provides seme of the service functions of a 
queue manaqer by allowinq routines to branch to entry point labels in 
a DSECT. This DSECT is included in an assembly by issuinq the macro 

TDISPD. 

Entry point labels not endinq in "P" result in loss of control by 
the branchinq subtask. Those endirq in M P" result in an immediate 
return to the branchinq subtask after the requested function has been 
performed. Branch entry points to the TCAM Dispatcher in the branch 
table PETTEL include the followinq: 
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Label Description 

DSPDLETE Functions: Delete the module with entry point IGG019R6 (the 
Start-up Messaqe routine) , and tpcst a chain of RCBs. 
Parameter reqister: 1 - the address of the first item in a 
chain of items to be tposted, or X'xxOOOOOO*. The link 
field cf the last item in the chain must contain 
X'xxOCOOOO 1 . 

Exit point: DSPDISP 

DSPCHAIN Function: Tpost a chain of RCEs. 

Parameter reqister: 1 - the address of the first item in a 

chain of items to be tposted, or X^xOOOOOO'. The link 

field cf the last item in the chain must contain 
X'xxCOOOOO*. 

Exit point: DSPDISP 

DSPLTST Function: Tpost a list cf RCBs. 

Parameter reqister: 1 - the address of a list cf addresses 
of RCEs. The hiqh-order byte of the last RCB must contain 
X'80«. 

Exit point: DSPDISP 
DSPPOST Function: Tpost one RCE. 

Parameter reqister: 1 - the address of an RCE. 

Exit point: DSPDISP 
DSPPOSTR Function: Tpost one RCE. 

Parameter reqister: 1 - the address of an RCB. 

Exit pcint: Address in reqister 14. 

DSPWATT Function: Obtain an RCE from the element chain cf a QCB, 
or, if none is there, wait for an RCE to arrive. 

Parameter reqisters: 

3 - the address of the QCE from which an RCB is to be 
obtained. 

7 - the address of the QCB that contains the STCE for the 
subtask to receive the element. 

Exit point: DSPDISP 

DSPTSTQ Function: Determine whether an STCB is twaitinq on a 
particular QCE, and, if it is not, chain the STCE cnto that 
QCB. 
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Parameter reqisters: 

3 - the address of the particular QCB. 

7 - the address of the QCB that currently has the STCB at 
the top of its chain. 

Exit point: DSPDISP 

DSPTSTQB. Function: Determine whether an STCB is twaitinq on a 
particular QCB, and if it is not, chain the STCE onto that 

QCB. 

Parameter reqisters: 

3 - the address of the particular QCB. 

7 - the address of the QCB that currently has the STCB at 
the top of its chain. 

Exit pcint: Address in reqister 14. 

DSPUNAV Function: Bemcve an STCE from cne QCB and place it into 
another . 

Parameter reqisters: 

3 - the address of the QCB that is to receive the STCE. 

7 - the address of the QCB that currently has the STCB at 
the top of its chain. 

Exit point: DSPDISP 

DSPUNAVR Function: Remove an STCB from one QCE and place it into 
another. 

Parameter reqisters: 

3 - the address of the QCB that is to receive the STCB. 

7 - the address of the QCB that currently has the STCB at 
the top of its chain. 

Exit point: Address in reqister 14. 

DSPP3I0 Function: Place an item into a chain by priority. 

Parameter reqisters: 

1 - the address of the item. 

7 - the address of the chain to receive the item. 

Exit point: DSPDISP 
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DSPPRIOK Function: Place an item into a chain by priority. 

Parameter reqisters: 

1 - the address of the item. 

7 - the address of the chain to receive the item. 

Exit point: Address in register 14. 
DSPLTFO Function: Place an item at the beqinninq of a chain. 

Parameter reqisters: 

1 - the address of the item. 

7 - the address of the chain to receive the item. 

Exit point: DSPDISP 
DSPLIFOR Function: Place an item at the teqinninq- of a chain. 

Parameter reqisters: 

1 - the address of the item. 

7 - the address of the chain to receive the item. 

Exit point: Address in reqister 14. 

DSPDTSP Function: Activate the hiqhest priority subtask that is 
waitinq on the hiqhest priority element that has been sent 
to a suttask. 

Parameter reqisters: Ncne. 

Exit point: Entry point of the activated subtask. 

DSPBYPAS Function: Activate a subtask immediately. 

Parameter reqisters: 

1 - the address of the element to pass to the subtask. 

3 - the address of the STCB that controls the subtask. 

7 - the address of the QCE that controls the STCB. 

Exit point: Entry point of the activated subtask. 

Functions: The TCAM Dispatcher allocates and schedules the system 
resources. The resources, or elements, wait in queues for allocation. 
The activity of these queues is controlled by the ready queue, which 
contains elements to be passed from cne subtask to another. 
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Associated with each element on the ready queue is the queue to which 
the element is directed. 

Each queue in the system is represented by a queue ccntrcl block 
(QCB) , which is the connectinq link between elements and the subtasks 
waitinq for the elements. A subtask control blcck (STCB) represents 
each waitinq suttask. A resource control block (FCE) prefaces each 
element. 

Elements and STCBs are inserted in their respective chains on the 
OCB in priority-FIFO order, that is, f irst-in-f irst-out within each 
priority class. 



Offset 


+4 
+8 



Queue Control Block 





ELCHN 








STCHN 



ELCHN - the address of first element controlled by this QCE, if the 
OCB controls any elements. 

STCHN - the address of first subtask ccntrcl block to receive control 
when an element is tposted to this QCB. 



The TCAM Dispatcher iqnores all other fields. 



Offset 


+4 



Resource Control Block 





' ■ ■ 

QBCA 


PRI 


LINK 



QBCA - the address of the OCB to which the FCE is tposted. 

PRI - the ready queue and chaininq priority of the FCB. 

LINK - the address of the next item in the chain in which this item 
appears. 

The TCAM Dispatcher iqnores all other fields. 
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Offset 


+4 



Subtask Control Block 



MC PI- 




PR! 


LINK 



MCPL - the subtask entry code (the key tc tell the TCAM Dispatcher how 
to find the subtask code) . 

PPI - the priority of the STCB r if it is to be compared against 
ethers. 

LINK - the address of the next item in the chain in which this item 
appears, if any. 



The TCAM Dispatcher ignores all other fields. 



When an element reaches the top of the ready queue (AVTPEADY) , the 
TCAM Dispatcher activates the highest priority subtask associated with 
the QCB indicated by the first word of the FCB. This element becomes 
the parameter passed to the newly-activated suttask. 

The TCAM Dispatcher removes the highest priority element from the 
ready queue by placing the address of the element in register 1. The 
Dispatcher then places the link field of the FCB of the element in the 
ready gueue - this puts a new element at the top of the ready gueue. 

when there are no elements en the ready gueue, AVTPEflEY contains 
the address of AVTDELEM, which has a zero priority value. The QCE 
pointer in AVTDELEM points to a QCE that has an STCB with an MCPL 
field of zero. In this situation the TCAM Dispatcher activates a 
special routine within itself. This rcutine issues a system WAIT 
command. TCAM Dispatcher activity resumes when an I/O routine or an 
application program causes an OS interrupt to tpost an element to the 
ready gueue. 

when an element is tposted to a QCB that represents an attached 
TCAM subtask, the TCAM Dispatcher links the element into the element 
chain of the QCE and posts the ECB (the second word of the QCB) for 
the attached task complete. The Dispatcher recognizes this situation 
when the MCPL field of the STCB is egual to X'02'. 

When TCAM is executing in a multiprocessing environment, the TCAM 
Dispatcher examines OCBSTVTO for a zero before inserting an element in 
the QCB element chain and posting the ECB for the attached task. If 
OCBSTVTO is egual to zero, processing proceeds as just described; 
otherwise, the Dispatcher loops until the byte at QCBSTVTO is egual to 
zero. 
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When the value of the MCPL field of the STCB beinq examined by the 
TCAM Dispatcher is qreater than X , 02' and less than X'OC 1 , the 
Dispatcher calculates the entry point of the subtask to be dispatched. 
If the MCPL value is X'04 1 , the subtask entry point immediately 
follows its two-byte STCB; therefore, the entry point is equal to the 
address of the STCB plus two bytes. If the MCPL value is X'06', the 
Dispatcher adds four bytes to the STCB address; if the MCPL value is 
X f 08', the Dispatcher adds six bytes to the STCB address; and if the 
MCPL value is X'OA 1 , the Dispatcher adds eight bytes to the STCB 
address. 

When the value of the MCPL field is qreater than X'OA', the TCAM 
Dispatcher activates a subtask by usinq the MCPL field as an index 
into the AVT branch table located at AVTDTSP. 

If a subtask is to execute without receivinq an element, it is 
activated if its STCB is tposted, as if it were an RCB, with the MCPL 
field containinq the correct subtask entry code, the next three bytes 
containinq the address of AVTBEADY-8, the PBI field containinq a 
priority value, and the LINK field containinq space for a link 
address. 

To support dispatchinq while enabled for interruption, the 
Dispatcher uses two ready queues. One of these is used by disabled 
appendaqes for tposting elements; the ether is used by enabled 
modules. The two ready queues are not manaqed by the same technique; 
however, each is called a ready queue because it contains elements to 
be processed by various subtasks. 

The ready queue for the appendaqes is FIFO only and consists of 
two words: pointers to the first and the last elements on the queue. 
Appendaqes put an element on the queue by linking the new element to 
the one pointed to by the second word of the ready gueue. 

The enabled ready queue is manaqed by the priority-FIFO technique. 
The TCAM Dispatcher has the responsibility of merqinq the two ready 
queues iust prior to dispatchinq. When the ready queues are empty, 
the TCAM Dispatcher issues a system WAIT macro, which can be satisfied 
by a tpost from an appendaqe or from an application program. 

External Routines ; 

• OS Wait routine (SVC 1) - to wait for an interrupt. 

• OS Post routine (SVC 2) - to post the FCB for an attached task. 

• OS Delete routine (SVC 9) - to delete the Start-up Message routine 
from main storaqe. 

Tables/Work Areas; QCB, BCB, STCB, AVT. 

Attributes: Beentrant, refreshable. 
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TCAM Dispatcher with Subtask Trace (Chart BC) 

Module Name; IGGC19R0 

Entry Point; IGGC19R0 

The TCAM Dispatcher with Subtask Trace provides the same queue 
management entry points as the TCAM Dispatcher (IGG019RB) . 

Functions: The TCAM Dispatcher with Subtask Trace is the same as the 
TCAM Dispatcher (IGG019RE) except that it provides one additional 
function. Each time a subtask is activated, the TCAM Dispatcher with 
Subtask Trace makes an entry in the wraparound Subtask Trace Table 
pointec to by AVTDISTR. 

The Dispatcher with Subtask Trace is included in a TCAM MCP when 
the DTRACE keyword of the INTRO macro is coded with a nonzero 
numerical value. The DTRACE keyword defines the number of entries in 
the Subtask Trace Table. The format and control of this table are 
discussed in the Diagnostic Aids section of this publication. 

External Routines: 

• OS Wait routine (SVC 1) - to wait for an interrupt, 

• OS Post routine (SVC 2) - to post the FCB for an attached task. 

• OS Delete routine (SVC 9) - to delete the Start-up Message routine 
from main storaqe. 

Tables/Work Areas: AVT, QCE, FCB, STCB, Subtask Trace Table. 

Attributes: Reentrant, refreshable. 



AQCTL SVC 102 Routine (Chart IB) 
Module Name: IGC102 

i?ntrv Point: IGC102 - called by an SVC 102 command from any routine 
in the system. 

^unctions: This is a multipurpose routine (resident Type I SVC) that 
performs the fcllcwinq functions: 

• Movinq data across partition boundaries. 

• Postinq ECEs in other tasks. 

• Tpostinq elements to the TCAM disabled ready queue. 

• Elaqqinq the TCB that represents a TSC application proqram as 
eliqible cr not eliqible for swap. 
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• Flagging the TCB that represents an application program as 
eligible or net eligible for rollout. 

When a routine in the TCAM system needs to have cne of the above 

functions performed, it builds the standard parameter list for a 

specific function and places a pointer to that list in reqister 1. 

The routine then issues an SVC 102 command to activate the AQCTL SVC 
102 routine. 

Tf the routine that activates the ACCTL SVC 102 routine is not 
part of the MCP task, the AQCTL SVC 102 routine tests for a 
multiprocessinq environment. If the result of this test is negative, 
this routine issues a EALB to the CS Task Pemoval routine to flag the 
MCP not eligible to be dispatched. 

Byte of each standard parameter list contains the action code 

for the AQCTL SVC 102 routine, and the hiqh-order byte of the last 

word in each list contains X'80'. The value of each bit in byte is 
as follows: 

Bit "Function 

Flag the issuing task not eligible for rollout 

1 Pest the ROEI ECB complete 

2 Post a standard or TSC ECB complete 

3 Flag the issuing task not eligible for swap 

4 Move data across a partition boundary 

5 Enaueue an element on the disabled ready gueue and 
pest the MCP ECB complete 

6 Flag the issuing task eligible for swap 

7 Flag the issuing task eligible fcr rollout 

The ECBs that this routine cause to be posted complete are in 
three different categories. 

1. TSO (Time Sharing Option) - this type of ECE belongs to a task 
that may not be in main storage (swapped out) at the time of the 
post. 

2. BOBT (Bollcut/Bollin) - this type of ECE is fcr a task that may 
not be in main storage (rolled out) at the time of the post. 

3. Standard - this type of ECB is always in main storage at the time 
of the post. 

The AQCTL SVC 102 routine interfaces with the OS Pest routine 
(IEAQSY50) , a resident Type I SVC, at a special non-validity checking 
entry point (IEA0PT01) , the address of which is in the CVT. Input for 
the Post routine at this entry point is as follows: 

Register 15 - the address of the branch entry IEA0PT01. 

Begister 14 - the return address. 
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Reqister 13 - in the low order 16 bits, the TJID (TSO Job 
Identifier) for the ECE to be posted. For ECBs that are not 
rolled out, this reqister contains binary zeros. 



Reqister 11 - the complement of the ECB address, 
partition post, the low-order bit is set to one. 



For a cross- 






x.ne compjLerion code. 



When the task is currently rolled out, the AQCTL SVC 102 routine 
sets a bit in the TCE to indicate to the Bollout/Rcllin routine at 
rollin time that there is a POST pendinq for this task. 

^he AQCTL SVC 102 routine branches to the Time Sharinq Interface 
routine in the nucleus of a task to be flaqged eligible or not 
eliqible for swap. The interface is accomplished via the TSEVENT 
macro. 

The contents of the parameter list built by the callinq routine 
vary accordinq to the bit settinq in the action cede control byte. 

• For POST requests only, the list may contain either two or three 
fullwords. The high-order byte of the first fullword is' a- flag 
byte used to communicate to AQCTL the type of ECB to be posted. 

• TSO and standard (TJID^O) - all bits are set equal to zero, except 
bit 2 (X'20 1 )- The three low-order bytes of the second word 
contain the address of the TJID or cf a halfword that contains 
binary zeros. 





+4 



X '20' 


ECB Address 


X '80' 


TJID Address 



RORI ECB - bit 1 of the action code byt€ (X'UO 1 ) is on, and the 
lew-order three bytes of the first word contain the ECB address. 
The second word contains the TCB address for the task being 
posted. Word three contains the address of the DEB associated 
with the ECB teinq posted. 





+4 

+8 



X '40' 


ECB Address 


X '00' 


TCB Address 


X '80' 


DEB Address 
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To effect cross-partition data movement, the calling routine 
provides a three-word parameter list. The first word contains the 
address of the data to be moved. The second word contains the 
address of the tarqet field of the move, and the third contains 
the address of a halfword that contains the length in bytes of the 
data field. Bit 4 of the action code byte is set to one. 



o 

+4 
+8 



X'08' 


Data Address 


X '00' 


Target Address 


X'80' 


Length Address 





+4 

+8 



If the target field is the disabled ready gueue and the MCP ECB is 
to be posted, bit 5 is set egual to 1. 

Tf the TCB under which the SVC is issued is to be flagged for TSO, 

bits 3 and 6 of the flag byte are used. If the "eligible for 

swap" flag is to be set, bit 6 is set to one. If the "not 
eligible for swap" flag is to be set, bit 3 is set to one. 

When the calling routine wishes to flag a TSO TCE eligible for 
swap and post an ECB, it builds a three-word list. Bits 2 and 6 
must be turned on for this option. 



Flag 


ECB Address 




TJID Address 


X '80' 


TCB Address 



If the calling routine wishes to flag a task eligible fcr rollout 
and to post an ECB complete, it builds a three-wcrd parameter 
list. Bits 1 and 7 of the action code byte are set egual to one. 



Flag 


ECB Address 




TCB Address 


X '80' 


DEB Address 



+4 
+8 



Upon the completion of the AQCTI SVC 102 routine, register 15 
contains a return code. Fcr a successful operation, the return code 
is binary zero. If this SVC is issued and there is not an active TCAM 
MCP in the system, the routine is not executed and the return code is 
four. Tn a multiprocessing environment, the AQCTL SVC 102 routine 
turns off the TCBTPSP bit in the TCB tc indicate that the task is 
again eligible tc be dispatched. 
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External Routines: 

• OS Set Status routine (SVC 79) - to set the TCB status, 

• OS ^ost routine (SVC 2) - to post ECBs complete. 

• IKJTSIOO - ISC Interface routine - to flag TSQ tasks. 

• TESTDSP - OS Task Removal routine - to flaq the MCP not eligible 
to be dispatched. 

Tables/Work Areas; CVT, AVT, Time Sharing CVT. 
Attributes: Resident. 

Post Pending Routine (Chart RQ) 

Module Name; TGGC19RQ 

Entry Point; IGG019RQ - activated by the Pollout/Rollin SVC Routine 
(IEAQRORI) when there is an OS POST pending for a task that is 
currently being rolled in. A post pending is indicated by a bit 
setting (TCBTCPP) in the TCB of an application program. 

Functions: This module turns off the "post pending" bit in an 
application program DEB and passes the address of the ECB for that 
application prcgram to the OS Post SVC routine to be posted complete. 

The Post Pending routine finds the address of the ECE that is to 
be posted by scanning the TCB DEB chain for the TCAM DEB for which a 
post is pending. A post pending is indicated in the DEBTAMPP byte in 
an application prcgram DEB. The DEE field DEBOCEAD points to the 
Read-ahead QCB in the process entry wcrk area. The Post Pending 
routine uses an offset from the Read-ahead QCB to locate the ECB in 
the process entry work area. After the DEB chain is completely 
examined, the Pest Pending routine returns ccntrcl to the 
Rollout/Rollin routine. 

External Routine; OS Pest routine (SVC 2) - to post an ECB complete. 

Tables/Work Areas: CVT, AVT, TCB, DEB, process entry work area, PCB. 

Attributes: Reentrant, refreshable, supervisor mode. 
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MESSAGE HANDLING - LINE MANAGEMENT ROUTINES 

Leased Receive Scheduler (Chart R3) 
Module Name : IGGC19R3 
Entry Points : 

• TGG019R3 - the Leased Receive Scheduler entry point - activated by 
the TCAM Dispatcher when the Leased Receive Scheduler STCB is 
first on the STCB chain of the LCB at the top cf the ready queue. 

• OEVENT - the QEVENT routine entry point - activated when the TCAM 
Dispatcher reaches the QEVENT STCB, which is always the last STCB 
in the chain cf schedulers for a line. 

Functions: The first function of the Leased Receive Scheduler is to 
check the "closedown" bit in the AVTBIT1 field in the AVT to determine 
whether a closedown is in process. If there is a closedown in 
proqress, the routine returns to the Dispatcher indicatinq that 
control is to be passed to the next subtask referred tc by the STCB 
chain of the LCB. This causes completion of all receive operations 
for the line. 

The Leased Receive Scheduler inspects the invitation list to 
determine whether it is active. For an inactive invitation list, the 
scheduler returns to the TCAM Dispatcher tc have the next subtask for 
the line dispatched. 

If there are active entries in the invitation list, the Leased 
Receive Scheduler determines whether the last entry serviced is the 
last active entry in the invitation list. If it is not the last 
active entry, the Leased Receive Scheduler exits to the TCAM 
Dispatcher to tpost the ERE to the Buffer Request QCB. If the entry 
is the last active entry in the list, the Receive Scheduler branches 
to the Time Sharinq Scheduler (TEDAYZ) if ISO is active. Upon return, 
the Receive Scheduler resets the LCB pointer (LCBINVPT) to the first 
entry in the list and tests for a specified end-of-poll time delay. 
If a time delay is specified, the Leased Receive Scheduler tposts the 
LCB to the time delay queue and removes the Leased Receive Scheduler 
STCB from the STCB chain of the LCB by priority; otherwise, the 
scheduler tposts the LCB to itself to initiate a receive operation for 
the first entry in the list. 

The QEVENT routine first links to the Time Sharinq Scheduler 
(IEDAYZ) if TSC is active in the system. In this case, the Time 
Sharinq Scheduler initiates a monitor channel proqram on a time 
sharinq line that can timeout. (A prepare sequence monitors the line 
for use of the attention key.) Upon return from the Time Sharinq 
Scheduler, the QEVENT routine determines whether there is more 
activity for the line. If not, this routine marks the LCB for the 
line "free". 
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External "Routines ; 

• OS Post routine (SVC 2) - to post the Operator Control ECB 
complete. 

» TEDAYZ - Time Sharinq Scheduler - to initiate a monitor channel 



procrram on a time sharin 






• TGG019RB etr IGG019RO - TCAM Dispatcher - the DSPUNAVR entry point, 
to exchange the scheduler STCBs. 

Tables/Work Areas : DCE, LCB, QCB, RCE, STCB, AVT, Terminal Table, 
Time Sharinq CCB. 

Attributes ; Serially reusable, refreshable, problem prcqram mode, 
resident. 

Dial Receive Scheduler (Chart R1) 

Module Name ; IGGC19R1 

Entry Point ; 'TGGC19R1 - activated by the TCAM Dispatcher when the 
Dial Receive Scheduler STCB is the first STCB in the STCB chain of the 
LCB at the top of the ready queue or when a Destination QCB has been 
tposted to itself as a result of the CLOCK cr INTVAL operand on the 
INTRO macro. 

Functions : The Dial Receive Scheduler initiates receive operations for 
a dial line and prepares for send operations upon completion of the 
input.. 

If a dial line is beinq used by TSO, the Dial Receive Scheduler 
activates the Time Sharinq Scheduler (TEEAYZ) to schedule operations. 
In this case* the Time Sharinq Scheduler builds a monitor channel 
proqram for lines that have the attention feature but time out. The 
channel prcqram monitors the line for an attention. 

When the input element to the Dial Receive Scheduler is a 
Destination OCE, one cf two possible conditions exits* Either the 
OCB is associated with a destination LCB that has just been found by 
the Send Scheduler or the LCB contains an indication that the 
connection with a terminal is complete. In the first case, the Send 
Scheduler has removed the OCB from the time delay queue, has found the 
associated LCB, and has tposted the OCB to the Dial Receive Scheduler. 
The scheduler, at this point, calculates the Termname Table offset for 
the destination terminal and uses the Termname Table code to qet the 
terminal entry. The scheduler verifies the Destination QCE for the 
terminal to be dialed by comparinq the input QCB to the Destination 
OCB specified in the terminal entry. The scheduler then stores the 
Termname Table offset in the LCB and exits to the TCAM Dispatcher to 
tpost the EPS tc the Buffer Request OCB to request initial buffers. 

Khen the input element is a Destination OCB and the associated LCB 
contains an indication that the terminal connection is complete, the 
Dial Receive Scheduler calculates the period for the time delay 
between calls and exits to the TCAM Dispatcher to tpost the 
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Destination CCE to the time delay queue to prepare for the next call 
to be made. 

When the input element to the Dial Receive Scheduler is an LCB and 
the last operation for the terminal that is presently connected did 
not result in a neqative invitation response, or if there is no 
current terminal connection, the Dial Receive Scheduler exits to the 
TCAM Dispatcher to tpost the ERB to the Buffer Request QCE to request 
initial buffers. 

If the last operation resulted in a neqative invitation response, 
the Dial Receive Scheduler scans the dial-cut call queue to determine 
whether there is a messaqe for the connected terminal. (A QCE for a 
dial terminal is placed in the dial-out call queue when there is a 
messaqe for an unavailable line.) If there is a messaqe for the 
terminal, the scheduler removes the associated QCB from the dial-out 
call queue, moves the Send Scheduler STCB of that QCB to the first of 
the STCB chain of the LCB for the line, and returns to the TCAM 
Dispatcher to have the LCB tposted to itself in order to initiate 
sendinq to the connected terminal. 

If there is no messaqe for the connected terminal, the scheduler 
scans the dial-out call queue to find the QCB with the hiqhest nonzero 
priority. "For priority messaqes, the scheduler removes this QCB from 
the queue and returns to the TCAM Dispatcher to have the Send 
Scheduler STCE cf this QCB chained into the STCB chain for the LCB. 
If there are only zero priority QCBs on the dial-out call queue, the 
scheduler uses the first QCE found that has a relative line number 
that is qreater than or equal to the relative line number of the 
currently connected line. 

If the dial-out call queue does not contain a QCB with a nonzero- 
priority level messaqe or a QCB with a zero-priority level messaqe and 
a relative line number that is qreater than or equal to the relative 
line number of the current line, the Dial Receive Scheduler returns to 
the TCAM Dispatcher to tpost the ERB for the line to the Buffer 
Request QCB tc request buffers. This initiates a receive operation. 

External Routines : 

IEDQTNT - Termname Table code - to find the address of an entry in 
the Terminal Table. 

OS Time routine (SVC 11) - to obtain the current time of day. 

IEDQHG - Time Delay subtask - The IEDQBG01 entry point, to put the 
Destination QCB on the time delay queue. 

OS EXCP routine (SVC 0) - to disconnect a dial line (output only) . 

TGG019RB or IGG019RO - TCAM Dispatcher - The DSPUNAVR entry point, 
to place an STCB at the top of the STCB chain of the ICE. 

IEDAYZ - Time Sharinq Scheduler - to build a monitor channel 
proqram for time sharinq lines. 
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Tables/Work Areas : DCB, DEB, LCB r QCB r RCB, STCE, AVT, Terminal 
Table, Time Sharinq OCB. 

Attributes : Serially reusable, refreshable, problem program mode, 
resident. 



Local Receive Scheduler (Chart Q1) 

Module Name : IGGC1901 

Entry Point : TGG019Q1 - activated by the TCAM Dispatcher when the 
special attention element is tposted to this module or when an LCB is 
tposted to itself with the IGG019Q1 STCB first on its STCB chain. 

Functions : The Local Receive Scheduler schedules receive operations 
for 2260 Local lines. 

The Local deceive Scheduler is activated three times in crder to 
receive a messaqe from a 2260 Local device. An- attention interrupt 
activates the Attention routine (TEDQATTN) , which activates the 
Attention Handler (IGG019R5) . The Attention Handler tposts the 
special attention element to the Local Receive Scheduler QCB. The 
Local Receive Scheduler processes the special element and then tposts 
the appropriate LCB to activate itself in crder to schedule the 
receive operation. After the receive operation is complete, the 
scheduler frees the LCB. 

The specific functions of the local Receive Scheduler depend upon 
the specific input that causes the Dispatcher to activate this 
scheduler. If the input is the special attention element, the Local 
Receive Scheduler first frees the element. Then, if the LCB is busy, 
the scheduler returns to the TCAM Dispatcher at entry point DSPDISP so 
that the next suttask en the ready queue can be activated. If the LCB 
is free, the Local Receive Scheduler tposts the LCB to itself and 
returns to the Dispatcher (DSPPOST) . 

Tf the input is an LCE, the Local Receive Scheduler determines 
whether a closedown is in proqress and if sc, returns to the TCAM 
Dispatcher without schedulinq any further operations. If a stop line 
is in proqress, the Local Receive Scheduler tposts the LCE to the Stop 
Line QCB. If there are no active entries in the invitation list for 
this line, the scheduler returns to the TCAM Dispatcher at DSPPOST in 
order to activate the next subtask. Tf there is an active entry in 
the invitation list, the Local Receive Scheduler sets the LCB to 
request buffers and tposts the LCE to the Buffer Request QCB. After 
a receive operation is complete, the scheduler frees the LCB. 

External Routines : None. 

Tables/Work Areas : AVT, DCE, LCB. 

Attributes: Reentrant, refreshable. 
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Send Scheduler (Chart BU) 

Module Name: IGGC19B4 

Fntry Point : IGG01 9F4 - activated by the TCAM Dispatcher when the 
Send Scheduler STCB is referred to by the buffer, LCB, or QCB at the 
top of the ready queue. 

Functions: The first function of this module is to determine the type 
of element tc be processed. There are three possible types of 
elements: 

• A buffer 

• An LCB 

• A QCB for a dial line tpcsted tc itself 

If a buffer is tposted to a Destination QCB , the Send Scheduler 
returns to the TCAM Dispatcher to dispatch the next subtask 
represented in the STCB chain of the Destination QCB. This subtask is 
the Destination Scheduler, which assiqns a disk or main storaqe 
queuinq address for the buffer. When the last buffer of a messaqe or 
the first buffer cf an initiate mode messaqe is handled by the 
Destination Scheduler and the Send Scheduler STCB is in the STCB chain 
of the Destination QCB, the Destination Scheduler branches into the 
Send Scheduler to find a line over which the messaqe can be sent. The 
search beqins with the LCB with the same relative line number 
specified in the CCE. 

Tf the line is not a dial line, the Send Scheduler uses the LCB 
indicated by the relative line number in the Destination QCB as the 
one for the line over which the messaqe is to be sent. If the line is 
free, the Send Scheduler tposts the LCB tc itself and moves the Send 
Scheduler STCB from the STCE chain of the Destination QCB to the STCB 
chain of the LCB. If the line is not free, the scheduler takes any 
necessary special action, that is, qoinq tc an open list with Auto 
Poll or issuinq an TOHALT macro, and moves the Send Scheduler STCB to 
the LCB without tpostinq the LCB tc itself. 

If the line is a dial line, the Send Scheduler searches the LCB 
indicated by the relative line number in the QCB to find the available 
LCB with the lowest relative line number. Tf CALL=NONE is specified 
for the terminal, a line is used only if the terminal is currently 
connected on a line. The Send Scheduler issues an IOHALT macro (if it 
is needed) fcr a line that is not connected, and moves the Send 
Scheduler STCB f rem the STCB chain cf the Destination QCE to the STCB 
chain of the LCB. If no available or free line is found, the 
scheduler chains the Destination QCB into the dial-out call queue. 

A Send Scheduler dispatched frcm an LCB indicates that a send 
operation is teinq initiated. If the line is beinq used for TSO, the 
Send Scheduler activates the Time Sharinq Scheduler to check for 
partial line reads or simulated attention reads. (These have priority 
over output operations.) If there is a quick closedown in proqress, 
return to the Dispatcher activates the subtask pointed to by the next 
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STCB in the STCB chain of the LCE. Otherwise, if there is a message 
to send, the Send Scheduler identifies the hiqhest priority messaqe, 
initializes the LCB for sendinq, and tposts the ERE, which contains 
the number of buffers to be sent, to the Disk I/O QCE to initiate 
sendinq the iressaqe. If a teririnal on the line is in locked mode, 
lock response messaqes have the hiqhest priority. Otherwise, initiate 
mode messaqes and then the priority-FEFO messaqes have the hiqhest 
priority. If there is no messaqe to send, the Send Scheduler returns 
to the Dispatcher indicatinq that the STCB for the current Send 
Scheduler is tc be returned to the first position in the STCB chain of 
its Destination OCB. 

The function cf the Send Scheduler when there is a Destination QCB 
for a non-TSO dial line tposted to itself is to search for an 
available line in the line qroup of the QCE. If there is no line 
available, the Destination QCB is placed en the dial-out call queue. 
Tf there is a line available, the Send Scheduler STCB is linked into 
the LCB STCB chain of the LCB. In ether words, the functions here are 
the same as when a buffer is tposted and the lines are dial. 

If the line is for a TSO operation, the Dial Receive Scheduler 
activates the Time Sharinq Scheduler. The Time Sharinq Scheduler 
determines whether TSO has issued a write break operation request or 
a simulated attention read request. These should be honored before 
other ^CAM processinq resumes. 

Upon the completion cf any of the above functions, the Send 
Scheduler returns to the Dispatcher. 

External Routines : 

• TEDQTNT - Termname Table code - to qet the address of an entry in 
the Terminal Table. 

• OS IOHALT routine (SVC 33)- to halt I/O on the lines. 

• IGG019RB or TGG019RO - TCAM Dispatcher - the DSPUNAVR entry point, 
to put the Send Scheduler STCB in the LCB STCB chain; the DSPPOSTR 
entry point, to free the LCB. 

• TEDAYZ - Time Sharinq Scheduler - to monitor TSO requests. 

• OS EXCP routine (SVC 0) - to start channel activity. 

Tables/Work Areas : DCB, LCB, QCB, RCB, STCB, AVT, Terminal Table, 
T'iire Sharinq CCE. 

Attributes : Serially reusable, refreshable, problem prcqram mode, 
resident. 



Send Scheduler for Leased Lines and Wo TSO (Chart Q6) 
Module Name : IGGC19Q6 
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Entry Point : IGG019Q6 - activated by the TCAM Dispatcher when the 
Send Scheduler STCE is referred to by the buffer, LCB, or QCB at the 
top of the ready queue. 

Functions : The functions of this routine are the same as those for 
the Send Scheduler (TGG019B4) except that it contains loqic for leased 
lines only and contains no TSO interface Icqic. 

External Routine s: 

• OS IOHALT routine (SVC 33) - to halt I/C on the lines. 

• OS EXCP routine (SVC 0) - to issue an EXCP on break. 

Tables/Work Areas : DCE, ICE, QCB, ECE, STCE, AVT, Terminal Table. 

Attributes : Serially reusable, refreshable, problem proqram mode, 
resident. 



Send Scheduler with No TSO (Chart Q7) 

Module Name : IGG019Q7 

Entry Point : IGGG19Q7 - activated by the TCAM Dispatcher when the 
Send Scheduler is referred to by the buffer, LCB, or QCB at the top of 
the ready queue. 

Functions : The functions of this routine are the same as those for 
the Send Scheduler (TGG019M) except that it contains no TSC interface 
loqic. 

External Poutines : 

• IEDQTNT - Termname Table code - to qet the address of a terminal 
entry. 

• CS IOHALT routine (SVC 33) - to halt I/C on the lines. 

• OS EXCP routine (SVC 0) - to issue an EXCP en break. 
Tables/Work Areas : DCE, LCB, QCB, HCB, STCE, AVT, Terminal Table. 

Attributes : Serially reusable, refreshable, problem prcqram mode, 

resident. 



Buffered Terminal Scheduler (Chart ED) 

Module Name: IGG019ED 

Entry Point : IGG019ED - activated by the TCAM Dispatcher when the LCB 
is on top cf the ready queue, by the TCAM Dispatcher when the Time 
Delay subtask tposts the Destination QCE to the Buffered Terminal Time 
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Delay QCB, and by the Destination Scheduler to move the Buffered 
Terminal Scheduler STCB frcm the Destination QCB to the LCB. 

Functions : This module schedules send and receive operations for 
buffered terminals, that is, 2740 Model 2 and 2770* In general, it 
performs in a manner analoqous to the send and receive schedulers for 
non-buffered terminals. The send function is different because the 
terminal has a hardware buffer. when a blcck of text is sent to a 
buffered terminal, the transmission is complete. However, TCAM must 
observe a time delay equivalent to the time required for the terminal 
to empty its buffer onto its output device. This scheduler tries to 
utilize the line for sendinq to or receivinq from other terminals on 
the line durinq the time delay for the terminal to which the last 
block of text was sent. Flaqs in the destination QCBSTAT field 
indicate whether the terminal is in send or receive mode. These 
states are mutually exclusive. 

The Buffered Terminal Scheduler waits on the Destination QCB and 
the LCB. There is an STCB for each Destination QCB and LCB. When a 
buffer is tposted to the Destination QCE, the scheduler passes the 
buffer to the Destination Scheduler (IEDQHM) . When IEDQHM recoqnizes 
end-of-messaqe, it branches to the TAG subroutine in the scheduler. 
If the line is free, the scheduler uses DSPFOSTR to tpost the LCB to 
itself; if not, after return from the Dispatcher, the scheduler links 
its STCB from the QCB into the LCE STCB chain. This action indicates 
that there is a messaqe for the associated terminal* If Auto Poll is 
in proqress, it is stopped. The scheduler exits to IEDQHM. 

When the ICE is tposted to the scheduler, the scheduler tests for 
the type of the last operation. If the last operation was a receive, 
the scheduler tests for schedulinq priority. If equal priority is 
specified, the scheduler tests for end of invitation list. If it is 
not the end, the scheduler sets up the EBB to receive frcm the next 
entry in the list, and tposts the ERB to the Buffer Request QCB. 

If it is the end of the invitation list, the scheduler resets the 
current invitation list pointer to the beqinninq of the list and tests 
for somethinq to send to a terminal on the line. If send priority is 
in effect, the scheduler also makes a send test. If there is nothinq 
to send, the scheduler initiates a receive operation on the first 
entry in the invitation list. If there is somethinq to send to a 
terminal on the line, the next scheduler STCB in the LCB STCB chain is 
dispatched. 

If the QCE reflects an empty status, the scheduler removes the 
STCB from the LCB STCB chain, turns off QCBSEND, and exits to the 
Dispatcher by tpostinq the LCB to itself. If the QCB is not empty, 
the scheduler tests for send status (QCBRECEV=0) . If the send status 
is nonzero, the scheduler reenters the loop for testinq for somethinq 
to send. If the status is net receive, the scheduler turns on 
OCBSEND, builds the ERB to initiate the sendinq operation, and exits 
to the TCAM Dispatcher to tpest the ERB to the Disk I/O QCE. 

If the last operation on the line was a send, the scheduler 
observes a time delay for the destination of the last block. The 
scheduler stores the time delay interval in the QCB, and removes its 
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STCE from the 1CB STCB chain. The OCB is passed via a EALR to the 
Time Delay suttask branch entry point (TEDQHG01) . Upon return, the 
scheduler enters the "somethinq-else-to-send" loop. 

When the time delay interval expires, TEDQHG tposts the QCB to a 
OCB at BTSTDQCB in the scheduler CSECT. The scheduler returns its 
STCB from the QCF to the LCE STCB chain. If the line is free, the 
scheduler tpcsts the ICB to itself. The scheduler then exits to the 
Dispatcher . 

External Eoutines : 

• TEDQTNT - Termname Table code - tc obtain a terminal entry 
address. 

• IGG019FB or TGG019RO - TCAM Dispatcher - the DSPPOSTB entry point 
to tpost an element to the ready queue. 

• TEDQHG01 - Time Delay suttask - to implement a time delay. 

Tables/Work Areas ; AVT, SCE, LCB, QCE, LCE, DEE, invitation list, 
Terminal Table entry. 

Attributes: Feentrant, refreshable, problem proqram mode. 



Activate-T/O Generator Subtask (Chart KA) 
Module Name ; IEDQKA 
Entry Points ; 

• IEDQKA - Activate - when entered from the TCAM Dispatcher. 

• TEDQKA02 - T/C Generator - when qiven control from the line End 
Appendaqe. 

Functions ; This module builds channel prcqrams for initial contact, 
continue, and reset sequences. 

The Activate-I/O Generator subtask obtains as input the EBB or the 
buffer for the terminal or device in need of a channel prcqram. This 
suttask constructs a channel prcqram based upon the characteristics 
for the device as obtained from the Device Characteristics Table 
(DCT). . This subtask tests the characteristics bits and transfers 
control to an internal Expand subroutine, passinq an offset into a 
model CCW table. The model CCW table consists of a two-byte entry for 
each CCW built; 

Byte - an offset into an expander table. 

Byte 1 - CCW flaqs for the CCW beinq built. 

The Expand subroutine moves the specified CCW flaqs into the CCW 
and utilizes the index in byte of the model CCW table tc qain access 
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to information in the expander table. Each entry in the expander 
table contains the followinq data: 

Bytes 0-1 Offset to a subroutine that establishes address 
and count 

Byte 2 CCWDISAB - CCW OP code 

Byte 3 TFDISAE - TP OP code 

The Expand subroutine branches to the Expander subroutine 
indicated by the offset in the expander table entry. This subroutine 
computes the CCWDATA address and count befcre returninq to the Expand 
subroutine. Upcn reqaininq control, the Expand subroutine moves the 
CCW OP code into the CCW and the TP OP code into the LCBTPCD field of 
the ICB plus an adiustment , Each time a TP OP code is moved to 
LCBTPCD, the adiustment factor is incremented by one. In this way the 
^P OP codes for a channel proqram start at LCBTPCD and continue for as 
many bytes as necessary. 

After the first CCW in the necessary channel proqram sequence has 
been built, the Expand subroutine ad-justs a reqister to pcint to the 
next entry in the model CCW table. If this is not the last entry, the 
above actions are aqain performed tc construct the next CCW. 
Otherwise, the Expand subroutine returns to the in-line cede of the 
Activate- I/O Generator subtask, which places the address of the first 
CCW to be executed in the LCBSTABT field of the LCB. This routine 
exits to its callinq routine. 

External Poutines: 



• 



TEDQTNT- Termname Table code - to obtain the terminal entry 
address. 



• OS EXCP Poutine (SVC 0) - to start a channel proqram. 

Tables/Work Areas ; ICB, DCE, CCW, AVT, buffer prefix, SCE, Terminal 

Table. 

Attributes : Feentrant, refreshable, disabled and supervisor mode if 
entered from Line End Appendaqe, enabled and problem proqram mode if 
entered from the TCAPI Dispatcher. 



Activate-I/O Generator Subtask for BSC Lines (Chart KA) 
Module Name : IEDCKB 
Entry Points : 

• TEDOKE - Activate - when entered from the TCAM Dispatcher. 

• TEDOKA02 - T/C Generator - when qiven control from the Line End 
Appendaqe. 
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Functions: The functions of this subtask are the same as those for 
the Activate- I/O Generator except that the data in the model CCW and 
expander tables is for BSC lines only. 

External "Routines: 

• TEDQTNT - Termname Table code - to obtain the terminal entry 

address. 

• OS EXCP routine (SVC 0) - to start a channel program. 

Tables/Work Area s: LCB, DCB, CCW, AVT, buffer prefix, SCE, Terminal 
Table. 

Attributes: Reentrant, refreshable, disabled and supervisor mode if 
entered from line End Appendaqe, enabled and problem prcqram mode if 
entered from the TCAM Dispatcher. 



Activate-I/O Generator Subtask for Start/Stop Lines (Chart KA) 
Module flame : IEDCKC 
Entry Points : 

• TEDQKC - Activate - when entered from the TCAM Dispatcher. 

• TEDQKA02 - I/O Generator -' when qiven control from the line End 
Appendaqe. 

functions : The functions of this subtask are the same as those for 
the Activate-I/C Generator except that the data in the model CCW and 
expander tables is for start/stop lines only. 

External Routines : 

• IEDQTNT - Termname Table code - to obtain the terminal entry 
address. 

• OS EXCP routine (SVC 0) - to start a channel proqram. 

Tables/Work Areas : LCB, DCB, CCW, AVT, buffer prefix, SCE, Terminal 
Table. 

Attributes : "Reentrant, refreshable, disabled and supervisor mode if 
entered from Line End Appendaqe, enabled and problem prcqram mode if 
entered from the TCAM Dispatcher. 



Activate-T/O Generator Subtask for Leased and Start/Stop Lines and No 
TSO (Chart KA) 

Module Name : TEDCKD 
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Entry Points : 

•. IEDQKD - Activate - when entered from the TCAM Dispatcher. 

• IEDQKA02 - I/C Generator - when qiven control from the Line End 
Appendaqe. 

Functions : The functions of this subtask are the same as those for 
the Activate- I/O Generator except that the data in the model CCW and 
expander tables is for leased and start/stop lines only and contains 
no TSO interface loqic. 

External Routines : 

• TEDQTNT - Termname Table code - to obtain the terminal entry 
address. 

• OS EXCP routine (SVC 0) - to start a channel proqram. 

Tables/Work Areas : LCB, DCB, CCW, AVT, buffer prefix, SCE, Terminal 
Table. 

Attributes : Reentrant, refreshable, disabled and supervisor mode if 
entered from line End Appendaqe, enabled and problem proqram mode if 
entered from the TCAM Dispatcher. 



Activate-I/O Generator Subtask for a OTAM Compatible System (Chart KA) 
Module Name : TEDCKE 
Entry Points : 

• TEDOKE - Activate - when entered from the TCAM Dispatcher. 

• IEDQKA02 - I/O Generator - when qiven ccntrcl from the Line End 
Appendaqe. 

"Functions : The functions of this routine are the same as those for 
the Activate-I/C Generator except that it supports only those devices 
which OTAM supports. 

External Routines : 

• TEDQTNT - Termname Table code - to obtain the terminal entry 
address. 

• OS EXCP routine (SVC 0) - to start a channel proqram. 

Tables/Work Areas : ICB, DCB, CCW, AVT, buffer prefix, SCE, Terminal 
Table. 

Attributes : Reentrant, refreshable, disabled and supervisor mode if 
entered from Line End Appendaqe, enabled and problem proqram mode if 
entered from the TCAM Dispatcher. 
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Line End Appendage (Chart BO) 
Module Name ; IGGC19B0 
Entry Points : 

• IGG019B0 - activated by IOS when an I/O interrupt occurs with 
device or channel endinq status or by an EBP routine when an error 
is considered permanent or cleared. 

• SCAN - activated by PCI Appendaqe (IGG019BN) to scan for BSC line 
control characters. 

Functions : The line End Appendaqe is a lcqical extension of IOS and 
receives control when an I/O interrupt occurs with device or channel 
endinq status, when an error is determined to be permanent by EBP, or 
when an error is cleared by EBP. 

If a permanent error has not occurred, the Line End Appendage 
examines endinq status tc determine if EBP is tc be scheduled. 
Unusual endinq status results in a return to IOS to schedule the first 
load of EBP for this device. 

When EBP action is not required, the line End Appendaqe obtains 
the TP operation (OP) code for the failinq CCW by usinq the address in 
the CSW as an index arqument into a list of TP OP codes (LCBTPCD) . 
The TP OP code is used as an index into a branch table in order to 
take specific action for this interrupt. Two tables are employed. 
One is for normal endinq status; the other for error conditions 
detected by EBP. 

Eor errors that have occurred prior to text transfer, a zero- 
lenqth buffer is tposted to MH for INMSG/OTJTMSG processinq. 

If an EOB interrupt occurs while receivinq a messaqe, a restart is 
made from the appendaqe unless MH processing is desired. When EOT is 
received, the filled buffer (s) is tposted to MH indicating that this 
is end of messaqe. For an EOB interrupt en output, previous buffers 
are tposted tc the Euffer Beturn QCB and a restart is accomplished. 
The last buffer of a successfully sent messaqe is tposted tc Buffer 
Disposition for OTJTMSG processinq. All continue CCW sequences are 
built by the I/O Generator routine in IEDQKA. 

In the event of a text mode error, the above action is taken 
except that the buffer reflectinq the interrupt is tposted to MH to 
observe user-selected options. 

The SCAN subroutine is entered from the PCI Appendage routine 
(IGG019BN) as well as from the Line End Appendaqe* Its address is 
always at an offset of 4 into the Line End Appendaqe. OPEN moves this 
address into the AVTBSCAN field of the AVT so PCI Appendage can have 
access to it. The SCAN subroutine scans for incominq binary 
synchronous (ESC) line control characters. The subroutine checks for 
valid startinq and endinq characters. If these characters are valid, 
the Line End Appendaqe continues readinq. If the characters are 
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invalid, the line End Appendage, upon receiving ending status, exits 
to IOS to schedule the appropriate error recovery procedure (EBP) . 

The following Line End Appendaqe functions are unigue tc a TCAM- 
TSO environment. 

1. 2741 Line Control - A write data does not end with a circle C at 
the end of text. This allows subsequent writes to the same 
terminal without turning the line around. On each interrupt on a 
2741, the Line End Appendage sets or clears a switch to indicate 
whether a write circle C or a write circle D has been completed. 

2. Attention Handling/Hangup - If a TSO terminal has an attention 
key, the Line End Appendage use a prepare command to monitor the 
TSO line for an attention. The PREPARE command has a special TP 
OP code that causes the Line End Appendage to tpost the ERE* to the 
TSO TOHALT routine (IEDAYE) when the PREPARE indicates that the 
operator has struck the attention key. Tf the operator strikes 
the attention key while the terminal is receiving data, an 
intervention reguired on a write text CCW occurs and the Line End 
Appendage tposts the LCB to IEDAYE to issue a PREPARE HIO. If the 
PREPARE ends normally, the appendage sets the "attention" flag in 
the SCB and, if there are buffers in use, tposts the buffers to 
the MH. If there are no buffers in use, the appendage tposts the 
LCB to the ISC Attention routine (IEDAYA) . If the intervention 
reguired persists, the appendage assumes that the user is hung and 
tposts the LCB to the TSO Hangup routine (IEDAYH) . 

3. Write Break to a TSO Terminal - If a TSO terminal has the 
interrupt feature, priority data can interrupt a receive operation 
that is in progress. The Line End Appendage recognizes an HIO 
from the Time Sharing Scheduler (IEEAYZ) and, as a result, 
initiates a write break to turn the line around. When the break 
occurs, the appendage restores the CSW to show an end to the read 
and normal TCAM processing handles tposting the buffers. 

4. 2741/1050 Support on One Dial Line - In a TCAM-TSO environment the 
user can use either a 1050 or a 2741 terminal on a single dial 
line. After the user has dialed in, the Line End Appendage uses 
the first interrupt as a signal to decipher the terminal type. If 
the initial read ends in a time-out with no EOA or nothing 
received, the appendage assumes a 1050. If the read ends with, a 
time-out with EOA received or ends normally, the appendage assumes 
a 2741. Further operations for the terminal are based on the 
setting of the "2741" indicator bit (LCE2741N) in the LCBfield 
LCBTSCB. 

External Routines : 

• OS Post routine (SVC 2) - to post the TCAM Dispatcher ECB. 

• TEDQTNT - Termname Table code - to obtain a terminal entry 
address. 

• TEDOKA - Activate-I/O Generator subtask - to build a continue 
seguence cr a channel program. 
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• TESTDSP - CS Task Removal routine - tc flaq a TCB not eligible to 
be dispatched . 

• TGG019Q0 - line I/O Interrupt Trace routine - to make an entry in 
the Line I/O Interrupt Trace Table. 

Tables/Work Areas: AVT, CCW, DCE, buffer prefix, ICE, QCB, RCB, SCB, 
Terminal Table. 

Attributes: Supervisor mode, disabled, refreshable. 



Line End Appendage for BSC lines (Chart 02) 
Module Name: IGG019Q2 
Entry Points : 

• IGG01902 - activated by IOS when an I/O interrupt occurs with 
device or channel ending status, or by an ETRP routine when an 
error is considered permanent or cleared. 

• SCAN - activated by PCI Appendage (IGG019BN) to scan for BSC line 
control characters. 

Functions : The functions of this routine are the same as those for 
the Line End Appendage routine (TGGC19R0) except that this routine 
contains logic for ESC line control only. 

External Routines : 

• OS Post routine (SVC 2) - to post the TCAM Dispatcher ECB. 

• TEDQTNT - Termname Table code - to obtain the terminal entry 

address. 

• TEDOKA - Activate-I/O Generator subtask - to build a channel 
program. 

• TESTDSP-OS Task Removal routine - to flag a TCB not eligible to be 
dispatched. 

• TGG019O0 - line I/O Interrupt Trace routine - tc make an entry in 
the line I/O Interrupt Trace Table. 

Tables/Work Areas : AVT, CCW, DCE, buffer prefix, ICE, QCE, RCB, SCB, 
Terminal Table. 

Attributes: Supervisor mode, disabled, refreshable. 



Line End Appendage for Start-Stop lines (Chart Q3) 

Module Name : IGG019O3 
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Entry Point : IGGC19Q3 - activated by IOS when an I/O interrupt occurs 
with device or channel endinq status, or ty an EFP routine when an 
error is considered permanent or cleared. 

Functions : The functions of this routine are the same as those for 
the Line End Appendaqe routine (IGG019R0) except that this routine 
contains loqic for start/step line control cnly. 

External Routines : None. 

OS Post routine (SVC 2) - to post the TCAM Dispatcher ECB. 

TEDQTNT - Termname Table code - to obtain the terminal entry 
address. 

IEDQKA - Activate-I/O Generator subtask - to build a channel 
program. - I/C Generator subtask - to build 

TESTDSP — CS Task Removal routine - to flaq a TCB not eliqible to 
be dispatched . 

IGG019Q0 - line I/O Interrupt Trace routine - to make an entry in 
the line I/C Interrupt Trace Table. 

Tables/Work Areas: AVT, CCW r DCB r buffer prefix, ICE, QCE, RCE, SCE, 
Terminal Table. 

Attributes: supervisor mode, disabled, refreshable. 



Line End Appendaqe for leased and Start/Stop Lines and No TSO (Chart 

cun 

Module Name : IGG019O4 

Entry Point : IGGC1904 - activated by IOS when an I/O interrupt occurs 
with device or channel endinq status, cr by an ERP routine when an 
error is considered permanent or cleared. 

Functions : The functions of this routine are the same as those for 
the line End Appendaqe routine (IGG019PC) except that this routine 
contains loqic for leased and start/stop lines only and contains no 
TSO interface lcqic. 

External Routines : 

• OS Post routine (SVC 2) - to post the TCAM Dispatcher ECB. 

• IED0TNT - Termname Table code - to obtain the terminal entry 
address. 

• TED0KAO2 - Activate-I/0 Generator subtask - to build a continue 
sequence. 
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• TESTDSP - CS Task Removal routine - to flaq a TCB not eliqible to 

be dispatched. 

Tables/Work Areas: AVT, CCW, DCE, buffer prefix, LCE, QCE, RCE, SCB, 
Terminal Table. 

Attributes: Supervisor mode, disabled, refreshable. 



Line End Appendage for a QTAM Compatible System (Chart Q5) 

Module Hame : IGGC19Q5 

Entry Point : IGGC19Q5 - activated by TOS when an I/C interrupt occurs 
with device or channel endinq status, or by an EBP routine when an 
error is considered permanent or cleared. 

Functions: The functions of this routine are the same as those for 
the Line End Appendage routine (TGG019R0) except that this routine 
contains Icqic necessary to operate with devices supported by QTAM 
only. 

External Foutines : 

• OS Post routine (SVC 2) - to post the TCAM Dispatcher ECB. 

• TEDQTNT - Termname Table code - to obtain the terminal entry 
address. 

• TEDQKA02 - Activate-T/O Generator subtask - to build a continue 
sequence. 

• TESTDSP - OS Task Removal routine - to flaq a TCB not eliqible to 

be dispatched. 

Tables/Work Areas : AVT, CCW, DCE, buffer prefix, LCE, QCB, RCE, SCB, 
Terminal Table. 

Attributes: Supervisor mode, disabled, refreshable. 



Attention Routine (Chart TN) 



Module Name: IIDCATTN 



Entry Point : IEDCATTN - activated by IOS when an attention interrupt 
occurs. 

Functions : This module is a resident routine of IOS and receives 
control when an attention interrupt is presented by the 2848 control 
unit. Its function is tc determine if TCAM is runninq in the system 
and to pass contrcl to another module (IGG019R5) , which will attempt 
to schedule a receive operation. 
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Tf TCAM is not runninq in the system, the Attention routine 
returns to IOS, where the interrupt is iqncred. 

External Routines : None. 

Tables/Work Areas: AVT. 

Attributes: Resident, supervisor mode, disabled. 



Attention Handler (Chart R5) 

Module Name : IGG019P5 

Entry Point : IGG019R5 - activated by the Attention routine (IEDQATTN) 
after an attention interrupt. 

Eunctions : This module searches the DEB chain to determine if a DCB 
has been opened for this device. This module returns tc TOS with no 
further action taken if the DCB has not been opened. The Attention 
Handler schedules receive operation for the device if a closedown is 
not in proqress and the line is not in a stopped state. 

External Routines : 

• OS Post routine (SVC 2) - to pest the TCAM Dispatcher ICB. 

• TESTDSP - CS Task Removal routine - tc flaq a TCB not eliqible to 

be dispatched. 

Tables/Work Areas : AVT, TEE, LCB, DCB. 

Attributes: Supervisor irode, disabled, refreshable. 



Line I/O Interrupt Trace Routine (Chart QO) 



Module Name: IGGC1900 

Entry Point : IGG019Q0 - activated by the Line End Appendaqe 
(IGG019R0) when it receives an I/O Interrupt and the I/O interrupt 
trace facility has been requested. 

Eunctions: The Line I/O Interrupt Trace routine makes an entry in the 
Line I/O Interrupt Trace Table each time that it is activated. One 
table entry contains the T/0 sense information., channel status word, 
first and failinq channel commands with TP OP codes, terminal name or 
UCB name, and channel and unit address of the interrupt. The Line I/O 
Interrupt Trace routine then branches to a user trace exit routine if 
the TREXIT=parameter was specified on the INTRO macro. The user exit 
routine, in turn, returns to the Line End Appendaqe. (Note: 
^eqisters 1,2,4,11,12,13,14, and 15 must not be chanqed by the user 
trace exit routine.) 
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External Routines: None. 

Tables/Work Areas: Line I/O Interrupt Trace Table* 

Attributes : Disabled for all interrupts except machine check, 
supervisor mode, serially reusable. 



Time Delay Subtask (Chart HG) 
Module Name : IEDQHG 
Entry Points : 

• IEDQHG - entered froir an attached task to place a time delay 
request element on the Time Deiay QCE. 

• IEDQHG01 - entered by a BALK from a TCAK subtask to place a time 
delay request element on the time delay queue. 

• IEDQHG02 - entered by a BALE from a TCAM subtask to remove a time 
delay request element from the time delay queue. 

• IEDQHG03 - entered to remove a time delay request element from the 
time delay queue when a special delete element is tposted to the 
Delete Time Delay QCE by an attached task. 

• TIMEEXIT - entered as a subroutine of the OS Interrupt routine to 
notify the Time Delay subtask that a specific time of day has 
arrived. 

Functions : This subtask receives elements that request notification 
upon completion of a specified time interval. The Time Delay subtask 
maintains these elements on the time delay queue, which is a chain off 
the link field in bytes 29-31 of the Time Delay QCB. The subtask 
removes request elements from the queue by deletion requests or when 
the indicated time interval has elapsed. 

When the Time Delay subtask receives a request to place an element 
on the time delay queue, it issues the OS TIME macro to qet the 
current time cf day. The number of seconds in the interval specified 
in the element is added to the time of day, and the result overlays 
the interval field in the time delay request element. The Time Delay 
subtask then places the request element on the time delay queue in 
order by time cf day - from the time closest to the current time to 
the time farthest away. 

When the Time Delay subtask receives a request to immediately 
remove an element from the time delay queue, the subtask searches the 
queue for the specified element. If the element is found, it is 
removed. For a removal request from an attached task, the Time Delay 
subtask tposts the special delete element back to the indicated QCB. 
(If the element to be removed is an LCB or a QCB the subtask does not 
have to search the queue to find out if it is present - there is a bit 
in the element that indicates whether it is en the queue.) 
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Once a time delay request element is either added to or deleted 
from the time delay queue, the Time Delay subtask begins examininq the 
queue for elements that are eliqible for removal. Since the elements 
are on the queue in order by time r each can be examined, in order, and 
removed if its specified time is equal to or less than the current 
time of day. To remove an element, the Time Delay subtask tposts the 
request element to a QCB, the address of which is pointed to by the 
offset byte of the request element. To the subtask that requested a 
time delay, this tpost siqnifies that the requested time interval has 
elapsed. 

After all request elements eliqible for removal have been removed 
from the time delay queue, the Time Delay subtask issues a STIMER 
macro for the time of interrupt fcr the first element on the queue and 
then exits. (The Time Delay subtask issues the STIMER macro for this 
first element only once. If this same element is still first on 
subsequent passes throuqh the subtask, Time Delay does not reissue the 
macro.) This causes the OS Interrupt routine to qain control when 
that specified time arrives. The OS Interrupt routine issues an 
interrupt and the OS Supervisor passes control to the TIMEEXIT 
subroutine. 

The purpose of the TIMEEXIT subroutine is to place the Time Delay 
QCB on the disabled ready queue by tposting it to itself. This is 
accomplished via the AQCTL SVC 102. (Since the TIMEEXIT subroutine is 
an enabled interrupt routine, the SVC must be used to place an element 
on the disabled ready queue.) The QCB is given an extremely high 
priority so that when the TCAM Dispatcher regains control and merges 
the ready queues, this element will probably be on top to activate the 
Time Delay subtask. 

When the Time Delay subtask qains control and its own QCB is on 
the ready queue, the subtask immediately starts examininq the time 
delay queue to remove elements. Unless it has already been removed by 
a special delete request, the first element on the queue is the 
element for which the STIMER macro was issued. The Time Delay subtask 
examines and removes elements from the queue, as described previously, 
until it reaches either an element that requires an STIMER macro or 
the end of the queue. 

The Time Delay subtask exits to the TCAtf Dispatcher. If it was 
entered by a EALR instruction, the subtask branches to the address in 
register 14; otherwise, it branches to the CSFDISP entry point of the 
Dispatcher. 
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The format of the time delay request element is as follows 



Offset 

o 

+4 

+8 

+12 

+16 

+20 

+24 
+28 



Time Delay QCB Address (in the AVT) 


Priority 


Dispatcher Link Field 


Reserved 


Time Interval 
(In Seconds) 


Offset 
Byte 


Reserved 


Reserved 


Recycle 

Flag 

Byte 


Reserved 


Reserved 


Time Delay Queue Link Field 



The offset 


tjxte is 


the 


offset into 


an element 


to a 


wc 


low-order th 


ree bytes 


is 
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of the 
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to w 


hie 


is to be 
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upon expiration 


of the 


time 


del 


ay 


offset byte 


is equal 


to 


X'00» if the 


request 


element 


is 


if the reauest element 


is an LCB, or X'08' 


if 


the 


req 


a special el 


ement, a 


buffer, or from 


checkpoint 




The 


byte has only one 


bi 


t defined: 


if bit 


7 


is 


on 


Destination 


QCB, TEDQBG 


has issued a 


request 


to 


recycle 


on the time 


delay queue 


for an additional 12 


hours. 


Th 


only one b 


it defined: 


if bit 6 


is on, 


the 


element 


delay queue; 


if bit 6 


is 


off, the element is 


net 


on 


the 


bit in the 


flaq byte 


is 


set for all 


elements on 


the 


ti 


but it may t 


e checked 


on 


ly for the LCE, QCE, 


or 


chec 


kpo 


elements, th 


is field 


has 


other definitions. 









rd cf which the 

h the element 

interval. This 

a QCB, X»14» 

uest element is 

recycle flaq 

and this is a 

this element 

e fla q byte has 

is on the time 

queue. This 

me delay queue, 

int. In other 



The presence of two link fields in the time delay request element 
allows the element to be on the time delay queue and tposted to 
another subtask simultaneously. The link field in bytes 5-7 is used 
when the element is on the TCAM Dispatcher ready queue. The link 
field in bytes 29-31 is used when the element is on the time delay 
aueue. 

The time delay request element is tposted to the Time Delay QCB in 
the AVT when an attached task needs to implement a time delay. When 
a TCAM subtask needs to request a delay, it passes the address of the 
element in reqister 1 . 

The Time Delay QCB occupies the first three words of the time 
delay element at AVTDELyE in the AVT. At assembly time the time delay 
queue link field of this element points back to the element itself. 
As request elements are received, the Time Delay subtask chains the 
elements to fcrm the time delay queue by usinq the link address field 
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in bytes 29-31 cf each request element. The last element of the chain 
always points back to the time delay element in the AVT. 

The format cf the special delete element is as follows: 



Offset 



+4 

+8 

+12 



+1 



Reserved 


Delete from Time Delay QCB 
Address(in AVT) 


Priority 


Dispatcher Link Field 


Reserved 


Address of Element to be 
Removed from Time Delay Queue 


Reserved 


Address of QCB to Receive this 
Element after the Request for 
Removal is Serviced 



The special delete element is tposted to the Delete from Time Delay 
OCB (AVTCPRME) in the AVT when an attached task needs to remove an 
element from the time delay queue. When a TCAM subtask needs to 
remove an element, it passes the address of the element to be removed 
in reqister 1 and then issues a EALR to TEDCRG02. 

External Routines : 

• IEAQRT00 - CS Time SVC Routine (SVC 11) - to qet the current time 
of day. 

• TEAQSTOO - CS TTTMER and STIMER Routine (SVC 47) - to request a 
time delay. 

• TGC102 - ACCTL SVC 102 Routine - to tpost the Time Delay QCB to 
itself when a specified time interval elapses. 

• THG019PP or IGG019RO - TCAM Dispatcher - the DSPPRIOR entry point, 
to move the scheduler STCB; the DS^POSTR entry point, to put an 
element on the ready queue. 

Tables/Work Areas: AVT, OCE. 

Attributes: Refreshable, reusable, resident, problem proqram mode. 



System Delay Subtask (Chart HI) 

Module Name : IEECHI 

Entry Point : IEDQHI - activated by the TCAM Dispatcher when the 
Operator Contrcl control module (IEEOCA) receives a request for a 
system delay. 



Function : This module causes the system to cease line activity for 
the number of seconds specified on the INTVAL=inteqer operand of the 
INTRO macro. The System Delay subtask stops line activity by holdinq 
all the LCBs on a system delay queue and then placinq a request for 
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the specified delay interval on the time delay queue. When the delay 
has elapsed, the System Delay subtask frees each ICE to reactivate the 
lines. 

The System Delay subtask receives ccntrcl from the TCAM Dispatcher 
when one of three possible elements is en the ready queue and tposted 
to the System Delay QCB. The type of element indicates the phase of 
processinq in which the System Delay subtask is currently operatinq. 
The three types of elements are: 

1. The system delay request element 

2. An LCE 

3. The System Delay QCE 

The MODIFY INTEEVAL=SYSTEM operator control command causes the 
operator control Chanqe Interval Type routine (IEDQCZ) to tpost the 
system delay request element (in the Operator Ccntrcl AVT) to the 
System Delay QCE. This request element has a PEISYSDL priority (see 
the TPEIOB macro list in Appendix C) , and this particular element is 
identified by the System Delay subtask by that unique priority. Upon 
recoqnizinq the system delay request element, the System Delay subtask 
sets the delay bit, AVTPLAYN in AVTBIT1 and initiates deactivation of 
the line activity on each non-dial ICE in the TCAM system. The 
subtask finds the LCBs by tracinq the DEB tc DCB to ICE to LCE chain 
of pointers. The System Delay subtask stops line activity bv puttinq 
any free ICE on the system delay queue, by issuinq an IOHALT macro on 
the active contention lines, and by modifyinq the channel proqrams to 
cause I/O interrupts on the active Auto Poll lines* As each LCB is 
examined, the System Delay subtask increments a counter, which at the 
end of the operation is equal to the total number of active LCBs in 
the system. 

When an I/O interrupt on an LCB occurs, the Line End Appendaqe 
qains control. The Line End Appendaqe branches tc the appropriate 
receive scheduler, which tpests the LCB tc the System Delay QCB when 
the AVT system delay bit is on. In this way, each ICB, as its line 
activity stops, is tposted to the System Delay QCB. The System Delay 
subtask, upon beinq activated by an LCB, chains the LCE on the system 
delay queue and decrements the LCB counter by one* Then, if the LCE 
counter is net equal to zero, the subtask exits to the TCAM 
Dispatcher. When the LCB counter is equal to zero, every non-dial LCE 
in the system is on the system delay queue. At this point the System 
Delay subtask places the System Delay QCB on the time delay queue to 
start timinq the system delay. 

After the Time Delay subtask (IEDQHG) has observed the specified 
interval, it puts the System Delay QCB on the ready queue. This 
causes the TCAM Dispatcher to activate the System Delay subtask with 
the System Delay QCB as its element. In this case, the System Delay 
subtask clears the system delay bit and reactivates the system line 
activity by tpostinq each LCB to itself. The subtask exits to the 
TCAM Dispatcher, which places all the LCBs en the ready queue. 
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External Routines ; 

• IEDOHG01 - Time Delay subtask - to add an element to the time 
delay queue. 

• IEDQHG02 - Time Delay suttask - to reirove an element from the time 
delay queue. 

• CS TOHAIT routine (SCV 33) - tc stop the line. 

• TGG019FE or IGG019F.O - TCAM Dispatcher - the DSPPEIOF. entry point, 
to move the scheduler STCB. 

• OS WTO routine (SVC 35) - to write a message. 
Tables/Work Areas ; OCB, ICE, AVT , DCE, DEE, TCB. 

Attributes; Reusable, resident, problem program mode, nonref reshable. 



Stop Line I/O Subtask (Chart HK) 
Module Name ; IEDCHK 

Entry Point ; TIDCHK - activated by the TCAM Dispatcher when the 
Resident Operator Control module (IEDQCA) receives a request to stop 
the activity of a line or line group. 

Functions ; This subtask provides the I/C handling that is necessary 
to effect a step line function. The Stop line I/C subtask stops line 
activity by freeing the ICB (s) for the indicated line or line group. 

The VARY CFETP (C or I) and the HAIT operator contrcl commands 
cause the Resident Operator Control module to activate the Step Line 
routine (TEDOCV) . The Stop Line routine builds a stop line reguest 
element in the operator control work area and tposts this element to 
the OCB for the Stop Line I/O subtask. The LCE address is in the 
reguest element. 

When the step line reguest element is the highest priority element 
on the ready gueue, the TCAM Dispatcher activates the Stop line I/O 
subtask. This subtask gets the associated LCE address from the 
reguest element. 

If an LCB is on the time delay gueue, the subtask removes the LCB 
from that gueue and places the address of the stop line reguest 
element in the LCE. If the LCB is already free (tposted to itself) , 
this subtask set the LCB status byte (LCBSTAT1) to zero and then 
branches to the exit code. 

If an LCB is not free, the Stop Line T/C subtask turns on the non- 
immediate bit in the LCB status byte. For an Auto Poll LCE, the 
subtask puts a NOP in the channel program and branches to the exit 
code; for a BSC LCB with no prepare on the line, the subtask branches 
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to the exit code. If the result of a test-and-set on LCBTSTSW is zero 
or if the line is busy and is sendinq, the subtask issues an IOHALT 
before branchinq to the exit code. In all ether cases the subtask 
branches to the exit code. 

T «hen the Stop Line I/O subtask has modified a channel program or 
issued an IOHALT to stop line activity, the subtask is reactivated to 
complete the prccessinq of the LCB for that line. When an I/O 
interrupt occurs on an LCB, the Line End Appendaqe gains control. The 
Line End Appendaqe branches to the appropriate receive scheduler, 
which upon findinq the non- immediate bit en in the LCB activates the 
Stop Line I/O subtask. In this case, the Stop Line I/O subtask 
examines the ICE to determine the type of line. "For a dial line on 
which an EXCP has already been executed, the subtask turns off the LCB 
EXCP byte and branches to the exit code. When an EXCP has not been 
executed on a dial line, this subtask turns on the EXCP byte, sets a 
DISABLE in the channel proqram area, clears LCBTTCIN, turns on the 
test-and-set switch, sets the neqative response to poll bit, issues an 
EXCP, and then exits to the TCAM Dispatcher. 

External Routines: 

• OS EXCP routine (SVC 0) - to start channel activity. 

• OS IOHALT routine (SVC 33) - tc stop a line. 

Tables/Work Areas: AVT, LCB, CCW , DCB, DIB, ICB. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 



MESSAGE HANDLING - EUFEEB MANAGEMENT MODULES 

Buffer Management Module (Chart GA) 

Module Name: IEDQGA 

Entry Points : 

• TEDQGA - Buffer Bequest routine - to handle a buffer request from 
the TCAM Dispatcher. 

• IEDOGB - Euffer Beturn routine - to handle a returned buffer from 
the TCAM Dispatcher. 

• TEDQGD - Buffer Association routine - to handle buffer association 
at the end of OUTBOF processinq in an MH and from IEDQGA and 
IEDOGB. 
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Functions : The Buffer Manaqement module performs three different 
functions, and in each case the output is different. The functions 
are discussed here accordinq to entry point. 

* Buffer Bequest 

If the Buffer Manaqement module is entered at the IEDQGA entry 
point, the Buffer Request routine either assiqns the requested buffers 
or queues the request to be satisfied later. The buffer request is in 
the form of an EBB pointed to by reqister 1. There are four types of 
requests that can arrive, and each is handled as follows: 

1. Initial request from a line - if units are available, they are 
chained toqether to form the requested number of buffers. CCWs 
are built fcr each unit, and the ERE with the buffers chained from 
it is tposted to the Activate OCB. If units are not available, 
the ERB is placed in the element chain cf the Buffer Return QCB by 
priority. 

2. ERB from an application proqram or operator control - if units are 
available, they are chained to fcrir the requested number of 
buffers and the ERE is tposted to a specified QCE* If units are 
not available, the ERB is placed in the element chain of the 
Buffer Return OCB by priority. 

3. First PCI request - if units are available, they are chained into 
the requested number of buffers. CCWs are built in each unit, and 
the buffers are available for I/C. If units are not available, 
the ERB is placed in the element chain cf the Buffer Return QCB by 
priority. 

4. Subsequent FCT request - the ERB is chained by priority into the 
element chain cf the Buffer Return QCE. 

If the routine has an ERB to tpost, it returns to the DSPPOST 
entry point of the TCAM Dispatcher. If the ERB is to be inserted into 
the element chain of the Buffer Return OCB, exit is to the DSPPRIO 
entry point of the TCAM Dispatcher. Otherwise, Buffer Manaqement 
returns to the ESFDISP entry point of the TCftM Dispatcher. 

• Buffer Return 

If the Buffer Manaqement module is activated at the TEDQGE entry 
point, its function is to return buffers to the buffer unit pool. The 
handlinq of the buffers depends en whether there is an ERE waitinq in 
the element chain of the Buffer Return OCB. 

1. If there is no ERB waitinq for a buffer, the units that mafce up 
the buffer are placed in the Buffer Request QCB element chain (the 
buffer unit pcol) . 
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2. If an EFB is waitinq for a buffer, the necessary number of units 
are chained toqether tc fcrm one buffer. If the ERE has a low 
priority (net initial, first PCI, or disk request), CCWs are built 
for each unit cf the buffer and the buffer is included in the 
channel prcqram for the lire. If the buffer request was fully 
satisfied, the ERB is dropped from the Buffer Return QCB element 
chain: otherwise, the ERB is rechained by priority. If the ERB 
has a hiqh priority, action is performed as described in the 
Buffer Request discussion. 

Exit from the Buffer Return portion of the Buffer Manaqement 
module is handled exactly as discussed under Buffer Request. 

• Buffer Association 

If the Buffer Manaqement module is activated at the IEEQGD entry 
point, its function is to build CCfls for data transfer in each unit of 
a buffer. All units of the buf f er (s) have READ or WRITE and TIC CCWs 
built in the first three words of the unit. If the request is other 
than an initial request for receivinq, the buf f er (s) is included in 
the channel proqram for the line. 

The Buffer Association routine of Buffer Manaqement exits to the 
routine that called it in the case of Buffer Request or Buffer Return; 
or to DSPDTSP in the TCAM Dispatcher if activated by the CUTMSG macro 
expansion in MB. 

External Routines : 

• IGG019RB or TGG019RO - the TCAM Dispatcher - inserts by priority 
either on the ready queue (DSPPOSTR) or en the element chain of a 
specified CCB (DSPPRIOR) : or puts the unit first on the buffer 
unit pool (DSPLIFOR) : 

• OS EXCP routine (SVC 0) - to start channel activity. 
Tables/Work Areas : DCB, buffer prefix, ICB, OCE, AVT. 
Attributes : Resident', enabled, refreshable, reusable. 

Transparent Transmission CCW Euildinq Routine (Chart GT) 
Module Name : TEDQGT 

Entry Point : IEDCGT - activated by a branch at the end of OUTBDE 
processinq when a messaqe is to be sent in transparent mode. 

Functions : This routine builds in each buffer unit the CCWs that are 
necessary to send transparent data in transparent mode in the correct 
block size tc a terminal. This routine also constructs in the LCB a 
sequence to write DLE/ETE and to read response. 
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Tn each unit the Transparent Transmission CCW Euilding routine 
places a CCW to write the first portion of the unit in the block that 
is to include the unit. The unit that contains the last byte of data 
of the first block in a transmission builds a TIC command to the LCE 
CCW to write the ELE/ETB sequence. The LCB channel program area 
contains the values for the number of bytes left to write in the 
current unit, the address of the unit, and the value formerly in the 
TIC field of the unit. If the current block is not the first block of 
the transmission, this routine places a flag to indicate this 
situation in the unit that contains the last byte of data for the 
current block and places the number of bytes left to write from this 
unit in the Write CCW CP code area. 

If all the units to write out the next block are not available at 
read response time, line End Appendage treats the condition like a 
channel program check and makes the channel execute a write sync loop 
that writes SYNC characters on the line. When the required units are 
available, normal transmission is resumed - the write sync loop TTCs 
to a write DLI/STX seguence and to the next unit to be transmitted. 

After the necessary CCWs are built, the Transparent Transmission 
CCW Building routine branches back to the calling routine. 

External Routines : None. 

Tables/Work A reas: AVT, LCE, SCB, buffer prefix, CCW, CCB. 

Attributes : Reusable, refreshable, enabled, resident, problem program 
mode. 



PCT Appendage (Chart RN) 

Module Name: IGGC19RN 

Entry Point : IGG019RN - entered from IOS when a program-controlled 
channel Interruption occurs. When the PCI flag in the CCW is on and 
an interrupt results, PCI Appendage gains ccntrcl. 

Functions : The PCI Appendage frees buffers from the line operation 
iust completed and, if ADC is specified in the line group DCB, obtains 
additional buffers. 

When a PCI interrupt occurs on receiving, the Appendage locates 
the CCW on which the PCT occurred, and if the PCI is for the first 
buffer for a read, PCI Appendage checks the ID sequence in the 
Terminal Table entry (TERMID) , if applicable. For ESC terminals the 

appendage checks the buffer for transparency by executing a EALR to a 
subroutine in the Line End Appendage. 
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On an initial PCI no buffers have been processed by the channel 
proqram. If this is not an initial PCI en sendinq, PCI Appendage 
tposts the buffers that have already been processed by the channel 
proqram to the Buffer Return QCE. If this is not an initial PCI on 
receivinq, the buffers already processed are tposted to MH. If ADD is 
specified in the line qroup DCB, PCI Appendaqe (for both initial and 
subsequent PCIs on sendinq or receivinq) requests additional buffers 
from the appropriate QCB (Buffer Request or Disk I/O) • If the ERB is 
already tposted, the count of requested buffers is increased. 

When PCI Appendaqe completes its functions, it posts the MCP 
complete and exits to IOS. 

External Routines : 

• TGG019R0 - Scan subroutine of the line End Appendaqe - to check a 
buffer for a ESC terminal for transparency, 

• TESTDSP - OS Task Removal routine - activated when TCAM is 
operatinq in a multiprocessing environment to stop the MCP from 
executinq in the other active CPU. 

Tables/^ork Areas : CCW, DCB, AVT, buffer prefix, LCB, Termname Table, 
Terminal Table entry. 

Attributes : Reusable, refreshable, disabled, resident, supervisor 

mode. 



MESSAGE HANDLING - CONTROL ROUTINES 

User Interface Routine (Chart UI) 

Module Name : IEDCUI 

Entry Point : TEDOUI - called from an MH macro expansion or from a 
functional MH routine. 

Functions : The User Interface routine is the common module throuqh 
which MH" macro expansions link to functional MH routines. This 
routine saves the user reqisters, initializes qeneral reqister 
contents to cemmonly needed values, finds the address of the routine 
to be linked tc, and exits to it. 

The User Interface routine is also used by certain functional MH 
routines to provide initialization and linkage to lower-level MH 
routines. 

In coniuction with the Return Interface routine (IEDQLM) , User 
Interface provides level-independent reqister protection between MH 
levels. 
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This routine performs the following functions: 

• Saves registers 2 through 12 and 14 in the save area pointed to by 
register 13. 

• Gets the AVT address from the CVT. The routine then finds address 
of the current buffer in the AVT field AVTAEBUF; the address of 
the LCB in the PRFLCB field of the buffer prefix; and the address 
of the current SCB in the LCBSCBA field of the LCB. (If entry is 
to the Binary Search routine, the User Interface routine only gets 
the AVT address) . 

• Gets the address of the MH VCON table from the AVTMSGS field of 
the AVT. The User Interface routine takes the index to the 
address of the routine from the first byte of the input parameter 
list, adds the index value to the MH VCCN table address (AVTMSGS) , 
and places the result in register 12. The User Interface routine 
then exits to the address in register 12. 

External Routines : None. 

Tables/work Areas : AVT, CVT, buffer to be processed, LCE, SCB, MH 
VCON Table. 

Attributes : Reentrant, refreshable, enabled, resident, problem 
program mode. 



Return Interface Routine (Chart LM) 

Module Name: TFECLM 

Entry Point : IIDCLM - called by a functional MH routine to return to 
the calling routine. 

Functions: The Return Interface routine is the common module through 
which functional MH routines return to MH. This routine restores 
registers 2 through 12 and 14 from the save area pointed to by 
register 13, and exits to the address in register 14. 

The Return Interface routine is also used to return to certain 
functional MH routines from lower-level routines. 

External Routines: None. 

Tables/Work Areas : None. 

Attributes : Reentrant, refreshable, enabled, resident, problem 
program mode. 



STARTMH Suttask (Chart AA) 
Module Name: IEDCAA 
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Entry Point : IEDQAA01 - activated by the TCAM Dispatcher when the 
STARTMH macro is coded in an MH after the dispatcher tposts a buffer 
to the STARTMH CCE„ 

Functions : This subtask performs the initialization functions 
required by the messaqe handler to process messages. 

Upon entry, the STARTMH subtask places the address of the buffer 
iust tposted by the Dispatcher into the AVTAEBUI field in the AVT. If 
the 'cancel 1 flaq is set in the prefix status byte, PRFCNCLN in 
PRFSTAT1, the subtask branches to the input text processinq portion of 
the subtask at the TEXT label. 

If entry is to be send side of MH , provided the terminal is in 
lock mode, the subtask turns off the prefix 'lock 1 bit and increments 
by one the count of the outstandinq lock requests in the LCE. Next, 
the STARTMH subtask determines whether the buffer is a header or a 
text buffer. The subtask also determines whether the buffer has been 
received or is to be sent and branches to the appropriate section of 
the subtask. 

The portion of the subtask that processes header input buffers 
first initializes the prefix oriqin field (PRFSRCE) from the 1CB. The 
subtask then cleans the prefix sequence-in field (PEFSEQIN) , the SCB 
priority field (SCBPRI) , and the SCB cutoff count field (SCBEKFCT) to 
zeroes. The subtask initializes the prefix scan pointer (PRFSCAN) to 
point to the last byte in the prefix or, if reserve characters are 
used, to the last reserve character. The subtask next clears the SCB 
destination QCE field (SCBDESTQ) to zero, and if the oriqin is an 
application proqram, branches to the MH via the exit portion of the 
subtask at the EXIT label. 

On the ether hand, if the oriqin is defined as an ECA sequence, 
the STARTMH subtask branches to the Skip Forward and Scan routine 
(IEDOAI) to determine whether an EOA sequence is in the buffer. On 
return, if there is an EOA sequence, the subtask increments the scan 
pointer to point to the last byte of the buffer. If the source is an 
IBM 1030 or an IBM 2260 Remote terminal, the subtask increments the 
pointer by one byte to point to the addressinq character that follows 
the EOA sequence. 

If the terminal is in lock mode, the subtask turns on the prefix 
'lock 1 bit, qets the index to the destination from the LCE, and places 
it in the prefix destination key field (PRFDEST) . The subtask sets 
f laqs in the LCB to indicate a tpost is pendinq and passes the 
destination key to the Termname Table code (IEDQTNT) , which returns 
the address of the Terminal Table entry. The STARTMH subtask then 
moves the Destination QCB address from the Terminal Table entry to the 
SCB Destination CCB field and exits to the MH via the EXIT portion of 
the subtask. 

If the terminal is net in lock mode, the STARTMH subtask next 
examines the LCE to determine whether there is a STOPLIUE request 
currently pendinq on the line. If so, the subtask bypasses the On- 
line Test processinq and exits to the MH via the EXIT label. 
Otherwise, the subtask performs the followinq On-Line Test processinq. 
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The STAFTMH subtask checks a bit in the ICB to determine whether 
the line is binary synchronous or start/stop. For start/stop lines 
the subtask branches to the Skip Forward and Scan routine (IEDQAI) to 
ascertain whether an On-line Test sequence is in the buffer. On 
return, if this is an Cn-Line Test messaqe, the subtask determines 
whether On-Line Test support is in the TCAM system, whether the On- 
line Test maximum load has not been reached, and whether the test 
request messaqe is only one buffer lonq. If any one of these three 
conditions is net true, the subtask indicates an error in the SCB and 
exits to the MH via the EXIT label. If all of these conditions are 
found, the subtask sets in the buffer a byte to identify the oriqin as 
binary synchronous or start/stop and sets in the ICB a •no source' 
indication (AVTEFF in LCBTSTSW) and a neqative response flaq (LCBNFGRP 
in LCBSTAT2) . Then the subtask tpests the buffer to the On-Line Test 
OCB via a branch to the DSPPOST entry point in the TCAM Dispatcher. 

The portion of the STAPTMH subtask that processes text input first 
initializes the prefix oriqin field (PPFSBCE) from the LCB. The 
subtask then qets from the DCB (DCBPESFF + 1) the number of reserve 
characters and places that number in the ICE (LCBSIZE) . The subtask 
initializes the scan pointer to point to the last byte of the prefix 
or, for reserve characters, to the last reserve character. If the 
buffer has a lenqth of zero, the subtask exits to MH via the EXIT 
label. Otherwise, the subtask determines whether translation is to be 
performed and if sc, branches to the Translate Buffer routine (IEDQAW) 
to translate the buffer. On return, the subtask puts the contents of 
the SCB multiple-luff er-header-entry field (SCEMBHEN) into reqister 1, 
decrements it by one, and examines the result. If reqister 1 contains 
zero, the subtask returns to the MH via the EXIT label. If the 
contents is not zero, the subtask qets the address of the User 
Interface routine (IEDOUI) , sets a neqative value in reqister 0, and 
exits to MH via the MEHEXIT label. 

The portion of the STARTMH subtask that processes an output header 
buffer updates the FEFO pointer in the Destination QCE (QCEFFFFO) from 
the FEFO pointer in the SCB (SCBFEFO) and turns off the 'currently 
sendinq' flaq in the QCB . If the destination is in lock mode, the LCB 
is in initiate mode, or the buffer is zerc-lenqth and the send error 
is a text transfer error, the subtask does not update the QCB. 

If the destination is in lock mode, the subtask determines whether 
both the »lcck' and 'extended lock' bits in the SCE are on and if they 
are, turns them both off. The subtask qets from the prefix scan 
pointer field (PRFSCAN) the number of reserve characters in the buffer 
and places that number in the LCEISZE field of the LCB. The subtask 
sets this field tc zero for a zero-lenqth buffer. Next, the subtask 
initializes the scan pointer to point to the last byte of the prefix 
or, if reserve characters are present, to the last reserve character. 

If the buffer has a lenqth of zero, the STAPTMH subtask returns to 
MH via the EXIT label. For a positive-lenqth buffer, the subtask 
branches to the Termname Table code (IEDQTNT) to qet the address of 
the Terminal Table entry for the destination. On return, the subtask 
increments the output sequence number by cne and returns tc MH via the 
EXIT label. 
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The portion of the subtask that processes output text buffers sets 
the reserve characters count in the LCB tc zerc, initializes the scan 
pointer to point to the last byte in the prefix, and branches to the 
text input processing portion of the subtask to check for a zero- 
length buffer. 

On a normal entry, the exit part of the subtask, at the EXIT 
label, first sets reqister to zero. Cn a multiple-buffer-header 
entry, at the MEHEXIT label, reqister already contains zero and is 
not chanqed. Next the subtask places XMOOO* in reqister 2 and 
computes the message handler entry address. The subtask checks 
reqister and if it is negative, branches to MH with a return code of 
X'04 1 in reqister 15. Otherwise, the subtask determines from the LCE 
whether the line is sendinq or receiving and places a X'01' or X'08' 
return code, respectively, in reqister 15. 

External Routines : 

• IEDQUI- User Interface routine - to reenter an uncompleted 
routine and to activate the following modules: 

• IEDOAT - Skip Forward and Scan routine - to search for an EOA 
sequence in the buffer. 

• IEDOAW - Translate Puffer routine -if required tc translate the 
buffer . 

• IEDQTNT- Termname Table code - to qet a terminal entry address. 

Tables/Work Areas : AVT, buffer currently beinq processed, SCB, LCB, 
DCB, MH VCCN Table, OCB, Termname Table, Terminal Table. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem prcqram mcde. 



Incoming/Outgoing Message Delimiter Routine (Chart A4) 

Module Name : IEBCA4 

Entry Points: IIDQA401 - from the INMSG macro expansion to tpost the 

buffer tc the proper QCB, or from the OUTMSG macro expansion to pass 

the buffer to either the Buffer Association routine (IEDQGD) or the 
Transparent CCW Building routine (IEDQGT) . 

^unctions : The functions of this module differ according tc whether 
it is activated from the macro expansion of the INMSG or of the OUTMSG 
macro. 

The format of the input macro-qenerated parameter list pointed to 
by reqister 1 is as follows: 
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Offset 



+1 



Index 
to IEDQA4 



Parameter 
List Length 



The Incoming/Outgoing Message Delimiter routine first determines 
whether the current buffer is the last buffer of a message and, if it 
is, stores the address of the INMSG/OUTMSG parameter list in the 
SCBMACR field cf the SCB. If the PRFDUP1N bit of the PRFSTAT1 field 
is indicating that the buffer is a duplicate-header buffer, the 
routine turns off the PBFDUPLN bit and branches to its input or output 
processing section, for receiving or sending functions, respectively. 

s a header buffer but not a duplicate-header 
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• Input Processing 

The Incoming/Cutgoing Message Delimiter routine turns off the 
prefix 'cancel' bit (PRFCNCLN in PRFSTAT1) and then checks the SCB 
destination gueue field (SCBDESTQ) to determine whether a destination 
has been found for this message. Tf the field contains zeroes, no 
destination has been found. In this case, the routine places the 
address of the Euffer Eeguest OCB in the SCBDESTQ field and bypasses 
multiple-route processing. 
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Tf the buffer is not the final buffer of the message, or if the 
logical end-of-message indicator is net set in the TIC field, the 
Incoming/Outgoing Message Delimiter routine moves the Destination QCB 
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address from the SCBDFSTO field to the first word of the buffer and 
places a priority of X'FS' for a header buffer or X'E4' for a text 
buffer in the buffer. If the buffer is the final buffer for a 
messaqe, or if the loqical end-of-messaqe indicator is set, the 
routine places the address of the Buffer Disposition QCB in the first 
word of the buffer and sets the priority to X'DF'. 

If this is not a TSO buffer, the Incominq/Outqoinq Messaqe 
Delimiter routine qets from the LCETSZE field in the LCE the number of 
reserve characters remaininq in the buffer and puts that number in the 
prefix scan pointer field (PRFSCAN) . The the routine tposts the 
buffer via the TCAM Dispatcher at the DSPPCST label. For a TSO 
buffer, the routine exits immediately to the Dispatcher (DSPPOST) to 
tpost the buffer. 

• Output Processinq 

For output processinq, the Incominq/Outqoinq Messaqe Delimiter 
routine first determines whether the buffer has a lenqth of zero. If 
it does, the routine tposts the buffer to the Buffer Disposition QCB 
by tranchinq to the DSPPOST entry point in the TCAM Dispatcher. 

If the buffer does not have an indicated lenqth of zero, the 
Incominq/Outqcinq Messaqe Delimiter routine removes from the end of 
the buffer all units that do not contain data. To determine whether 
there are any empty units at the end of the current buffer, the 
routine passes the offset to the last byte of data in the buffer, 
qotten from the PflFSIZE field, to the Address "Finder routine (IEDOAL) . 
The Address Finder routine returns the address of the unit in which 
the last byte of data is located. Then the Incominq/Outqoinq Messaqe 
Delimiter routine checks the TIC field of this unit to determine if it 
is the last unit. If this is the" last unit of the buffer there are no 
empty units at the end of the current buffer. 

If there are empty units, the Incominq/Outqoinq Messaqe Delimiter 
routine enters a loop that follows the chain of units, from the last 
unit that contains data to the last empty unit, countinq the empty 
units. When the routine finds the last empty unit, it resets the 
'number of units' field in the buffer prefix (PBFNEUNT) to indicate 
only the number of units containinq data. It then resets the TIC 
field of the last data unit to indicate that it is the last unit of 
the buffer, thereby removinq the empty units from the buffer. 

The chain of empty units is now considered a separate buffer. The 
Incominq/Outqoinq Messaqe Delimiter routine places the number of empty 
units into the PFFNBUNT field of the first empty unit, puts the 
address of the Buffer Return QCE into the first word of the first 
empty unit, sets a priority of X'E4' and tposts the empty buffer by 
branchinq to the DSPPOSTE entry point in the TCAM Dispatcher. 

The Incominq/Outqoinq Messaqe Delimiter routine examines the 
Destination OCB, the address of which is in the SCEDESTQ field of the 
SCB, to determine whether it is a QCB for an application prcqram. If 
it is an application proqram QCB, the routine tposts the buffer to the 
3ead-ahead OCE, the address of which is in the PFBAQCE field in the 
process entry work area. The address of the process entry work area 
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is in the TRMSTAT field in the Terminal Table entry for the 
application program. The address of the Terminal Table entry is in 
the QCBPREN field of the application program QCB. The routine places 
the address of the Read-ahead QCB in the first word of the buffer and 
sets a priority of X'DC, Then the routine passes in the PRFSCAN 
field of the buffer prefix the number of reserve characters remaining 
in the buffer and tposts the buffer via an exit to the DSPPOST entry 
point of the TCAM Dispatcher. 

If the destination is not an application program, the message is 
to be sent to a terminal. If the header buffer of the message 
contains a hardware EOA indication, the routine logically removes the 
EOA before sending the message. If the buffer is not a header buffer, 
if the MSGFCRM function has inserted line control, or if this is a TSO 
buffer, no FCA indication is present. For inserted line control, an 
STX character may be present and is left in the buffer* 

The Incoming/Outgoing Message Delimiter routine passes to the 
Termname ^able code (IEDQTNT) the key to the destination Terminal 
Table entry and, en return, receives the address of the Terminal Table 
entry. The routine gets the Device Characteristics Table index from 
the TRMCHCIN field in the Terminal Table entry. The routine uses this 
index to find the entry in the Device Characteristics Table for this 
destination terminal, from which it can determine the specific device. 
If the device is an IBM 2260 Remote or an IBM 2760 in tete-a-tete 
mode, no EOA indication is present. A STX character is present and is 
left in the buffer. 

At this point, the Incoming/Outgoing Message Delimiter routine 
gets the entry in the Special Characters Table for this device from 
the DCBSCTAD field in the DCB . If this field contains zeros, there is 
no Special Characters Table entry for the destination. Therefore, no 
EOA indication is defined for the destination and no EOA is present. 
If there is a Special Characters Table entry for the destination, the 
Incoming/Outgoing Message Delimiter routine gets the index byte for an 
EOA indication from the entry and determines whether the byte is zero. 
If it is zero, no ECA is defined for the destination, and no EOA is 
present. 

The routine uses a nonzero index byte to locate the configuration 
of the EOA within the entry. The routine compares the configuration 
with the first data in the buffer, and if they are not the same, finds 
no EOA present. 

Tf the ECA indication is present, the Incoming/Outgoing Message 
Delimiter routine increments the count of reserve characters in the 
LCEISZE field of the ICE by the length, of the EOA, logically removing 
the EOA from the buffer. After removing the ECA, the routine turns 
off the 'tete-a-tete' flag in the LCB (1CEPESP bit in LCESTAT2) and 
exits to the Transparent CCW Building routine (IEDQGT) if the line is 
a BSC line in transparent mode. If the line is not BSC in transparent 
mode, the routine exits to the Euffer Association routine (IEDQGD) . 
For a destination en a BSC line, no EOA is present, but there is a STX 
character that is left in the buffer. 
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External Routines; 

• IEDQAL - Address finder routine - to qet the scan pointer address. 

• TEDQAX - Euffer Step routine - to scan for a specified character. 

• TGG019^B or IGG019PO - TCAM Dispatcher - the DSPPOSTft entry point, 
to tpost empty units to the Buffer ft e turn CCB. 

• IEDQTNT - Termname Table code - to obtain the address of the 
Terminal Table entry for the destinaticn. 

Tables/Work Areas: SCB, Termname Table, Terminal Table, AVT, buffer 
currently beinq processed, QCB, process entry work area, LCB, DCB, 
DEB, UCB, SCT. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem program mode. 



MESSAGE HANDLING - FUNCTIONAL BOUTINES 

Date and Time Provision Bo utine (Chart AC) 

Module Name : T IDC AC 

Entry Point : IEDQAC01 - called through the User Interface routine 
when the DATETIME macro is issued in an MH to insert the date and/or 
time information into a messaqe header. 

functions: This routine inserts the current date and/or time of day 
into the messaqe header at the current location of the scan pointer. 

The DATETIME iracro expansion places the address of the parameter 
list built for the DATETIME macro at assembly time in register 1 and 
passes to the Date and Time Provision routine through the User 
Interface routine. The parameter list format is as follows: 

Offset o +1 +2 



Index 
to IEDQAC 



Parameter 
List Length 



Count of 

Bytes to be Inserted 



If only date information is requested, the Date and Timet Provision 
routine obtains the current date in packed decimal format from the CVT 
field CVTDATE. If only the time or both the time and the date are 
requested, the necessary information is obtained in packed decimal 
format via the TIME system macro. 

The Date and Time Provision routine unpacks and zones the date 
into the format EYY.DDD, where B is a blank, TY is tk last two digits 
of the year, and DDD is the day of the year. The routine unpacks and 
zones the time into the format BHH,MM fc SS* where E is a blank, HH is 
the hour, MM is the minute, and SS is the second* 
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The Date and Time Provision routine places the formatted 
information in the messaqe buffer (time follows date when both are 
specified), updates the scan pointer to refer to this last character 
of the new data, and places a normal return code of X'OO 1 in register 
15. This routine then branches to the Return Interface routine. 



External Routines : 

• TEDOAL - Address Finder routine 
pointer from the offset. 



to find the address of the scan 



• OS Time routine (SVC 11) - to get the current time and date 
information. 

• TEDOAX - Puffer Step routine - get the next insert address. 

Tables/Work Areas: CVT, AVT, buffer currently being processed. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem program mode. 



Output Seguence Number Provision Routine (Chart AD) 

Module Name: IEDCAD 

Entry Point : I1DOAD01 - called through the User Interface routine. 

Functions: This module inserts the output seguence number in a buffer 
of a message. 



The routine gets the output seguence number from the SCE (SCBOSEQ) 
and converts it into EBCDIC, suppressing leading zeros* The routine 
then figures the length of the number, adds one for a leading blank, 
and links to the Insert Data routine (IIDOAE) to shift left data in 
the buffer the reguired number of bytes. If return from IEDQAF 
indicates insufficient reserve characters, a X'04 1 is set in register 
15 and return is made to the caller via the Return Interface routine 
(IEDOLM). 

If expansion was successful, the Output Seguence Number Provision 
routine links again to IEDOAE to insert the output seguence number, 
including a leading blank, into the buffer. A X'OO' return code is 
set in register 15 and return is made to the calling routine via 
IEDOIM. 



The format of the macro-generated parameter list supplied as input 
to User Interface is as follows: 



Offset o 



+1 



Index to 
IEDQAD 



Index to 
IEDQAF 



220 



External Koutine: IEDQUI - User Interface routine - to activate the 
Insert Data routine (IEDCAF) to expand the buffer- 
Tables/Work Area; AVT, buffer, SCE. 



Attributes: Serially reusable, refreshable, 
problem proqram mode. 



enabled, resident, 



Locate Option Field Address Routine (Chart AE) 

Module Name: IF.DCAF 

Entry Point : IIDOAE - called by the User Interface routine when the 
LOCOPT macro is issued in an MH to return the address of an option 
field. 



Functions : This 
from its index. 



routine calculates the address of an option field 



The LOCOPT macro expansion places the address of the parameter 
list built for the LOCOPT macro at assembly time in reqister 1 and 
passes control to the Locate Option Field Address routine thrcuqh the 
User Interface routine. The parameter list format is as follows: 



Offset o 



+1 



+2 



+3 



Index 
to IEDQAE 



Parameter 
List Length 
X'04' 



Option 
Field Offset 



Return 
Register 15 

Offset 



The Locate Option Field Address routine first obtains the key 
(ordinal index) of the currently contacted terminal from the LCBTTCIN 
field of the LCB. This key is passed to the Termname Table code 
(IEDOTNT) , which returns the address of the Terminal Table entry for 
that key. If, however, the key is zero, the source terminal cannot be 
found and the locate Option Field Address routine takes the error 
exit. 

The Locate Option Field Address routine next examines the "option 
fields used" flaq in the terminal entry status byte (TBMSTATE) . If 
this bit is net on, the routine takes the error exit. In the error 
exit, the routine stores a return code of X'FF' in the proper word in 
the reqister save area and sets reqister 15 equal to X'OU 1 . If 
reqister 15 itself is specified as the return reqister, it is set to 
a return code cf X'OO'. 

If the "option fields used" flaq is cr, the Locate Opticn Field 

Address routine compares the "number cf option entries" field 

(TEMCPNO) in the terminal entry with the opticn field offset in the 

third byte of the input parameter list. If the option field offset is 

hiqh, the error exit is taken. 
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Next the locate Option Field Address routine gets the offset byte 
for the option field beinq souqht by indexincr TRMOPT by the option 
field offset in the input parameter list. If the offset byte in the 
terminal entry is equal to X f FF f , the option field is not defined for 
this entry, and the routine takes the error exit. 

The routine computes the address of the option field being souqht. 
by addinq the address of the Option Table (AVTOPTPT) , the offset to 
the set of option fields for this entry (TBMOPTEL) , and the offset 
byte to the individual option fields (third byte of the input 
parameter list) . 

Tf the return reqister specified is reqister 15, the address is 

placed in reqister 15. Otherwise, the address is stored in the proper 

word in the reqister save area, and reqister 15 is set to a return 

code of X'OO' . 

The locate Option Field Address routine returns to the callinq 
routine via the Return Interface routine (IEDQLM) . 

External Routine; TEDQTNT - Termname Table code - to obtain the 
Terminal Table address for the specified entry. 

Tables/Work Areas: AVT, ICB, Termname Table, Terminal Table, Option 
Table. 

Attributes: Reentrant, serially reusable, refreshable, enabled, 
resident, problem proqram mode. 



Message Limit Fcutine (Chart AG) 
Module Name: IEDCAG 

Entry Point : IFCQAG01 - activated by the tfSGLIMIT macro expansion to 
limit the number of messages sent or received in a transmission 
sequence. 

Functions: This routine limits the number of messaqes to or from a 
terminal durinq a sinqle transmission sequence. 

On entry, reqister 1 contains the address of the input parameter 
list. The format of this list is as follows: 



Offset 



+4 



+1 



+2 



+3 



Index to 
IEDQAE 


Parameter 
List Length 


Status 
Offset 


Register 
15 Offset 


Reserved 


Limit 
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The Messaqe limit routine first saves the parameter list address 
in the AVT and then qets the address of the buffer teinq processed 
from the AVT (BVTADBUE) . The routine then examines the size field in 
the buffer prefix (PBESIZE) and, if it is zero, indicatinq a zero- 
lenqth buffer, returns immediately with a return code of X'OO 1 in 
reqister 15. 

If the size of the buffer is not zero, the routine qets the 
address of the LCB frcm the buffer prefix (PBFLCE) and examines the 
dial bit (LCBEIAI in LCBSTAT1) in the ICE. If this bit is on, 
indicatinq a dial line, the routine places a return cede of X'OO' in 
reqister 15 and returns. When the dial bit is off, the routine 
examines the Eeceive Scheduler priority field (ICBESPBT) and, if it is 
X^O', examines the 'send' bit (ICBSENDN in LCESTAT1). If the 'send' 
bit is on, the routine places a X'OO 1 return code in reqister 15' and 
returns. 

If the 'send 1 bit is off or if the priority field is not X'20 1 , 
the Messaqe Liirit routine qets the requested messaqe limit from the 
parameter list and saves it in the AVT. Next, the routine qets the 

SCB address frcm the ICE (LCBSCBA) , a nd incremen t the mgggagg ronnt 

field in the S CE (SCBSNDCT) by one. The routine then compares the new 
count WJTth the requested count and, if the new count is lower, places 
a X'OO 1 return code in reqister 15 and returns. If the requested 
messaqe count has been reached, the routine resets the messaqe count 
field to zero and turns on the 'messaqe limit 1 bit (SCBMLMTN in 
SCBSCEM) . The routine rechecks the 'send 1 bit and, if it is on, 
places a return cede of X'OO 1 in reqister 15 before returninq. 

If the 'send 1 bit is off, the Messaqe limit routine turns off the 
'messaqe limit 1 bit. The the rcutine qets from the LCE the relative 
line number (ICEUCBX) and multiplies it by four to convert that number 
to an offset. The routine qets frcm the ICE the address of the DCB 
(LCBDCBPT) and qets from the DCE the address of the invitation list 
for the line (BCBINVLI + the offset) . The routine qets the width of 
one entry frcm the invitation list, the address of the current 
invitation list from the LCB (LCBINVPT) , increments this address by 
the width, and places the result back in the invitation list address 
field in the ICB. The routine then places a X'OO' code in reqister 15 
and returns. 

External Foutines : None. 

Tables/Work Areas : AVT, buffer prefix, ICE, SCE, DCB. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 

Input Sequence Number Insertion Pcutine (Chart AH) 

Module Name: IIDCAH 

Entry Point: TEDQAH01 - activated throuqh the User Interface routine 
by the SEQUENCE macro expansion on the input side of MH. 
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^unctions: This module verifies and updates an input sequence number 
specified by the user in the current buffer of a messaqe* 

The Input Sequence Number Insertion routine examines the 'terminal 
currently connected 1 field in the ICE (ICBTTCIN). If the field 
contains zercs, the oriqin is unknown; therefore, this routine places 
a return code cf X'OC 1 in reqister 15 and returns to the caller 
throuqh the Return Interface routine (IEDQLM) . If the field, does not 
contain zeros, the routine passes ICBTTCIN to the Termname Table code 
(TEDOTNT) , which returns the address of the Terminal Table entry for 
the oriqin of the message. 
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If the new number is equal to the number in the 
entry, the routine sets the 'sequence-in • flaq in the S 
(SCBSEOIN in SCBSTATE) . If the current buffer is a hea 
routine puts the number in the prefix input sequence 
(PRFISEQ) and then incrementes the number by one. I 
over 9999 (the maximum permitted sequence number) , it i 
The routine stores the updated number back in the 
entry, sets a return code of X'OO* in reqister 15, and 
caller throuqh the Return Interface routine (IEDQLM). 



Terminal Table 
CB status field 
der buffer, the 
number field 
f the result is 
s reset to one. 
Terminal Table 

returns to the 



^he format of the input parameter 
follows: 



list for this module is 



as 



Offset o 



+i 



Index 
tolEDQAH 



Parameter 
List Length 



External Routine: IEDCTNT - Termname Table code 
destination offset to a terminal entry address. 



to convert a 



Tables/Work areas : AVT, buffer, ICE, SCE, Termname Table, Terminal 
Table. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 



224 



Skip Forward and Scan Ro utine (Chart AT) 

Wodule Name : IEDCAT 

Entry Point : IEECAI01 - called throuqh the User Interface routine by 
the macro expansion of the SETSCAN macro or by a functional MH routine 
to skip the scan pointer forward a fixed number of bytes or to scan 
for and return the next field in the message header. 

" Functions : This module moves the scan pointer forward in the messaqe 
header a specified number of bytes r or firds and returns to the caller 
the next field beyond the scan pointer. 

If the scan pointer (PRFSCAN) is beyond the end of the buffer, 
that is, PRFSCAN is qreater than PRFSIZE, the Skip Forward and Scan 
routine places a -X'O^ 1 return code in reqister 15 and returns to the 
callinq routine. 

The scan pointer offset from the prefix is passed to the Address 
Finder routine (IEDQAL) to qet the scan pointer address and to 
initialise the current-unit and end-of-unit reqisters. If the buffer 
is a TSO buffer, indicated by the PRFTSEUF bit in the PRFSTAT1 field, 
the Skip Forward and Scan routine passes an offset of zero instead of 
the scan pointer and the confiquraticn of a blank character in a 
reqister. If the user specifies a conf iquration, the routine sets the 
reqister from the parameter list. If no ccnf iquration is specified, 
the routine places an EECDIC blank (X'40') character in the reqister. 

• Entry for skip forward 

If the lenqth passed in the parameter list is zero, the Skip 
Forward and Scan routine places the address of the byte pointed to by 
the scan pointer in reqister 15 and returns to the caller. If a blank 
character is net defined for the skip operation, the routine adds the 
skip lenqth directly to the scan pointer. If the resultinq offset is 
beyond the end of the buffer, the routine dees not chanqe the scan 
pointer, places a X'OU* return code in reqister 15,. and returns 
control to the callinq routine. If the new offset is not beyond the 
end of the buffer, the routine places the new offset in the PRFSCAN 
field, sets a X'OO 1 return code in reqister 15, and returns to the 
caller. 

If a blank character is defined, the routine loops to the Buffer 
Step routine (TEDQAX) , which returns the address of each subsequent 
byte. When the byte is not a blank, the skip lenqth is decremented by 
one. When the skip lenqth is equal to zero, the routine updates the 
scan pointer offset in the prefix puts a return code of zero in 
reqister 15, and exits to the Return Interface routine. 

If return from the Buffer Step routine indicates that the end of 
the buffer has been passed, the routine puts a return code of X'04 1 in 
reqister 15 and exits to the Return Interface routine. 
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• Entry for fixed scan 

The caller may define the next field as the next "n" data bytes. 
This is the fixed scan function; For this function, the routine loops 
to the Puffer Step routine, which returns the address of each 
subsequent byte. When the byte dees not certain a blank, or if blanks 
are not defined for the function, it is inserted into the AVT work 
area (AVTDOUBI) and a counter of data bytes found is incremented by 
one. When the field lenqth requested is satisfied, the routine takes 
the normal scan end exit. 

If return from the Buffer Step routine indicates that the end of 
the buffer has been passed, the routine moves the portion of the field 
that has been found from the AVT work area to the SCE save area 
(SCBNESSA) and takes the multiple-tuff er-header exit. 

• "Entry for variable scan 

The caller may define the next field as the next contiquous strinq 
of data bytes that is delimited fry a blank. This is the variable scan 
function. For this function, the routine loops to the Euffer Step 
routine until a ncn-blank character is returned. The Skip Forward and 
Scan routine stores this character in the AVT work area. The routine 
loops aqain to the Buffer Step routine, addinq data bytes to the AVT 
work area until a blank delimiter is found or until the eiqht-byte AVT 
work area is filled. At this point, the routine takes the normal scan 
end exit. 

Tf return from the Buffer Step routine indicates that the end of 
the buffer has teen passed, the routine moves the portion of the field 
that has been found from the AVT work area to the SCB save area 
(SCBMBSSA) and takes the multiple-buffer-header exit. 



• Normal scan end exit y-, 

At the SCANNFI entry point, the .Skip Forward and Scan routine 
stores the field lenqth in the AVT parameter area (AVTPABM) . If a 
compare operation is requested, the routine qets from the parameter 
list the address of the compare strinq and compares that address with 
the strinq found. If the strinqs are not equal, the routine places a 
X f 00' return code in reqister 15 and returns to the caller. If they 
are equal, or if no compare operation is requested, the routine 
determines whether entry is from a SETSCAN macro expansion. If so , 
and if the strinq offset is to be returned in a reqister, the routine 
places the offset in reqister 15 and returns control to the callinq 
routine. If the offset is not to be returned, the routine makes the 
offset the new scan pointer, places a X'CO 1 return code in reqister 
15, and exits to the caller. 
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When entry is directly from a SFTSCAN macro expansion, the Skip 
Forward and Scan routine determines whether the address is to be 
returned in a reqister. If the address is net to be returned, the 
routine makes the offset the new scan pointer, places a X'OO* return 
code in reqister 15, and branches back to the caller. If the address 
is to be returned, the routine branches to the Address "Finder routine 
(IEDOAL) , which returns the address of the last byte of the strinq 
found. If the address is to be returned in reqister 15, the routine 
places it there and returns to the caller. If the address is to be in 
another reqister, the routine saves it in the reqister save area at 
the proper offset for the requested reqister, places a return code of 
X'OO 1 in reqister 15, and exits to the callinq routine* 

• Multiple-tuff er-header exit 

"For a TSO buffer, the Skip Forward and Scan routine puts the 
lenqth of the field found in the AVT parameter area and performs the 
processinq described for the normal scan end exit. 

Otherwise, if return is requested in a reqister, the routine 
determines whether entry is from the Multiple Ecutinq subtask. If 
entry is not from that subtask, the routine determines whether any 
bytes of the field beinq souqht were found in this buffer. If no 
bytes have been found, the routine determines whether entry is to 
search for a conditional character strinq. If not, the routine places 
a neqative return code in reqister 15 and returns to the caller. If 
entry is to search for a conditional character strinq, the routine 
saves the number of bytes found and the reqister for the. callinq 
routine in the SCB. The routine sets the scan pointer to point beyond 
the end of the buffer, saves the parameter list address in the SCE 
multiple-buff er-entrv field (SCBMBHEN) , puts a neqative return code in 
reqister 15, and returns ccntrol tc the caller. 

If return is not requested in a reqister, or if entry is from the 
Multiple Boutinq subtask, the Skip Forward and Scan routine determines 
whether the buffer is the last buffer of a iressaqe, indicated when the 
PB^ULSTN bit is off in the PEFSTAT1 field. If the buffer is not the 
last buffer cf a messaqe the routine saves the bytes found in the 
buffer, the count of bytes found, and the callinq routine reqisters in 
the SCB. The routine then sets the scan pointer to the point beyond 
the end of the buffer, saves the parameter list address in the 
SCEMBHEN field, places a neqative return cede in reqister 15, and 
returns control tc the callinq routine. 

• Multiple-tuff er-header entry 

The Skip Forward and Scan routine may be entered directly from 
code in the STAFTMH macro expansion tc complete a scan function 
interrupted by a multiple-buff er-header situation. This routine may 
also be entered from the Multiple Poutinq subtask to find the 
remainder cf a subsequent destination that was incomplete in a 
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previous buffer. The skip Forward and Scan routine detects this type 
of entry when the low order bit of the SCB multiple-buff er-header- 
entry field (SCEMEHEN) is set. 

If entry is not from the Multiple Ecuting subtask, the routine 
clears the SCEMBHEN field to zeros, gets frcm the SCB the contents of 
the registers of the calling routine at the time of the interruption, 
and moves the register contents to the calling routine save area. The 
routine then calculates the return address from the parameter list 
address and puts it in the calling routine save area. 



The routine examines the SCE save area to dete 
first character has been found. If it has not, the 
the appropriate scan function as if initially enter 
character has been found, the routine moves the porti 
that has been found back from the SCB save area to t 
The routine calculates the number of bytes found. I 
function is being completed, the routine resumes t 
initiallv entered. If a variable scan function is 
the routine resumes the function at an entry past th 
first character is being found. 



rmine whether the 
routine resumes 
ed* If the first 
en of the field 
he AVT work area. 
f a fixed scan 
he function as if 
being completed, 
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If the X'02 1 bit is on in the low-crder byte of the SCBMBHEN 
field, entry is from the Multiple Routing subtask* The Skip Forward 
and Scan routine turns off both the X'OI* and X , 02" flags in this byte 
and gets the number of bytes already found from the SCBDESTL field. 
If this number is zero, the routine resumes the appropriate scan 
function as though it were initially entered. For a positive number, 
the routine mcves the bytes found from the ICE (LCBCPA) to the AVT 
work area (AVTEOUEL) and resets the lew-crder byte of the AVTDOUEL 
field to an FECEIC blank X'^O 1 . The routine then resumes the fixed or 
variable scan function as described previously. 

The address of the parameter list built by the macro expansion of 

the SETSCAN macro or a higher-level MH routine is placed in register 

1 and passed to the Skip Forward and Scan routine by the User 

Interface routine. The parameter list formats are as follows: 



Scan Function Parameter List (Index flag X'.Ol ' is OFF 

Offset +1 +2 +3 



Index to 
lEDQAI 


Parameter 
List Length 


Register 15 
Offset 


Scan 
Length 


Blank 

Character 

(optional) 


Address of the Character String 
(optional) 



Index flag X'02': ON - BLANK = YES 
OFF - BLANK = NO 

Skip Forward Function Parameter List (Index flag X'01 ' is ON) 
Offset +1 +2 



Index to 
lEDQAI 


Parameter 
List Length 


Skip 
Count 



228 



Upon completion of its functions, the Skip Forward and Scan 
routine issues a return code in reqister 15. The return code value is 
X'OO' for successful completion, a neqative value if a multiple-buffer 
header is detected and a scan function fails to complete, and X'04 1 if 
the skip function fails to complete. 

Other areas affected bv the completion of this routine are 
outlined as follows: 

1. AVT work area (AVTDOUBL) - on successful completion of a scan 
function, the next field in the buffer. 

2. AVT parameter area (AVTPABM) - on successful completion of a scan 
function, the second byte contains the lenqth of the field 
returned. 

3. Buffer prefix scan pointer (PBFSCAN) - on successful completion of 
a scan function, and if requested by the caller, the offset in the 
buffer to the end of the field beinq returned. On successful 
completion of the skip forward function, the offset of the scan 
pointer mcved forward the specified lenqth. On a multiple-buffer- 
header exit, the offset to a point one byte beyond the end of data 
in the buffer . 

4. SCB save area (SCBMBSSA) - on a multiple-tuff er-header exit for a 
scan function, the bytes of the field requested found from this 
buffer, padded with blanks (if necessary to fill SCBMBSSA) to the 
riqht. 

5. SCB multiple-tuff er-header entry (SCBWBHEfl) - on a multiple- 
buffer-header exit, the address of the parameter list. 

6. SCB reqister save area (SCBRGSAV) en a multiple-tuff er-header 
exit, the user reqisters. 

External Routines : 

• TFDOAL - Address Finder routine - to return the address of the 
scan pointer. 

• TEDQAX - Euffer Step routine - to return the address of subsequent 
bytes. 

Tables/Work Areas : AVT, SCB, buffer. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 
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Skip to Character Set Boutine (Chart AJ) 

Module Name : IFBQAJ 

Entry Point : IEIQAJ - called through the User Interface routine when 

the FORWABE or SETSCAN macro expansion or a higher-level MH routine 

needs to advance the scan pointer to the last byte of a specified 
character strinq. 

Functions: This routine advances the scan pointer to the end of a 
specified character strinq in the messaqe header. 

The User Interface routine passes tc the Skip to Character Set 
routine a parameter list built by the caller. The format of this 
parameter list is as follows: 



Offset o 



+1 



+2 



+3 



Index 
to IEDQAJ 


Parameter 
List Length 


Length 


Register 
Offset 


Blank 
Character 


Address of Character String 



If the scan pointer (PBFSCAN) is beyond 
that is, if the PEFSCAN field is qreater than th 
function cannot be performed in this buffer. I 
not specified, the Skip to Character Set rout 
return code in register 15 and returns contro 
return reqister is specified, the routine puts a 
reqister 15 if it is not the return reqister, an 
routine. If reqister 15 is specified as th 
routine places a X'OO 1 return code in reqister 1 
caller. 
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When the scan printer is net beyond the end of the buffer, the 
Skip to Character Set routine passes the scan pointer offset in the 
buffer prefix tc the Address Finder routine (IEDQAL) to get the scan 
pointer address and to initialize the current-unit and end-of-unit 
reqisters. The routine qets the conf iquration of a blank from the 
parameter list, the address of the Buffer Step (IEDQAX) routine from 
the AVT, and the address of the character strinq beinq souqht from the 
parameter list. 
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Tf the Skip tc Character Set routine is entered normally or after 
the multiple-tuf f er-header situation iust described has been handled, 
the routine loops to the Buffer Step routine (IEQDAX) , which returns 
the address of each subsequent byte. flhen a non-blank character is 
found or if no blank is defined, it is inserted in the AVT work area 
(AVTDOUFL) and a counter of data bytes found is incremented by one. 
^he routine compares the character with the first character of the 
character strinq to be skipped. Tf they are equal, the routine 
compares the counter with the lenqth of the character strinq to be 
skipped. If the count is the same, the character strinq has been 
located. 

If the count is not the same, the routine loops to the Euffer Step 
routine to qet the next data byte, which is inserted in the AVT work 
area. Comparison is made aqain, as iust described. 

If the characters found in the buffer do not match the character 
strinq to be skipped, the routine successively shifts left the 
contents of the AVT work area, droppinq one byte at a time, and 
compares them (to a successively diminishing lenqth) to the character 
strinq. This procedure continues until either an equal compare is 
found or the characters are exhausted. After each unequal compare the 
routine resumes loopinq to the Buffer Step routine to qet the next 
data byte. 

If return from the Buffer Step routine indicates that the end of 
the buffer has been passed, the Skip to Character Set routine tests to 
see if a parameter return reqister was specified. If so, the routine 
puts a return code of ICOU 1 in reqister 15, unless reqister 15 is 
itself the parameter return reqister specified. In this case, the 
routine sets reqister 15 to zero, and exits to the Return Interface 
routine. 

If a parameter return reqister was net specified, the routine 
moves the data found in the buffer from the AVT work area to the SCB 
save area (SCBMBSSA) and pads with blanks to the riqht, if necessary. 
The routine saves the count of bytes found in the SCB SCEDESTL field. 
^he routine saves the parameter list address in the SCB multiple- 
buffer-header entry field (SCBMBHEN) . The routine moves the user 
reqisters, saved in the AVT, to the SCB reqister save area (SCBRGSAV) . 
The routine then updates the prefix scan pointer to point beyond the 
end of the buffer, sets a neqative return code in reqister 15, and 
exits to the Eeturn Interface routine (IEDQIM) . 

If the character strinq is found, the Skip to Character Set 
routine determines whether a return reqister is specified. If not, 
the routine updates the scan pointer to point to the last byte of the 
strinq, sets a X'OO 1 return code in reqister 15, and returns control 
to the caller. If a return reqister is specified and entry is not 
from a SETSCAN macro expansion, the routine puts in reqister 15 the 
offset to the last byte of the strinq found and returns to the callinq 
routine. If a return reqister is specified and entry is from a 
SETSCAN macro expansion, the routine saves the address of the last 
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byte of the strinq found in the appropriate word of the register save 

area, places a X'OO 1 return code in reqister 15 r and returns to the 

caller. If reqister 15 is the return reqister, the routine places the 

address of the last byte of the strinq fcund in reqister 15 and 
branches back tc the caller. 

External Poutines : 

• TEDQAL - Address Finder routine - to return the address of the 
scan pointer. 

• IEDOAX - Euffer Step routine - to return the address of subsequent 
bytes in the buffer. 

Tables/Work Areas: Buffer currently beinq processed, AVT, SCB. 

attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mode. 



Line Control Insertion Boutine (Chart AK) 

Module Name : TEDCAK 

Entry Point: IIDOAK01 - activated by the User Interface routine 
(TEDOUI) to insert line control characters in an outqoinq messaqe. 

^unctions: This module checks line control characters and inserts 
them into a messace that is ready to be sent. 

When the line Ccntrol Insertion routine is activated, it first 
tests the "messaqe form request" bit in the SCB, and if it is off, the 
routine branches immediately to the Inccminq/Outgoing Message 
Delimiter routine (IEDQA4) . The line Control Insertion routine also 
branches directly to the Tncoming/Outqoinq Pessaqe Delimiter routine 
when the input buffer has a lenqth of zero. 

When the line Ccntrcl Insertion routine maintains control, it 
determines whether to place an STX character in the buffer. An STX 
line control character is recruired if the buffer is a header or a 
recalled buffer, and if the destination terminal is a binary 
synchronous device, an IBM 2260 Femote, or an IBM 2760 in tete-a-tete 
mode. 

Before insertinq the STX character, this routine calculates the 
initial offsets for any subsequent line control characters. The 
routine uses an internal subroutine, LCOFFSET for a non-recalled 
header buffer or LCOFFBCL for a recalled buffer, to perform this 
calculation. 

The location at which the Line Control Insertion routine places 
the STX character depends on the type of buffer* In a non-recalled 
header buffer, the routine inserts the STX character as the first data 
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byte and sets the data offset to point to the first data byte. In a 
recalled buffer, the routine inserts the STX character immediately 
after the last EOE in the buffer. (The offset to the last EOB is in 
the SCB field SCBEOB.) If the routine is also placing ITE characters 
in the buffer, the routine decrements the offset to the last EOB by 
the number cf ITB characters inserted in the buffer before the EOB. 
The routine calculates the number cf ITB characters and adjusts the 
data offset accordinqly. 

If an STX line control character is not required, the line Control 
Insertion routine determines whether any intermediate line control 
characters (ECBs or ITEs) are needed. 

The routine qives control to a line Ccntrol Offset subroutine 
(LCOEESET for non-recalled buffers, or LCCEERCL for recalled buffers) 
in order to qet the initial offsets for insertinq the characters. 
Upon return, the Line Control Insertion routine qives control to the 
Line Control Selection subroutine (LCSELECT) to qet the address of the 
next insert pcsiticn in the buffer and to set the offset in the SCT to 
the address of the next line control character to be inserted. The 
routine compares the total data size (PEESIZE) with the next insert 
offset to determine if the first line control character will fit in 
the current buffer. If the character does not fit, the routine 
branches to the entry point LAST to complete final prccessinq. If the 
character fits, ccntrol returns to the main routine at the entry point 
MAINLOOP with the data offset equal to the insert offset. 

The main loop of this routine first sets the condition code to 2 
and passes ccntrol to the Insert subroutine at the GETSCTAD entry 
point. This subroutine inserts the first line control character in 
the buffer. Upon return, the routine calculates the residual count in 
the buffer (the number of bytes frcm the inserted character to the end 
of data) and compares the result with the interval between ITBs or, if 
no ITBs are teinq inserted, with the interval between ECBs or ETEs. 
If the next line ccntrol character (pointed tc in the SCT) will not 
fit in the buffer, or if no ITBs, EOEs, or ETBs are to be inserted in 
the buffer, this routine branches to the Insert Data routine (IEDQAE) 
to shift any loqically empty bytes to the end of the buffer. Upon 
return, final processinq (at LAST) is performed. 

If the next line ccntrol character does fit in the buffer, the 
routine qives ccntrol to the Insert Data routine to shift the data 
left to the next insert point. On return, the Line Control Insertion 
routine qives ccntrol to the Line Control Selection subroutine to 
select the next line ccntrol character to be inserted. The subroutine 
returns to the main routine at the entry point MAINLOOP, where the 
line control character insertion process is performed aqain. 

For final processinq, the routine checks the buffer to determine 
whether it is the last buffer of the messaqe. If the buffer is not 
the last buffer of the messaqe, the routine determines whether any 
character insertion has been performed. When an insertion has been 
made, the routine qives ccntrol to the Insert subroutine at the entry 
point EINALSIZ, passinq a condition code set to 8. The subroutine 
sets the final data size and returns. At this point the Line Control 
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Insertion routine determines whether EOBs or ETBs were inserted. If 
EOBs or ETEs have been inserted, the routine sets the EOB/ETE initial 
address for the next buffer in the SCB. If ITEs have been inserted, 
the routine sets the ITE initial offset for the. next buffer in the 
SCB. The routine then passes control to the Incominq/Outqoinq Messaqe 
Delimiter routine (TEDQA4) . 

If the buffer is the last buffer of the messaqe, the routine 
clears the ECB/EOT interval and offset fields in the SCB to zero, and 
indicates that an end-of-transmission (EOT) line control character 
must now be inserted in the buffer. If no characters have been 
inserted, the routine sets the data offset to equal the total data 
size. The routine passes the offset of the last data byte to the 
Address Finder routine to qet the address of that byte. This address 
is the insert address. If the destination is BSC or if the 
destination is Start/Stop with no EOBs beinq inserted, the routine 
passes the ECT character address in the SCT with a condition code of 
2 to the Insert subroutine (GETSCTAD) . This subroutine inserts the 
EOT and then passes control to IEDQA4. If the destination is 
Start/Stop and EOEs are beinq inserted, an EOE character followed by 
an EOT character must be inserted in the buffer. The routine qives 
control to the Insert subroutine at entry point GETSCTAD twice with a 
condition cede of zero; once to qet the EOB character address and once 
to qet the EOT character address from the SCT. On return from the 
second link to the Insert subroutine, the routine builds a sinqle 
character strinq in the Address Vector Table work area (AVTDOUBL) . 
This character strincr consists of the EOB character followed by the 
EOT character. The routine then passes the lenqth and address of this 
strinq to the Insert subroutine at the entry point LINKAOET with a 2 
condition code. The subroutine inserts the data in the buffer and 
qives control to IED0A4. 

There are four internal subroutines: 

1. Line Control Offset subroutine for non-recalled buffers 

LCOEESET. 

2. Line Control Offset subroutine for recalled buffers - LCOEERCL. 

3. Line Control Selection subroutine - LCSEIECT. 

4. Insert subroutine - GETSCTAD, LINKAOBT, and EINALSIZ. 

Either of the two line control offset subroutines first calculates 
the offset to the first byte of data to be sent. In LCOFESET, this is 
the first data byte in the buffer; in LCOFFFCI, this is the first data 
byte after the last EOB. The subroutine then ircrements the initial 
EOE/ETB address found in the SCB by the result. If ITEs are to be 
inserted into the buffer, the subroutine increments the initial ITB 
address in the SCB by the same result before returninq. 

The Line Control Selection subroutine first determines whether 
ITBs are to be inserted. If ITBs are to be inserted, the subroutine 
compares the ITB offset in the SCB with the EOB/ETB offset in the SCB. 
If the ITB offset is lower, both offsets are returned to the callinq 
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routine after the subroutine increments the ITB offset in the SCB by 
the interval between ITBs. If IlEs are net being inserted or if the 
ETB offset is equal to the ITB offset, the subroutine increments the 
EOE/ETB offset in the SCB by the interval between EOPs or ETBs and 
increments the ITE offset, if present, in the SCB by the interval 
between ITBs. After this, the subroutine returns the ECB/ETB offset 
and SCT offset to the callinq routine. 

The Insert subroutine consists of three seqments, GETSCTAD, 
LINKAOBT, and ETNALSTZ. The functions of each of the seqments follow. 

1. GETSCTAD - This seqment uses an SCT offset passed by the caller to 
determine the address of a line control character in the SCT. If 
the callinq routine passes in reqister 14 a condition code, this 
seqment returns to the callinq routine; otherwise, this seqment 
passes control to the next seqment - ITtfKACBT. 
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when the Line Control Insertion routine qains control, reqister 1 
contains the address cf a macro-qenerated parameter list with the 
followinq format. 



Offset 



+1 



+2 



+3 



Index to 
lEDQAK 


Parameter 
List Length 


Index to 
lEDQAF 


Index to 
lEDQAO 



External "Routines: 



IEDQUT - User Interface routine - tc activate the followinq 
modules: 

IEDOAE - Insert Data routine - to insert data in the buffer. 

IEDQAO - Unit Request Interface routine - to insert line control 
characters in the buffer. 



IEDOTNT 



Termname Table code - to qet a terminal entry address. 



IEDQAI - Address Finder routine - to qet the address of a data 
byte. 
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Tables/Work areas: AVT, BCB, ICE, SCB , SCT, buffer currently being 
processed. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem program mode. 



Address Finder Routine (Chart AL) 

Module Name : IECCAL 

Entry Point: ADDPCCMP - called from an MH routine to find the address 



of an item in a buffer. 

Functions: This routine returns the address of an item in a buffer 
when the offset of the item from the start of the first unit is passed 
to it. 

The address Finder routine gets the address of the AVT from 
register 9 and the address of the first unit of the current buffer 
from register 6. 

The routine then compares the offset in register 5 with the key 
length specified in the AVT (AVTKEYLE) . If the offset is less than or 
egual to the key length, the item is in the current unit. The Address 
Finder routine adds the offset to the address of the current unit plus 
the PCB length (12 bytes - AVTUMALN) to get the address of the item, 
which is then returned in register 5. The address of the unit in 
which the item is found is returned in register 2. 

Tf the offset is greater than the key length, the routine gets the 
address of the next unit from the PCB of the current unit (PFFTIC) . 
The routine then decrements the offset by the key length and again 
compares the offset with the key length in the AVT to determine 
whether the item is in the (new) current unit. If not, the routine 
gets the address of the next unit and again decrements and compares 
the offset. This process continues until the buffer unit that 
contains the item is found. 

After locating the address of the item, the Address Finder routine 
examines register 1. Tf it does not contain zeros, the routine 
returns to the caller. If it does contain zeros, end-of-unit updating 
is being reguested. This causes the Address Finder routine to place 
the address of the unit in which the item is found in register 4, to 
set register 11 to point to the first byte beyond the end of the 
current unit, tc load register 1 with the parameter list address for 
the calling routine (from AVTPAFM) , and to return to that routine. 

External Poutines : None. 

Tables/Work Areas : AVT, buffer currently being processed. 

Attributes: Serially reusable, reentrant, refreshable, enabled, 
resident, problem program mode. 
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Origin •Routine (Chart AM) 

Module Name: IEDCAM 

Entry Point : IEBQAM01 - called by the OBTGIN macro expansion to 
verify or initialize the oriqin of a messaqe. 

Functions : This routine verifies the oriqin of a messaqe when the 
oriqin is specified, or initializes the criqin when it is not 
specified. 

The Oriqin routine, upon qettinq control from the CPTGIN macro 
expansion tests the return code from the previously executed Binary 
Search routine (IED0A1). If the return code is zero, the name of the 
buffer was not found in the Termname Table; therefore, the Oriqin 
routine sets the 'invalid oriqin 1 bit in the SCE (SCBSTAT1) , places a 
return code of X'04' in reqister 15, and returns. 

Tf the return code from the Binary Search routine is not zero, the 
value in reqister 1 is the key (ordinal index) to the Termname Table 
entry for the name found. In this case, the Criqin routine compares 
the key with the key in the buffer prefix source field (PRESF.CE) . If 
the keys are equal, the key in the buffer prefix is correct, and the 
Oriqin routine puts a X'OO' return cede in reqister 15 before 
returninq. Tf the keys are not equal, the Criqin routine checks the 
buffer prefix source field for zeros. If the field does not contain 
zeros, the routine considers the buffer prefix key to be the wronq key 
and passes that key to the Termname Table code (IEDQTNT) , which 
returns the address of the Terminal Table entry. The Oriqin routine 
examines the terminal entry to determine whether it is a line entry. 
Tf the entry is not for a line, the routine sets the 'invalid oriqin 1 
bit in SCBSTAT1, places a X'04' return cede in reqister 15, and 
returns to MH. 

Tf the Terminal Table entry is a line entry or if the buffer 
prefix source field is zero to indicate that the field may be 
initialized, the Oriqin routine makes a final check. The routine 
passes the key for the name found in the buffer to the Termname Table 
code, which returns the address of the Terminal Table entry. The 
routine qets the address of the QCB from the Terminal Table entry and 
compares the address of the DCB to which the QCB points (QCBECBAD) to 
the address of the DCB tc which the LCB points (LCBDCBPT) . If the two 
addresses are the same, the routine saves the buffer prefix source key 
in the PPESPCE field and in the terminal-currently-ccnnected field 
(LCBTTCIN) in the LCB. The routine then places a X'OO' return code in 
reqister 15 and exits to MH. Tf the addresses are not the same, the 
routine considers the name found in the buffer to be in error, sets 
the 'invalid criqin' bit in the SCBSTAT1 field, places a X'04' return 
code in reqister 15, and exits to MH. 

External Poutine : IEDQTNT -Termname Table code - to locate the 
address of the Terminal Table entry. 

Tables/Work Areas : Buffer prefix, AVT, ICB, QCB, Termname Table, 
Terminal Table. 
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Attributes; Serially reusable, refreshable, enabled, resident, 
problem program mcde. 



Multiple Insert/Pemove Poutine (Chart AN) 

Module Name ; IEECAN 

Entry Point ; IEDQ1&01 - activated by the User Interface routine 
(IEDOUI) t o i ns e r t , d e 1 e t e , and replace data at locations specified by 
character strings in the buffer. 



functions; This module translates and tests all data in 



buffer 



and, thereby, inserts , deletes, or replaces data in specific positions 
in the buffer. 

The Multiple Insert/Remove routine first tests the PPFSIZE field 
in the buffer for zeros. If the field is zeros, indicating that the 
buffer has a length of zero, the routine returns immediately to the 
calling routine. If the field is net zeros, the routine initializes 
the internal parameter lists for the IEDQAI and IEDQAJ scan routines 
accordincr tc the parameters passed. 

The Multiple Insert/Peraove routine builds a translation table from 
the initial letter of each character string in the input parameter 
list and-, thereafter, performs a translate and test operation on all 
data in the buffer. Pegister 1 contains the address of the input 
parameter list. The format of the list is as follows* 



Offset 


' +4 

+8 

+12 

+16 



+2 



+3 



Index to 
lEDQAN 


Parameter 
list Length 


Index to 
1EDQAF 


Index to 
IEDQAO 


Index to 
IEDQAJ 


Blank 
Character 


Number of 
Entries 


Reserved 


Reserved 


Address of Characters Tabl e 


Key 


Status' 


Doto Description 


'FROM' 

Delimiter Description/ 


•TO* 

Delimiter Description 





First 

Subparameter 

List 



The format of the subparaTiteter status byte is as follows. 
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Data = Characters 

Data =? Idles Count 

Data = Contract 

To = Character String 
To = Offset 



Wits 



To = Extent 

Inclusive From 

Inclusive To 



On 



Exclusive To 
Exclusive From 



Bits Off 
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The Multiple Insert/Pemove routine then beqins to execute its main 
processinq loop (TESTEOS) . The routine compares the data offset with 
the total size cf data in the buffer (PFFSTZF) . If the data offset is 
hiqher, the routine first ad-justs the PFFSTZE field to decrement any 
loqically empty bytes remaininq at the end of the buffer and then 
returns to the messaqe handler via the Feturn Interface routine 
(IEDQLM) . 

If the data offset is lower than the total size of data in the 
buffer, the routine passes the offset to the Address Finder routine 
(IEDQAL) r which returns the data address and the address of the end of 
the buffer unit in which the data address is located. The Multiple 
Insert/Remove routine then performs the translate-and-test operation 
beqinninq at the data address. The routine performs a translate-and- 
test for the lenqth of the unit, or if the urit is the last unit in 
the buffer, for the lenqth of the data in the unit. 
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"rf the unit translates to all zeros, the routine qives control to 
the Test and Shift subroutine (TESTSHIF) . This subroutine determines 
whether there are any logically empty bytes precedinq the data just 
translated. If there are no empty bytes, the subroutine returns 
immediately. Otherwise, the subroutine qives control to the Insert 
Data routine (TIDCAF) to shift the data lust translated to the left in 
the buffer, overlayinq the loqically empty bytes and, thereby, movinq 
the loqically empty area to the riqht end of the buffer unit. Upon 
return from the Insert Data routine, the Test and Shift subroutine 
returns control to the main routine. At this point, the Multiple 
Tnsert/Remove routine increments the data offset by the lenqth of data 
iust translated and branches back to the main processinq loop in order 
to translate and test the next buffer unit. 

If a translate-and-test operation on a unit results in a hit; that 
is, a byte of data translates to ncnzerc, the routine analyzes the 
hit. If the hit did net occur on the first byte translated, the 
routine qives ccntrol to the Test and Shift subroutine. This 
subroutine shifts the bytes iust translated to the left in the buffer, 
thus movinq the loqically empty area to. the riqht, until it reaches 
the byte that is the hit. When the subroutine returns, the main 
routine increments the data offset by the lenqth of data just 
translated. 

The Multiple Tnsert/Femove routine finds the subparameter list 
indicated by the offset to which the hit b-yte translated and uses the 
information in the subparameter list to build an input parameter list 
for the Skip Forward and Scan routine (IFDQAI) . The Multiple 
Insert/Remove routine temporarily sets the prefix scan pointer to the 
position iust precedinc the hit byte and then qives ccntrcl to the 
Skip "forward and Scan routine. The Skip Forward and Scan routine 
determines whether the hit byte is the first byte of the character 
strinq that equals the strinq that qoverns the function specified in 
the subparameter list. If the character strinqs are not equal, the 
Multiple Insert/Remove routine increments the data offset past the hit 
byte and branches back tc the main processinq loop. If there are 
insufficient characters remaininq in the buffer to determine whether 
the strinqs are equal, the character strinq beinq souqht is not in the 
buffer. Therefore, the routine clears to zero the byte associated 
with this strinq in the translate table. The routine then increments 
the data offset and branches back to the main processinq loop. 

If the character strinqs are equal, the Multiple Insert/Remove 
routine determines whether an insert cr a remove function is 
requested. If the function is an insert, the routine qives control to 
the Test and Shift subroutine, which shifts the character strinq to 
the left in the buffer. The routine then uses the subparameter list 
to build an input parameter list for the Unit Request Interface 
routine (IFDQAC) and branches to that routine through the User 
Interface routine (IEDQUT) . The Unit Request Interface routine qets 
another buffer unit, if one is needed, for data insertion and links to 
the Insert Data routine (IEDOAF) . The Insert Data routine inserts the 
specified data, adiusts the data offset and insert offset, and returns 
to the main processinq Icop of the Multiple Insert/Remove routine. If 
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the Unit Request Interface routine finds nc empty units available, it 
returns immediately to the Multiple Insert/Remove routine with a 4 
condition cede in reaister 15. This routine discontinues the 
translate-and-test operation and returns to the Return Interface 
routine (TEDOIM) with the 4 return code in register 15. 

If the character strinq specifies a remove function, the Multiple 
Insert/Remove routine determines the 'TO* delimiter for the remove 
function: the 'BT 1 delimiter is the character strinq already found. 
If the 'TO* delimiter is a character strinq, the routine uses 
information from the subparameter list to build an input parameter 
list for the Skip to Character Set routine (IEDQAJ) and temporarily 
sets the scan pointer to the point iust past the hit byte. The 
routine then qives control to the Skip to Character Set routine, which 
scans for the delimitinq character strinq and returns. If the 'TO' 
delimiter is an extent, rather than a character string, the routine 
qets the extent from the subparameter list and adds it to the data 
offset to qet a new data offset. After tfce 'TO* delimiter is found, 
the routine determines whether the 'FROM 1 delimiter strinq itself is 
to be removed. If this strinq is net to be removed, the routine qives 
control to the Test and Shift subroutine to shift the 'FROM' delimiter 
strinq to the left of any loqically empty bytes in the buffer. If the 
delimiter is to be removed, the routine increments the number of 
loqically empty bytes (the insert offset) by the lenqth of the 'PROM' 
delimiter strinq. If the remove function specified is a contract 
function, the routine trances to the main processinq loop. If, 
however, the data to be replaced is a delimiter character, the routine 
must find the terminal entry for the destination and extract the 
conf iquration of the delimiter from the table. At this point, the 
routine places the delimiter in the subparameter list and then 
performs the insert function. If the remove function is a replace 
function, the routine performs the insert function. 

External Routines : 

• TEDOUI - User Interface routine - to activate the fcllowina 
modules: 

IEDQAF - Insert Data routine - to insert data at a specific 
location or to shift data in the buffer. 

IEDQAI - Skip Forward and Scan routine - to scan for a specific 
character strinq in the buffer. 

IEDQAJ - Skip to Character Set routine - to scan for a 'TO' 
delimiter character strinq. 

TEDQAO - Unit Request Interface routine - to qet an additional 
buffer for the insert function. 

• IEDQAI - Address Finder routine - to find the data address and the 

address of the end of the buffer unit in which the data 
address is located. 
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• TEDQTNT- Termname Table cede - to qet a terminal entry address. 

Tables/Work Areas; Translation Table fcr the translate-and-test 
operation, AVT, LCB, SCB, buffer currently teinq processed. 



Attributes: 



Serially reusable, refreshable, enabled, resident, 



problem proqram mode. 



Unit Request Interface Poutine (Chart AO) 

Module Name: IICCAO 

Entry Point : TITQAC01 - activated by the User Interface routine 
(TEDQUI) to qet a buffer unit requested by one of the insert routines 
and to add that unit tc the buffer currently beinq processed. 

Functions: This module provides the interface to the Unit Request 
routine in order to qet an additional buffer unit and to attach it to 
the buffer that requires the extra space. 



The Unit Bequest 
data to be inserted 
the data fits, the ro 
routine (IEDOAF) and 
data. If the data do 
routine (IEDQEW) to 
not available, the Un 
the Peturn Interfac 
reqister 15 and all z 
available, the Unit 
Request Interface rou 
Unit Request Interf 
routine, passinq the 
the address cf the 
The Unit Request Inte 
buffer between the 
followinq unit. The 
the end of the unit 
increments the data o 
field (PRFSIZEV by 
Interface routine bui 
and exits to that rou 



Interface routine first determines whether the 
fits in the buffer currently beinq processed. If 
utine builds a parameter list for the Insert Data 
branches to that routine to insert the requested 
es not fit, the routine links to the Unit Request 

qet an empty buffer unit. If an empty buffer is 
it Request Interface routine returns control to 
e routine (IEDQLM) with a return code cf X'OtP in 
eros in reqister 8. If an empty buffer unit is 
Request routine returns control to the Unit 
tine with the address cf the empty buffer. The 
ace routine then lirks to the Address Finder 
data offset. The Address Finder routine returns 
unit into which the data insertion is to be made, 
rface routine then links the new unit into the 

unit pointed to by the scan pointer and the 
routine then moves the data from the address to 
tc the correspondinq lecation in the new unit and 
ffset, the insert offset, and the prefix size 

the unit size. At this point, the Unit Request 
Ids a parameter list fcr the Insert Data routine 
tine to insert the requested data. 



The internal input parameter list is in the AVTPARM field of the 
AVT. This list is not macro qenerated. The format of this list is as 
follows. 



Offset o 



+1 



+2 



+3 



Index 

to 

lEDQAO 


Data 
Type 
Flag 


Index 

to 

lEDQAF 


Unused 
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External Routines : 

• TEDQBW - Unit Request Eoutine - to qet the tuffer unit needed to 
insert data. 

• TEDQAL - Address "Finder routine - to qet the data offset address, 
the unit address, and the end-of-unit address. 

Tables/Work Areas: AVT, ICE, SCE, tuffer currently beinq processed. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mode. 



p 



emove at Offset Boutine (Chart AP) 

Module Name: IEDCAP 

Entry Point : TEEQAP01 - activated throuqh the User Interface routine 
(IEDOUT) to remove and optionally replace data in a buffer. 

^unctions: This module removes data from a sinqle specified location 
in a buffer and optionally replaces that data with new data. 

The Bemove at offset routine first examines the PBFSIZE field in 
the buffer prefix. If this field contains zeros, the buffer has a 
lenqth of zero, and this routine exits to the Beturn Interface routine 

(IED01M) . 

When the buffer size is not zero, the Bemove at Offset routine 
calculates the size of the buffer prefix, includinq any reserve 
characters that may be present. Then the routine determines whether 
the TO delimiter (specified in the TO operand of the MSGEDIT macro 
instruction) is a character strinq. If it is a character strinq, the 
routine sets up the AT delimiter (specified in the AT operand of the 
MSGEDIT macro instruction) either from the scan pointer or from the 
input parameter list plus the prefix size, if the user specifies an 
offset. If the AT delimiter is the scan pcinter and the scan pointer 
is beyond the end of the buffer, the function cannot be performed. In 
this case the routine exits with a X'04' return code in reqister 15. 
Otherwise, the routine temporarily sets the scan pointer to the AT 
offset, builds a parameter list for the Skip to Character Set routine 
(IEDOAJ) and branches to that routine throuqh the User Interface 
routine to scan for the TO character strinq. When control returns, if 
the strinq is not found in the buffer currently beinq processed, the 
routine exits to the Beturn Interface routine (IEDCLM) with a X'04 1 
return code in reqister 15. On the other hand, if the strinq is 
found, the routine determines whether the TO strinq itself is to be 
removed. If the strinq is not to be removed, the routine decrements 
the offset returned from the Skip to Character Set routine by the 
lenqth of the strinq. If the strinq itself is to be removed, the 
routine does not chanqe the offset, but qives control to its testinq 
function loop (TESTEUNC) to determine which function is beinq 
performed. 
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Tf the TC delimiter is an extent, the Remove at Offset routine 
aets the extent from the input parameter list, adds the AT delimiter 
to the extent to make the TO delimiter an offset, and branches to the 
testinq functicn loop. 

Tf the TO delimiter is an offset, the routine qets the delimiter 
from the input parameter list and adds the prefix size- At this 
point, the routine determines whether the AT delimiter precedes the TO 
delimiter, and if it does not, exits to the Peturn Interface routine. 
Tf the AT deliititer precedes the TO delimiter, the routine branches to 
the testinq functicn loop. 

Tf the AT delimiter is the scan pointer and the TO delimiter is 
zero, the sinqle byte at the scan pointer is to be remcved. The 
Remove at Offset routine sets the TC delimiter equal to the scan 
pointer plus cne and branches to the testinq functicn loop. 

After the AT and the TO delimiters have been determined, if the 
remove request is to the left of the scan pointer in the buffer, this 
routine adiusts the scan pointer tc the left accordinqly. 

The testinq functicn lcop (TEST?UNC) of the Remove at Offset 
routine first sets the data offset equal to the TO offset, sets the 
insert offset equal to the lenqth between the TO and AT offsets, and 
determines which function is beinq performed. 

Tf the TC delimiter is beyond the end of the buffer, the routine 
adiusts the scan pointer to point tc the end of the buffer so that all 
data from the AT delimiter to the end of the buffer is removed or 
replaced. 

Tf the function is a contract operation, the routine bypasses the 
next insert operation, builds a parameter list for the Insert Data 
routine (IEDOAF) , and links to that routine throuqh the User Interface 
routine to shift the loqically empty area to the end of the buffer. 
On return, the Remove at Offset routine decrements the data offset by 
the insert offset, sets the result as the new data size (PBFSI7.E) , and 
returns to the Return Interface routine. 

Tf the function is a replace operation, the routine builds a 
parameter list for the Unit Bequest Interface routine (IEDQAO) and 
branches to that routine throuqh the User Interface routine to insert 
the replacement data in the buffer. On return, the routine determines 
whether the replacement data was exactly as lcnq as the data removed. 
If the replacement data was the exact lenqth, the routine exits to the 
Peturn Interface routine; otherwise, the routine must close the 
buffer. To close the buffer, the routine builds a parameter list for 
the Insert Data routine and branches to that routine throuqh the User 
Interface routine to shift the loqically empty area to the end of the 
buffer. When control returns, the Remove at Offset routine decrements 
the data offset by the insert offset, sets the result as the new data 
size (PRFSIZE) , and returns control to the Peturn interface routine. 

The address of the input parameter list for this routine is in 
reqister 1. If the TO delimiter is a character strinq, the fcrmat of 
the parameter list is as follows: 

24<* 



Offset 

+4 

+8 

+12 

+16 



+1 



+2 



+3 



Index to 
lEDQAP 


Status 
Byte 


Index to 
lEDQAF 


Index to 
IEDQAO 


Insert Data (optional) 


Index to 
lEDQAJ 


Parameter 
List Length 


X'OO' 


Register 15 
Offset 


Blank 

Character 

(optional) 


Address of 
Character 
String 


AT Delimiter 
(optional) 







If the TC delimiter is an extent or an offset, the format of the 
parameter list is as follows: 



Offset 

+4 
+8 



+1 



+2 



+3 



Index to 
lEDQAP 


Status 
Byte 


Index to 
lEDQAF 


Index to 
IEDQAO 


Insert Data (optional) 


To Del 


imiter 


At Deli mite 


r (optional) 



Bit 7 of the IEEQAP index byte indicates the follcwinq: 

OFF - remove at the specified offset 
ON - remove at the scan pointer 

External routine : IEDQUT - User Interface routine - to activate the 
following modules: 

lEDQAF - Insert Data routine - to shift the loqically empty area 
to the end cf the buffer. 

IEDQAJ - Skip to Character Set routine - to scan for the TO 
delimiter character strinq. 

IEDQAO - Unit Request Interface routine - to insert replacement 
data in tine buffer. 

Tables/Work A reas: AVT, buffer currently beinq processed, LCE, SCB. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mcde. 
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Operator Contrcl Interface Routine (Chart AC) 

Module Name: IEDCAO 

Entry Point ; IETCA001 - called by the CODE macro expansion in an 
TNHD3 subgroup to test fcr operator control characters and either 
return to the caller or tpcst the buffer. 

Functions ; This module tests the prefix status byte (PFFSTAT1) for a 
1 not-last-buff er* flaq or a • TSO buffer* flaq and, if either of these 
flags is on, branches back to the calling routine. The Operator 
Control Interface routine next compares the character string in the 
AVT work area (AVTDOUEL) with the operator control characters 
(AVTCTtCH) . If these character strings dc not match, the routine 
returns control to the caller. Otherwise, the routine examines the 
SCB status byte (SCBSTATE) to determine whether the 'lock 1 bit 
(SCBWCKIN) is en. If this bit is en, the rcutine immediately branches 
back to the caller. 

The Operator Control Interface routine qets the destination key 
for the origin frcm the buffer prefix (PPESFCE) and, if it is equal to 
zero, returns control to the calling routine. If the key is not equal 
to zero, the rcutine passes this key to the Termname Table code 
(TEDOTNT) , which returns the address of the Terminal Table entry. The 
Operator Control Interface routine examines the status byte in the 
entry (TPMSTATE) to determine the status of the 'operator control 1 
flag. Tf this flag is off, the routine returns to the calling 
routine. 

Otherwise, the routine gets from the AVT the offset to the last 
byte of the character string in the buffer and places the offset in 
the scan pointer field (PRFSCAN) . Next, the routine gets from the AVT 
the address of the Operator Control QCB and places that address in the 
HCB of the buffer. The routine then sets the operator control 
priority and tposts the buffer to Operator Control by branching to the 
DSPPOST label in the TCAM Dispatcher. 

External Routine : IEDOTNT - Termname Table cede - to get the Terminal 
Table entry address. 

Tables/Work Areas : AVT, buffer, SCE, ICE, Terminal Table entry. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem program mede. 



Cutoff Message Transmission Foutine (Chart AU) 

Module Name : TEECAU 

Entry Points : 

• TEDOAU - the Cutoff routine entry point - activated by the User 
Interface rcutine (IEDOUI) from the CUTCFF macro expansion to test 
the cutoff count and initiate the cutoff function, if needed. 
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• CUTFFQCF+12 - the Cutoff subtask entry point - activated by the 
^CAM Dispatcher when the Line End Appendaqe tpcsts the LCB to the 
Cutoff QCE in order to execute the cutcff channel program and to 
tpost the final buffer to the messaqe handler after the channel 
proqram has terminated. 

Functions : This 'module cuts off the transmission of a messaqe beinq 
received after the receipt of a user-specified number of bytes or on 
detection of identical characters in the buffer. The Cutoff Message 
Transmission routine qains control to process each buffer of a messaqe 
as a result cf the CUTOFF macro in a messaqe handler. This routine 
detects whether the cutoff function is needed and if it is r performs 
the necessary functions tc activate the Cutoff Messaqe subtask. The 
subtask actually stops the transmission of the messaqe. 



the subtask, 



The specific functions of the routine and of 
respectively are described in the fcllowinq paraqraphs. 

• Cutoff Messaqe Transmission "Routine 

The Cutoff Messaqe Transmission routine first tests the SCB 
"cutoff" flaq (SCBCUTFN) to determine whether a cutoff function is 
already in prcqress. 

When the "cutcff" flaq is not set, the Cutoff Messaqe Transmission 
routine continues processinq to determine whether the cutoff function 
is needed. If the buffer has a lenqth of zero, the routine exits 
immediately to the callinq routine. 

The format cf the CUTOFF macrc-qenerated parameter list that is 
used by the User Interface routine tc activate the Cutcff Messaqe 
Transmission routine is as follows: 



Offset o 



+1 



+2 



Index 
to IEDQAU 


Parameter 
List Length 


Requested Cutoff 
Length 



The Cutoff routine next determines if all the characters in the buffer 
are identical, indicatinq a line error. If sc, the routine initiates 
the cutoff function, described below. 

If no identical characters are detected, the routine increments 
the cutoff count field (SCBBKFCT) in the SCE by the data size of the 
current buffer (PPFSIZE) . If the result is not qreater than the user- 
specified maximum, the Cutoff Messaqe Transmission routine returns 
control to the callinq routine. If the maximum has been exceeded, the 
routine initiates the cutoff function. 

To initiate the cutoff function, the Cutoff Messaqe Transmission 
routine sets the •cutoff flaq in the SCE, sets the 1CB 'error 1 flaq 
(LCBPFCPG) , and puts the address of the Cutcff QCE intc the ICBQCBA 
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field of the LCB. These flaq settinqs indicate to the Line End 
Appendaqe that the Cutoff Messaqe Transmission subtask is to be 
activated. After initiatinq the cutoff function, the Cutcff routine 
returns control to the callinq routine, the Return Interface routine 

(TEDOLM) . 

When the 'cutoff 1 flaq is set, a cutoff is in proqress for the 
current messaqe- In this case, the routine examines the ICE CCB field 
(LCBQCBA) . If the OCB field is net zero and the current buffer is the 
last buffer of a messaqe, the routine turns off the LCE •error 1 flaq. 
If the QCB is zero, the cutoff function is complete. The routine then 
exits to the callinq routine. 

• Cutoff Messaqe Transmission Subtask 

The Cutoff Messaqe Transmission subtask stops the transmission of 
a messaqe by activatinq the appropriate channel proqram. 

A channel proqram check condition indicates initial entry to the 
subtask. In this case, the subtask examines the UCB to find which 
channel proqram is to be set up. For teletype terminals, the channel 
proqram is a Write-Break; for IBM 2260 terminals, a Write-Break and 
Read-Skip; and fcr all ether IBM terminals, a Bead-Skip. The subtask 
then issues the SVC for the appropriate channel proqram and exits to 
the TCAM Dispatcher at entry point CSPDISP. 

When there is no channel prcqram check condition, the Cutoff 
Messaqe Transmission subtask qets from the LCB the address of the 
first buffer received after initiation of the cutoff. The subtask 
flaqs this buffer as the last buffer of the messaqe and sets its data 
size to. one. The subtask then exits to the TCAM Dispatcher with an 
indication to tpost this buffer to the STAETMH QCB. 

External Routine: OS EXCP routine (SVC 0) - to start channel 
activity. 

Tables/Work Areas; AVT, DCB, DEB, UCB, SCE, LCE, CCB, buffer. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mode. 



Lookup Terminal Entry Routine (Chart AV) 

Module Name : TEDOAV 

Entry Point: IEDCAV01 - called from the FCBWAED macro expansion or by 
another MH routine to assiqn a buffer to its destination. 

Functions : The Lookup Terminal Entry routine first qets the 
destination key from either reqister 1 or the buffer prefix. If the 
key is not available, the routine exits with a X^U 1 return code in 
reqister 15. If the destination key is present in reqister 1, the 
routine places the key in the PPFDEST buffer prefix field fcr a header 
buffer or the AVTFARM3 field in the AVT fcr a non-header buffer. 
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key has been found, this routine passes that 
e code (IEDQTNT) , which returns the address of 
ry. The Lookup Terminal Entry routine returns 

address to the calling routine in the AVTPAHM 
cutine then qets the address of the QCB from 
ry and determines whether there is queuinq for 

is no queuinq or if the QCE is a PUT 

E, the routine places a X'OU' return code in 

to the callinq routine. If queuinq is 

saves the QCB address in the SCEDESTQ field of 

return cede in reqister 15, and returns 



External Routine ; IEDQTNT - Termname Table code - to obtain the 
address of the Terminal Table entry for the destination. 

Tables/Work Areas ; Termname Table, Terminal Table, AVT, SCB, buffer 
currently beinq processed, ICE. 



Attributes; 



Serially reusable, refreshable, enabled, resident, 



problem proqram mode. 



Translate Buffer Ecutine (Chart AW) 

Module Name ; IEDCAW 

Entry Point; TEDQAW01 - called when the CODE macro is issued in an MH 
or from the STABTMH subtask to translate a buffer. 

Functions; This routine initializes the Translation Table address and 
translates the data in a buffer. 

When the Translate Buffer routine is activated, reqister 1 points 
to a input parameter list. The format of this list is as follows; 



Offset o 



+4 



+1 



+2 



+3 



Index 
to IEDQAW 


Parameter 
List Length 


X'OO' 


Status 


Address of Translation Table (optional) 



The settinqs of the status bits are as follows: 

Bit ON Translation Table address is in the DCE 

CEF Translation Table address is in the input parameter 
list 
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Bit 1 ON tfcnstandard Translation Tatle 

OFF Standard Translation Table 

Bit 2 ON The CODE macro is in the IKBUF or OOTEUF delimiter 
qroup 

OFF The CODE macro is in the INHDB or OUTMSG delimiter 
qroup 

The format of a Translation Table is as follows: 



Offset 



+4 



Status 



+260 



1 



+1 



Address of Output Translation Table 



Input Translation Table 
(256 bytes) 



Output Translation Table 
(256 bytes) 



The Translate Buffer routine may be entered from a CODE macro 
expansion or from the STARTMH subtask. If entry is from a CCDE macro 
expansion, the routine determines whether the CODE macro is in an 
INHD"R or OUTHDF subqrcup. If the macro is in either of these, the 
routine determines whether the next buffer is to be processed by the 
CODE macro expansion. If the next buffer is not to be processed by 
the macro, the routine turns on the SCBCODE bit (in SCESTAT1) in the 
SCB and saves the address of the CODE parameter list in the SCBTRANS 
field to ensure that the next and subsequent buffers can be translated 
via a link from the STAFTMH subtask. 

The Translate Buffer routine qets the address of the translation 
table from either the DCB or the parameter list. Tf the translation 
table is a dynamic translation parameter list, the routine passes 
control to the Dynamic Translation routine (TED0A3) , which indicates 
via a branch table the return location for processinq. 

On return, if the table is a standard translation table, the 
routine examines the first word of the table and, if it is zero, to 
indicate that the table is an EECEIC translation table, returns to the 
caller via the Feturn Interface routine (IFDQIM) . Tf the first word 
is not zero, the routine points to either the input translation table 
for receiviriq or the output translation table for sendinq. 

Next, the Translate Buffer routine finds the offset to the first 
data byte of the buffer or, if the buffer is a canceled buffer, to the 
offset to the first byte fcllowinq the last EOB character. At this 
point the translation operations beqin. The routine calculates the 
total number of bytes to be translated and, if the buffer is of zero 
lenqth, returns to the callinq routine. For nonzero lenqth buffers, 
the routine passes the offset of the first byte to be translated to 
the Address Finder routine (IEDQA1) . The address returned by the 
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Address "Finder routine is the startinq address for the first 
translation. The Translate Buffer routine decrements the end-of-unit 
address returned by the startinq address tc obtain the lenqth of data 
in the first unit. If the total lenqth of data is equal to or smaller 
than the lenqth of data in the first unit, the data ends in the first 
unit, and the routine issues a branch to the label TBANS2. At TBANS2, 
^inal translation of the total lenqth of data is performed, and the 
Translate Buffer routine returns to the callinq routine. 

If the data in the buffer does not end in the first unit, the 
translate Buffer routine decrements the total data lenqth by the 
lenqth of data in the unit, and then translates the entire unit. The 
routine qets the address of the next unit from the TIC field of the 
unit iust translated. The startinq address is set at the start of 
data (past the BCB) in the unit. The Translate Buffer routine 
compares the remaininq total lenqtb of data to be translated with the 
key lenqth (AVTKEYLE) . If the tctal lenqth is equal cr smaller, the 
data ends in this unit, so the final translation is made and this 
routine exits tc its callinq routine. 

If the data does net end in the second unit, the total lenqth is 
decrmented by the key lenqth, and the entire unit is translated. The 
Translate Buffer routine qets the address of the next unit and 
continues as iust described until all the data in the buffer is 

translated. 

External Boutines: 



• 



TEDQAI - Address Finder routine - to initialize the startinq 
address fcr translation. 



• IED0A3 - Dynamic Translation routine - to perform dynamic 
translation of the buffer. 

Tables/Work Areas: AVT, LCB, ECB, SCB, current buffer, Translation 
Table. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 



Screen "Routine (Chart AY) 

Module Name: IEBCAY 

Entry Point : IIDOAY01 - activated by the User Interface routine 
(IEDOUI) to initialize for a screen command modification operation on 
the buffer destination. 

Functions : This module checks the Unit Control Block (UCB) for the 
device beinq used and initializes fcr a screen command modification 
operation on the destination. 

Beqister 1 contains the address of the input parameter list. The 
format of the parameter list is as follows. 
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Offset 






+1 


Index to 
lEDQAY 


Request 
code 



Bit 7 of the index byte indicates the follcwinq: 
ON - command chanqe requested 
OF 1 * - return the current function settinq only 

The request code can be one of the follcwinq: 

X'OO* - to indicate a write at display cursor operation 
X'01 1 - to indicate a write at line address operation 
X'02 1 - to indicate a write erase operation 



T'he Screen routine first checks the UCB to determine whether 
buffer destination is an IBM 2260 local or an IBM 2260 Bemote. 



the 



If the destination is a 2260 Local, the routine uses an index byte 
from the input parameter list to locate the requested function byte in 
an internally defined table. The routine places the function byte in 
the key field of the buffer and sets the 'screen request* bit in the 
LCBSCBNN field cf the LCB. At this point the routine has completed 
processinq and returns to the Return Interface routine (IEDQLM) with 
the new function byte in reqister 15. 



If 


the destination 


is a 


226C Bemote 


, the Screen 


routine V€ 


irifies 


that th 


e destination is 


a screen device. 


If it is 


not a 


screen 


device, 


the routine p 


laces 


zeros in reqister 15 and 


branches 


to the 


Beturn 


Interface routine 


. If 


the destination is a screen device 


, the 


routine 


qives ccrtrol to the 


Termname Ta 


ble code (IEDQTNT) to q 


et the 


address 


of the terminal 


entry 


for the des 


tination. Up 


en return 


, the 


Screen 


routine finds the 


device-dependent 


area of the 


entry and 


places 


the current settina of 


the function byte 


in reqister 


15. If a 


chanqe 


of function is reauested 


, the 


routine sel 


ects a new 


function 


byte. 


places 


it in the current 


function byte in 


the terminal 


entry, and then 


branches to the Peturn Interface routine. 









External Boutine : IEDQTNT - Termname Table cede - to qet the address 
of the terminal entry for the buffer destination. 

Tables/T»Tork Areas: AVT, buffer currently beinq processed, LCB, SCB, 
DEB, UCB, Terminal Table. 



Attributes: 



Serially reusable, refreshable, enabled, resident, 



problem proqram mode. 
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Skip Backward Routine (Chart AO) 

Module flame : IIBCAO 

Fntry Point: TFDQA001 - called throuqh the User Interface routine 
when SETSCAN is issued in an MH to move the scan pointer backward in 
the header of a messaqe a specifier] number of bytes. 

Functions : This routine moves the scan pointer backward a specified 
number of bytes in the header of a messaqe. 

When the Skip Backward routine is activated, reqister 1 points to 
an input parameter list. The format of this list is as fellows: 



Offset o 



+1 



+2 



Index 
to IEDQA0 


Parameter 
List Length 


Skip Count 



If the scan pointer is beyond the end of the buffer, the Skip 
Backward routine returns immediately with a IMOU 1 in reqister 15. 

when the skip count in the input parameter list contains zeros, 
this routine links to the Address Tinder routine (IEDQAL) to qet the 
scan pointer address. On return, the Skip Backward routine returns to 
the callinq routine with the scan pointer address in reqister 1 and a 
X f 00 f return code in reqister 15. 

When the skip count is not equal to zero, the Skip Backward 
routine places the prefix scan pointer offset from the buffer prefix 
(PBFSCAM) in a scan pointer offset reqister and then links to the 
Address binder routine (IEDQAL) to qet the address of the scan pointer 
and of the unit in which it is located. The Skip Backward routine 
puts the address of the last byte of the BCB of this unit in a "start 
of unit" reqister and puts the specified skip count in a count 
reqister. 



The Skip Backward 
first decrements the 
If the offset is red 
routine puts a return 
the callinq routine v 
not reduced to zero, 
the "start of unit" r 
reqular processinq co 
used to qet a new 
address for the prece 



routine next enters a main 
scan pointer address and off 
uced to zero, the skip is in 

code of X'OU 1 in reqister 1 
ia Beturn Interface (IEDQLM) 

the routine compares the sc 
eqister. If the scan pcinte 
ntinues; otherwise, the Addr 

scan pointer address and 
dinq unit. 



processinq loop that 
set reqisters by one. 
to the prefix and the 
5 before returninq to 
If the offset is 
an pointer address to 
r address is hiqh, 
ess Finder routine is 
a new "start of unit" 
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If the byte at the current position of the scan pointer is a 
blank, the Skip Backward routine branches tc reenter the main 
processing loop. If the byte is net a blank, the routine decrements 
the count register by one. If this does not reduce the count to zero, 
the routine branches to reenter the loop. 

When the count is reduced to zero, the skip is complete. At this 
point, the Skip Backward routine updates the prefix scan pointer 
(PRFSCAN) from the scan pointer offset reqister, sets a return code of 
X'OO' in reqister 15, and returns to the calling routine via Return 
Interface. 

External Routine : TFDQAL - Address Finder routine - to return the 
address of the scan pointer and of the unit in which it is located. 

Tables/Work Areas: AVT, buffer being processed. 



Attributes: 



Serially reusable, refreshable, enabled, resident, 



problem program mede. 

Insert at Cffset Routine (Chart A2) 

Module Name : IFE0A2 

Fntry Point: IFDCA201 - activated by the User Interface 
(TFDOTJT) to insert data in a messaqe at a specific location. 



routine 



^unctions : This module inserts data into a messaqe buffer at a 
specific location. 

If the buffer has a lenqth of zero, this module puts a return code 
of X'OU' in reqister 15 and exits to the Return Interface routine 
(TFDOIM) . Otherwise, the Insert at Offset routine determines whether 
the insert operation is the current lecatien of the scan pointer. If 
the insert is at the scan pointer, the routine qets the insert offset 
from the prefix field (PRFSCAN) : otherwise, the routine qets the 
offset from the input parameter list, the address of which is in 
reqister 1. The format of the input parameter list is as fellows: 



Offset 

o 

+4 
+8 



+1 



+2 



+3 



Index to 
IEDQA2 


Parameter 
List Length 


Index to 
lEDQAF 


Index to 
lEDQAO 


Insert Data 


Insert Offset 
(optional) 
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Bit 7 of the IEDQA2 index byte indicates the followinq: 

ON - the data is repeated characters 
OF 17 - the data is a character strinq 

If the data is a character strinq, the format of the insert data word 
is as follows: 



Offset o 



+1 



Length of 
String 



Address of Character String 



If the data is a strinq of identical characters, the format of the 
insert data word is as follows: 



Offset o 



+i 



+2 



Number of 

Identical 

Characters 


Repeat 
Characters 


Reserved 



The Insert at Offset routine next determines whether the insert 
offset is qreater than the buffer size. If the insert offset is 
greater, the routine does not perform the insert operation, but 
returns control directly to the Return Interface routine (IEDQLM) with 
a X'04' return code in reqister 15. 

If the insert offset is net qreater than the buffer size, the 
Insert at Offset routine branches to the Unit "Request Interface 
routine (IEDCAO) via the User Interface routine to insert the data in 
the buffer. If, on return, the Insert at Offset routine finds that no 
empty space is available for the insertion, it places a X'04 1 in 
reqister 15 and exits to IEDQLtt. If there is loqically empty space 
remaininq in the buffer, the Insert at Offset routine links to the 
Insert Data routine (IEDQAF) via the User Interface routine to shift 
the empty space tc the end of the buffer. Upcn return, the routine 
calculates the final data size, places it in the PBFSIZE field in the 
buffer prefix, and exits to the Return Interface routine. 

External Routine : IEDQUI - User Interface routine - to activate the 
followina modules: 

IEDQAF - Insert Data routine - to shift any loqically empty span 
to the end of the buffer. 

IEDOAO - Unit Request Interface routine - to insert data in the 

buffer. 



Program Organization 255 



Tables/Work Areas : AVT, buffer currently being processed, LCB, SCB. 

Attributes : Serially reusable, refreshable, enabled, resident, 
oroblem program mode. 

Dynamic Translation Foutine (Chart A3) 

Module Name : IITQA3 

Entry Point : IEDQA3 - entered from the Translation routine (IEDQAW) 
via a Branch and Link when the translation table pointer in the DCB 
points to a TBANLIST macro expansion. 

^unctions: There are two main functions of the Dynamic Translation 
routine. 

1. To determine, on the first message input from a line using dynamic 
translation, the correct table from a list of tables. The 
TFANIIST macro expansion provides the list of tables and one or 
more control strings. 

2. To retrieve from the appropriate option field, the address of a 
translation table. When the correct table was determined in the 
first function, its address is stored tc be used here. 

To determine the correct table, the control string is expected to 
begin within the first 3 characters of the message. For a correct 
determination, the user must assure that at least one character that 
is uniguely translated for each table specified is included in the 
string. Once a match is found, the Dynamic Translation routine 
assumes that the table is the only correct one. 

The maximum length of a string is eight characters. This routine 
moves ten characters from the buffer into a work area in the AVT and 
translates them using the first table in the list. After translation, 
the Dynamic Translation routine forces each character to upper case. 
The routine then attempts 3 times to compare a string from the list to 
the data input. The routine repeats this operation for each string 
and then uses the next table specified. If the Dynamic Translation 
routine finds no match before exhausting all tables and all strings, 
the routine sets an error bit in the SCB and makes an error return. 
If the routine finds a match, the address of the table is stored in 
the option field for this terminal. Thereafter, until logoff or 
hangup in a TSO environment or hangup in a TCAM environment, that 
table will be used for all input and output translation for that 
terminal. 

The second function of the Dynamic Translation routine merely 
finds the option field and leads the translation address in the 
register used by TEDOAW. The routine then returns control to IEDQAW 
via register 1*J. All ether registers are restored to their value at 
entry. 
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5041 Processing: 

Certain dial lines may be designated as terminal type 5041. This 
indicates that a line will support (including translation) a 1050 or 
a 2741 terminal. The type is determined at dial up time. Dynamic 
translation will always be specified for a 5041 line. IEEQA3 will 
know the type at entry and will only try 1050 translation tables for 
a 1050 and 2741 tables for a 2741. This is accomplished by the way 
the TF.AN1TST macro is used. For a non-5041 line, all tables are 
included in the LTST= operand and the byte preceding the VCON is 
X'00 1 . Tor 5041 lines, 1050 tables are specified in the L1050= 
operand and the byte preceding the table VCON is set to X»02', 2741 
tables are specified in 12741= and the byte is X'01' . 

External Foutines : 

• TEDOAL - Address Finder routine - to qet the address of the data. 

• IEDOUI - User Interface routine - to link to the locate Option 
Field Address routine (TEDQAE). 

^able/Work Areas: AVT, SCE,LCE,DCB 

Attributes: - Serially reusable, reentrant, prcblem program mode. 

Forward Routine (Chart A5) 

Module Name: IEFQAS 

Entry Point: TFDOA501 - activated either by the User Interface 
routine (IEDOUI) when the F0FWAF.D macro is issued in an MH or from the 
Multiple Pouting suttask. 

Functions: This routine determines the destination to which a message 

is to be sent. If, however, the buffer has a length of zero, the 

buffer is a TSO buffer, the buffer is a ncn-recalled text buffer, or 

the line is in extended lock mode, this routine returns immediately to 
the calling routine. 

When the Forward routine is activated, register 1 points to the 
first of up to three parameter lists. The first parameter list is for 
the Forward routine itself. The Forward routine passes the address of 
the second parameter list to the User Interface routine, thus linking 
to one of three possible subsidiary routines. These three routines 
are the Skip Forward and Scan routine (TFCQAI) , the locate Option 
Field Address routine (IFDQAE) , and the Binary Search routine 
(IED0A1) . If the second parameter list is for either the Skip Forward 
and Scan routine cr the Locate Opticn Field Address routine, the third 
paramater list is for the Binary Search routine, which is activated 
when the routine of the second parameter list passes the address of 
the third parameter list to the User Interface routine. 

The format of the input parameter list for the Forward routine is 
as follows: 
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Offset 



+1 



+2 



+3 



+4 

+8 

+12 

+16 

+20 



Index 
to IEDQA5 



Length of 
EOA String 



Parameter 
List Length 



Status 



Index to 
IEDQBA 



Address of the End-of-Address 
Character String 



Address of the User 
Error Recovery Routine 



Variable Data 



Index to 
IEDQA1 



Parameter 
List Length 



Reserved 



Length 
(may be 
initqlized) 



Address of the character string 
(may be initialized) 



Optional 
Optional 



Status bvte: This byte has the following definitions. 

X'SO' - the destination name is defined in the macro 

X'UO' - the destination name is in an option field 

X^O 1 - the destination name is in the buffer 

X'08' - an End-of-Address (EOA) strinq is specified 

Variable data: This field can have one of the two following formats 



+12 


Index to 
lEDQAE 


Parameter 
List Length 


Option Field 
Offset 


X '10' 






+12 


Index to 
IEDQAI 


Parameter 
List Length 


X 'lO' 


Scan 
Length 



When the forward routine receives control from one of its 
subsidiary routines, it examines a status byte in its input parameter 
list to determine which subsidiary routine was executed. 

• Return from the Skip Forward and Scan Routine (IEDQAI) 

Tn this case, the Skip Forward and Scan rcutine has attempted to 
get the name of the destination for the message from the message 
buffer. If register 15 contains a negative value, the name is not 
complete in the current buffer and the Fcrward routine returns to its 
calling routine with the negative return code. 

Tf register 15 does not ccntain a negative value, the Forward 
routine examines the status byte to determine whether the macro 
defined an EOA string. If so, this routine compares the EOA string in 
its parameter list with the string returned by the Skip Fcrward and 
Scan routine. If the two character strings do not match and the EOA 
character string is one byte long, the Fcrward routine tests each byte 
of the returned character string for an ECA. If the routine finds an 
EOA or if the strinas match, there are no more destinations. On 
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oriqinal entry from the Multiple Routinq routine, the Forward routine 
places zeros in the secondary destination field in the SCB (SCBMRFSD) 
and exits to the callinq routine with an X'CB' return code in reqister 
15. If the FCA is found and entry was not from Multiple Routinq, no 
valid destination has been found; therefore, the Forward routine 
performs its error recovery procedure. (This procedure is discussed 
after the Return from the Binary Search routine paraqraphs.) 

When entry is from the FORWARD macro expansion and either the FOA 
is net found or if no FOA strinq is defined, the Forward routine 
places the prefix scan pointer (PRFSCAN) at the last byte of the 
strinq returned, places the last byte in the secondary destination 
field of the SCB, and overlays the last byte with a unique character. 
At this point, reqardless of which function activates this routine, 
the forward routine prepares to link to the routine represented by the 
third parameter list - the Binary Search routine. The Forward routine 
places the address and the lenqth of the character strinq returned by 
the Skip Forward and Scan routine in the input parameter list for the 
Binary Search routine. Binary Search is activated when the Forward 
routine passes the input parameter list to the User Interface routine. 

• Return from the Locate Option Field Address Routine (IFEQAF) 

In this case, the locate Option Field Address routine has 
attempted to locate the name of the destination for the messaqe in an 
option field. If reqister 15 contains zero, the locate Option Field 
Address routine was not able to find the name; therefore, the Forward 
routine branches to its error recovery procedure. If reqister 15 
contains a value, it is the address of the option field that contains 
the destination name. In this case, the Forward routine places the 
address and lenqth of the character strinq that is in the option field 
in the input parameter list for the Einary Search routine. The 
Forward routine then links to the Binary Search routine by passinq its 
input parameter list to the User Interface routine. 

• Return from the Binary Search Routine (TFEQA1) 

If the Binary Search routine is the first subsidiary routine 
linked to from the Forward routine, the address of the destination of 
the messaqe is defined in the FORWARD macro. Subsequent prccessinq is 
the same in this case as for the return after searchinq for a 
character stinq defined in the buffer or in an option field. 

If, upon return from the Binary Search routine, the Forward 
routine finds a zero value in reqister 15, no matchinq destination was 
founfl. Therefore, Forward tranches to its error recovery procedure. 
If reqister 15 contains a nonzero value, that value is the offse to 
the Termname Tatle entry for the destinaticn. In this case, the 
Forward routine passes the offset to the Lookup routine (IEDQAV) to 
qet the appropriate Destination QCB address. Upon return, the Forward 
routine returns to its callinq routine with a return cede of X'OO' in 
reqister 15. 
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• Error Recovery Procedure 

The error recovery procedure of the Forward routine first examines 
the status byte in its input parameter list to determine whether the 
user has defined a special routine to attempt error recovery. If so, 
the "Forward routine links to the user-specified routine. If the user 
routine returns with the address of another character string in 
reqister 15, the Forward routine links tack to the Binary Search 
routine to try to match this new entry with an entry in the Termname 
^able. A return reqister is set, however, to prevent relinkaqe to the 
user routine if no match is found. 

If no match is found or if no user routine is defined, the Forward 
routine determines whether a dead-letter queue is defined by examininq 
the AVT field AVTDLOX. If not, the Forward routine places zeros in 
the secondary destination field of the SCB (Multiple Foutinq only) and 
returns to its callinq routine with X'OU* in reqister 15. If a dead- 
letter queue is defined, the Forward routine uses the lookup routine 
to qet its Eestination OCB address and then returns tc its callinq 
routine. 

External Foutines : 

• TEDOUT - the User Interface routine to link to the Skip Forward 
and Scan routine (TEBQAI) , the Locate Cption Field Address routine 
(IFDOAE) , and the Binary Search routine (TEDQA1) . 

• IFDOAV - lookup routine - to find the address of the Destination 
OCB for a specific terminal entry. 

• TEDQAL - Address Finder routine - to qet the address of the last 
byte in a terminal entry. 

tables/work Areas : AVT, SCB, buffer currently beinq processed. 

Attributes ; Serially reusable, refreshable, enabled, resident, 
problem program mode. 



line Control Initialization Foutine (Chart A6) 
Module Name : IFDCA6 

Entry Point : IED0A601 - activated by the User Interface routine 
(IEDOUI) to initialize SCB fields that indicate the intervals between 
the line control characters tc be inserted. 

Functions : This module initializes fields in the station control 
block (SCB) tc indicate the intervals between the line control 
characters to be inserted. 

The Line Control Initialization routine initializes the followinq 
fields in the SCB. 



26 



If EOBs are to te inserted, 

1. SCBEOBS7 - initialized to the interval between EOBs. 

2. SCBEOEAC - initialized to the interval between EOBs. 

Tf ETBs are tc be inserted, 

1. SCBEOBSZ .- initialized to the interval between ETEs. 

2. SCBEOEAC - initialized to the interval between ETBs. 

Tf TTBs are tc be inserted, 

1. SCBTTBSZ - initialized to the interval between ITBs. 

2. SCBTTEAC - initialized to the interval between ITBs. 

If the input buffer to this module is a text buffer or has lenqth 
of zero, the routine returns immediately to the callinq routine 
throuqh the Return Interface (TEDQIM) . Otherwise, the Line Control 
Initialization routine uses the Termname Table code (IEDQTNT) to qet 
the terminal entry address for the destination. 

The Line Control Insertion routine then examines the SCT to 
determine whether an EOT is defined for the destination terminal. If 
no EOT is defined, the module returns to IEDQLM. When an EOT is 
defined, the routine examines the SCT for an EOB entry for this 
terminal. When an EOB is not defined and the terminal is not in 
transparent mode or when an EOB is defined and there is no checkinq 
for this terminal, at the label SETETELD the routine sets the 'MSGFOFM 
request' bit in the SCB, puts the subblock and block reqisters in the 
SCB, puts a X'OO' return code in reqister 15, and exits to TEEQLM. in 
all other cases the processinq continues to find the block extent. 

When the blcck extent is specified on the WSGFCFM macro, this 
routine sets the block reqister from the parameter list. For a 
terminal in transparent mode and not en a BSC line, the routine 
performs the exit functions described in the precedinq paraqraph. For 
a terminal in transparent mode on a BSC line, the routine sets the SCB 
'transparent 1 flaq, puts the block reqister in the SCB, puts a X'OO' 
return code in reqister 15, and exits to IEECIM. 

when the blcck extent is specified and the terminal is not in 
transparent mode, this routine branches tc the code to find the 
subblock extent. In this processinq, if there is no ITB defined in 
the SCT or there is no subblock extent on the MSGFOFM macro or in the 
terminal entry, the routine exits as described previously for the 
label SETFIFLD. Otherwise, the routine qets the subblock extent from 
either the MSGFOBM parameter list cr the terminal entry. The routine 
then exits as described for the SETEIELD label. 

When the block extent is not specified en the MSGFOFM macro, the 
Line Control Initialization routine must qet the block extent from the 
terminal entry. If the terminal is in transparent mode and on a BSC 
line, the routine puts the transparent block extent from the terminal 
entry in the SCB, sets the. SCB 'transparent' flaq, puts X'OO' in 
reqister 15, and exits tc IEDQLM. If, in this case, the extent is not 
in the terminal entry, the routine puts a X'OU' in reqister 15 and 
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exits. If the terminal is in transparent mode not on a ESC line, the 
routine qets the extent, if available, from the terminal entry and 
exits thro*uqh the SETFIELD label. 

Tf the terminal is not in transparent mode, the terminal is on a 
BSC line, and the block extent is ret in the terminal entry, this 
routine puts a X'04 1 in register 15 and exits to IEDQLM. When the 
terminal is net in transparent mode and the block extent is in the 
terminal entry, the routine qets the block extent and then performs 
the subbiock extent search described previously. 

The input parameter list, the address of which is contained in 
reqister 1, has one of the following formats. 



Offsets 




+4 



Index to 
IEDQA6 


X'05' 


Block 
Interval 


Subbiock 
Interval 







Block and Subbiock 
Specified 



Index to 
IEDQA6 


X'04' 


Block 
Interval 



Block Only 
Specified 



Index to 
IEDQA6 


X'03' 


Subbiock 
Interval 



Index to 
IEDQA6 


X'02' 



Subbiock Only 
Specified 



Neither Block Nor 
Subbiock Specified 



where index to IEDQA6 

= X '01 ' for transparent mode. 
= X '00' for text mode. 

External Routine ; TEDQTNT - Termname Tatle cede - to qet the address 
of the destination terminal entry. 

Tables/Work Areas : AVI, SCB, buffer currently beinq processed. 
Terminal ^able entry for the buffer destination. 



Attributes: 



Serially reusable, refreshable, enabled, resident. 



problem program mode. 



Counter Routine (Chart A7) 



Module Name: T1DCA7 



Entry Point : T1T0A701 - activated by the COUNTER macro expansion to 
count either complete messaqes or message seqments. 
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^unctions : This module counts either the complete messaqe or messaqe 
seqments that are beinq processed by the MB subqroup in which the 
COUNTER macro appears. If the COUNTER macro appears in an INHDR or 
OUTHDR. subqroup and the buffer is not a header buffer, this routine 
returns immediately with a X'OO' in reaister 15* Otherwise, the 
Counter routine determines whether the buffer currently beinq 
processed is a zero-lenqth buffer. If so, the routine dees not count 
the messaqe but returns immediately to the callinq routine with a 
X»-pvi return code in reqister 15. If the buffer is not zero-length, 
the routine linfcs to the Locate Option Field Address routine (IEDQAE) 
throuqh the User Interface routine to qet the address of the option 
field. On return, if the option field is not found, the Counter 
routine does not count the messaqe and exits to the callinq routine 
with a X 1 ?? 1 return code in reqister 15. 

If the option field is found, the Counter routine adds one to the 
count in the cption field and exits to the callinq routine with X'OO 1 

in reqister 15. 

External Routine : IEDOUT - User Interface routine - to activate the 
Locate Option Field Address routine (IEEOAE) , which qets the address 
of the option field. 

Tables/Work Areas : AVT, buffer currently beinq processed, counter 
option field. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem prcqram mede. 



Multiple Insert at Offset Routine (Chart A8) 

Module Name : TEDCA8 

Entry Point : IFDCA801 - activated by the User Interface routine 
(IEUOUI) to insert a character strinq at specified intervals in the 
messaqe. 

Functions : This module inserts a data strinq of up to eiqht 
characters at a specified interval (up to 65,535 bytes) in the 

messaqe. 

The address of the input parameter list for the Multiple Insert at 
Offset routine is in reqister 1. The format of the parameter list is 
as follows. 
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Offset 



+4 



+8 



+1 



+2 



+3 



Index to 
IEDQA8 


Parameter 
List Length 


Index to 
lEDQAF 


Index to 
lEDQAO 


Insert Data 


Interval Between Inserts 


Index to 
IEDQAE 


Option 

Field 

Offset 



Bit 1 of the TFEQA8 index byte indicates the following: 
OFF - the data is a character strinq 
ON - the data is reserve characters 

Tf the data is a character strinq, the forirat of the insert data word 
is as follows: 



Offset o 



+i 



Length of 
String 


Address of 
Character String 



Tf the data is a strinq of identical (reserve) characters, the format 
of the insert data word is as follows: 



Offset o 



+1 



+2 



Number of 

Identical 

Characters 


Repeated 
Character 


Reserved 



The Multiple Insert at Offset routine first tranches through the 
Hser Interface routine tc the Locate Opticn Field Address routine 
(TEDOAE) to find the address of the opticn field in which the initial 
offset for the next buffer is located. On return, if the option field 
is not found, the Multiple Insert at Offset routine exits to the 
Return Interface routine (IEDQLM) with a X'CU* return code in register 
15. Otherwise, the routine calculates the initial data offset and 
branches to the main processinq lccp (MAIfllCCF) to insert the data 
strinq. 

If the data offset is not contained within the buffer that is 
currently beinq processed, the routine decrements the offset by the 
lenqth of data in the buffer, saves the offset in the option field, 
and exits to the "Return Interface routine with a return code of X'OO 1 
in reqister 15. If the data offset falls at the very end of the 
buffer data and this buffer is not the last buffer of the messaqe, 
this routine performs the same processinq iust described so that the 
insert is done at the beqinninq of the next buffer. 
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The main processinq loop (MAINIOOP) of the Multiple Insert at 
Offset routine uses the User Interface routine to link to the Unit 
"Request Interface routine (IEDQAO) in order to insert the data 
character strinq. On return, the routine branches, via the User 
Interface routine, to the Insert Data routine (IEDQA?) to shift the 
oriqinal buffer data to the left up to the next point of data 
insertion. The routine continues processinq in the main loop until 
the insert point falls beyond the end of the buffer that is currently 
beinq processed. When this pcint is reached, the Multiple Insert at 
Offset routine branches to the Insert Data routine to shift the 
loqically empty area to the end of the buffer. On return, the 
Multiple Insert at Offset routine calculates the final data size and 
places it in the prefix (PRFSTZE) . If there is a subsequent buffer to 
be processed, the routine calculates the initial insert offset for 
that buffer and places it in the option field. At this point, 
processinq is complete and the routine exits to the Return Interface 
routine with a X'CO 1 return code in reqister 15. 

External "Routine : IEPQUI - User Interface routine - to activate the 
followinq modules: 

TEDOAE - locate Option Field Address routine - to find the address 
of the cpticn field. 

IEDQAF - Insert Data routine - to shift the oriqinal data to the 
left in the buffer. 

IEDQAO - Unit Bequest Interface routine - to insert the data 
character strinq. 

Tables/Work Areas : AVT, buffer currently beinq processed, LCB, SCB, 
user-defined cpticn field. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mcde. 



Checkpoint Bequest Routine (Chart EB) 

Module Name : IEDCBB 

Entry Point : IFDQBB - called throuqh the User Interface routine by 
the CHECKPT macro expansion or from the Buffer Disposition subtask 

(IEDOBD) . 

Functions : This routine sets the "checkpoint request" flaq (SCBCKPT) 
in the SCB if the Checkpoint task is in the system. If the routine 
was entered from the Buffer Disposition subtask (TEDQBB) , the 
Checkpoint Bequest routine tposts the EBB to the Buffer Disposition 
OCB. 

If Checkpoint is not in the system and this routine was entered 
from the User Interface routine, the Checkpoint Bequest routine exits 
to Return Interface with a return code of X'04 1 in reqister 15. If 
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checkpoint is in the system and entry is from User Interface, a 
successful return code of X'OO 1 is passed to Return Interface. 



If the Checkpoint Request routine *as entered from 
Disposition, exit is to the TCAM Dispatcher tc tpost the ERE. 



Buffer 



The macrc-qenerated. input parameter list for this module has the 
following format. 



Offset o 



+1 



+2 



+3 



Index to 
IEDQBB 


Parameter 
List Length 


X'OO' 


X'OO' 



External Routines : None. 

Tables/Work Areas : AVT, LCB r SCB . 

Attributes : Reentrant, refreshable, enabled, 
proqram mode. 



resident, problem 



FOB/ETB Handling Subtask (Chart BT) 

Module Name: IEDCBT 

Entry Point : TEDQBT - activated by the TCAM Dispatcher when a buffer 
is tposted to the STARTMH OCE and the STARTMH operands specify that 
FOE/ETB handlinq is to be performed. 

Functions : This module performs EOE/ETB handlinq on a buffer. This 
subtask c iins control when a buffer is tposted to STARTMH and the 
STARTMH operands specify that some form of EOB/ETB handlinq is to be 
done. 

r of a messaqe, the 
S to perform a bypass 

buffer is marked as 
rs in the buffer, and 
r has occurred, the 
received/sent buffer. 
y) the routine checks 
exit was specified, a 
ress. This subtask 

if the EOB/ETX iust 
f not, the subtask 

reception. For send 
one with an 20E/ETE 
occurs, the STCP/CONT 
is aborted based on 



If the buffer is not marked as the last b 


uffe 


subtask exits tc the TCAM Dispatcher at DSFBYPA 


function to the STARTMH routine (TEDQAA) . If 


the 


the last buffer of a messaqe, an EOB/FTB appea 


this subtask checks for a text error. If an 


erro 


subtask attempts retry by recallinq a previcu 


sly 


If no error occurred, (for receive operations 


onl 


for the EOB/ETB options selected. If a u 


ser 


branch and link passes control to that exit 


add 


then checks the CONV= operand to determine 


received is to be treated as end of messaqe. 


I 


tposts the ERE to IEEQKA to ccntinue mes 


saqe 


operations, only the last buffer of a messaqe 


or 


error is marked last. If a permanent error 


options are checked and the messaqe continues 


cr 


the options. 





266 



External Routine : IEDCUI User Interface routine - to activate the 
Locate Option "Field Address routine (TEDQAE) in order to obtain the 
address of an option field. 

Tables/Work Areas : LCB, SCE, AVT , buffer prefix. 

Attributes : Reusable, refreshable, enabled, resident, problem program 
mode. 



Unit Request Routine (Chart BW) 

Module Name : 7FDCEW 

^ntrv Point : IEEQBW - entered from MH via the Unit Request Interface 
routine (IEBOAO) to qet an extra unit. 

"Functions : This module supplies extra tuffer units to requesting 
modules. When the Unit Request routine is entered, the calling MH 
routine is requestinq a buffer unit. If a unit is available, the Unit 
Request routine removes the unit from the buffer unit pool and returns 
the unit to the callinq routine. If no unit is available, the Unit 
Request routine returns to the callinq routine with a return code. 

External Routines : None. 

Tables/ T flork Areas : OCE, STCB, SCE, buffer prefix, AVT, LCE, DCB. 

Attributes: Reusable, enabled, resident, problem proqram mode. 



Loq Seqment Routine (Chart RX) 

Module Name : IFTCEX 

Entry Point : IETQBX - called thrcuqh the User Interface routine when 
the LOG macro is issued in the INHDR, CUTHDR, INEUF, or OUTBUF 
subqroup of an MH. 

Functions : This routine writes, or lcqs, a messaqe seqment onto the 
loqqinq medium specified bv the user in a BSAM DCB. 

When the loq Seqment routine is activated, reqister 1 points to a 
one-word input parameter list. The format cf this list is as follows: 



Offset 



+1 



Index 
to IEDQBX 



Address of DCB to be used to Log the Segment 
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The Loq Seqment routine issues a WRTTI and a CHECK macro for each 
unit of the buffer to be loqqed on the device specified in the DCB. 
The unit is written without the twelve-byte control area. 

If an T/C error occurs while the buffer is beinq written, ESAM 
passes control tc the user SYNAD exit in the DCB. (This exit must 
return to the instruction that follows the CHECK macro.) If the loq 
Seqment routine finds that the specified DCB is not open, it places a 
return code of X'04* in reqister 15. The successful write return code 
is X'OO 1 in reqister 15. 

The Loq Seqment routine returns to the next in-line instruction in 
the mh code of the MCP. 

External Routines : 

• OS BSAM W*?ITE routine - tc write the units of the buffers. 

• OS BSAM CHICK routine - to check the write operations. 

• OS Getmain routine (SVC 4) - to obtain main storaqe. 
Tables/Work Areas : DCB, AVT. 

Attributes : Reusable, refreshable, resident, enabled. 

MESSAGE HANDLING - FUNCTIONAL SUBROUTINES 

Tnsert Data Pcutine (Chart AF) 

Module Name : IIDCAF 

Entry Point : IEDCAF01 - activated throuqh the User Interface routine 
as a subroutine cf a functional TCAM module to insert data in a buffer 
or to shift data left within a buffer. 

Functions : The Insert Data routine performs one of four possible 
functions. 

1. To insert data and return immediately. 

2. To insert data, adiust the prefix insert offset by the lenqth of 
data inserted, and return. 

3. To shift data across several units and return. 

4. To expand the buffer by shiftinq data left intc the reserve 
characters area. 

Reqister 1 contains the address of the parameter list qenerated by 
a macro expansion or by a callina routine fcr User Interface to use to 
activate the Insert Data routine. The requested function is indicated 
by the flaqs in the first byte of the list. The format cf this area 
for all except the expand buffer functicn is as follows: 
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Offset 



+1 



Index to 
IEDQAF 



Data 
Type Flag 



Index X '00' - Insert, adjust, and return 

X '01 ' - Insert and return 
X '02' - Multiple-unit shift 
X '03' - Expand buffer 



Data Type Flag X '00' - Data address 

X '01 ' - Reserve characters 



For the expand buffer function, the second byte of the list contains 
th€ lencrth of the expansion. Tor all except the expand buffer 
function, this parameter list is stored at AVTPARM in the AVT. 

If the Insert Data routine finds the X'OO 1 or X^l' value in the 
index field of AVTPAFM, it uses a second parameter list at AVTPAHM3 
for additional input. If the data type is a character strinq, the 
format of AVTPARM3 is as follows: 



Offset o 



+i 



Length of the 
Insert Data 


Address of the 
Character String 



If the data tyre is repeated characters, the format of AVTPAFM3 
is as follows: 



Offset o 



+i 



+2 



Length of the 
Insert Data 


Reserve 
Character 


Reserved 



If the requested function is to insert data and return, the Insert 
Data routine links to the Insert subroutine, which inserts the 
specified data, and returns to the callinq routine through Return 
Interface. 
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end-of-unit address and the data address. When the Address Finder 
routine returns these addresses, the Insert Data routine calculates 
the count of bytes from the data address to the end of the unit and 
compares the result to the total lenqth of data to be inserted. If 
the count of bytes tc the end of the unit is greater, the routine 
places the count in the first byte of AVTPAFM3; otherwise, the routine 
inserts the total lenqth of the data to be inserted in that first 
byte. The Insert Data routine then places the address of the data in 
the next three bytes of AVTPARM3. Next, the routine calculates a new 
data offset that is equal tc the current data offset plus the lenqth 
specified in AVTPAPM3. The routine also decrements the total lenqth 
of data to be inserted by the value in AVTPAPM3 - this may reduce the 
lenqth to zero. The Insert Data routine then links to the Tnsert 
subroutine tc shift left all the data in the current unit. Upon 
return from the subroutine, the Insert Data routine tests the 
remaininq lenqth of data for a value cf zero. If the value is not 
equal to zero, the routine must shift the data in the next unit. The 
routine sets the new data offset, which is now the offset to the start 
of data in the next unit, as the prefix data offset and then reeneters 
the shift data loop. When the remaininq lenqth is reduced to zero, 
the Insert Data routine puts X'OO 1 in reqister 15 and returns to the 
callinq routine throuqh Peturn Interface. 

If the requested function is to expand the buffer, the Insert Data 
routine tests the scan pcinter tc determine whether it is beyond the 
end of the buffer. If it is, the function is discontinued and the 
routine returns to the caller with a -4 in reqister 15. Otherwise, 
the Insert Data routine qets the requested expand lenqth from the 
input parameter list and places the lenqth in the FXE as the prefix 
insert offset. The routine qets the number of reserve characters 
currently in the buffer from LCBISZE in the ICE and compares this 
value with the lenqth requested. If the expand request is qreater 
than the number cf reserve characters, the function cannot be 
performed - the routine returns to the callinq routine throuqh Return 
Interface with X'O^ 1 in reqister 15. If the expansion can be 
performed, the Insert Data routine sets the prefix data offset equal 
to the size cf the prefix plus the number of reserve characters plus 
one. The routine then calculates the lenqth of the data to be shifted 
to be the current scan pointer settinq minus the prefix data offset 
this lenqth is later placed in AVTPAF.M3. The routine decrements the 
number of reserved characters by the requested expand lenqth and 
places the result in LCBISZE. Next, this rcutine enters the shift 
data loop and proceeds as described in the paraqraph on the multiple- 
unit shift function. 

The Insert subroutine cf the Insert Data routine inserts data 
accordinq to the parameters passed as input. The possible parameters 
are a pair cf offsets - the prefix data offset (a halfword at RCB + 4) 
and the prefix insert offset (a halfword at PCB+6) in the FCE, the 
lenqth of the data to be inserted, and the actual data to be inserted 
- either a character strinq or a repeat character. If the data to be 
inserted is itself located in the buffer, the insertion is actually a 
left shift in the buffer. 

The Tnsert Data subroutine calculates the offset at which data is 
to be inserted by subtractinq the prefix insert offset frcm the prefix 
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data offset. The routine passes this resultinq offset to the Address 
Finder routine (TEDOAL) to obtain the end-of-unit address and the 
insert address. Upon return, the Insert Eata routine calculates the 
count of bytes from the insert data to the end of the unit and 
compares the result to the lenqth of data to be. inserted. If the 
number of bytes tc be inserted is less than the number of bytes to the 
end of the unit, all the data will fit in the current buffer unit. If 
the data to be inserted is a character strinq, the routine qets its 
address from AVTPAFM3 and moves the data to the unit; if the data is 
a strinq of identical repeated characters, the routine qets the 
character frcm AVTPARM3 and enters a store character loop to insert 
the total number of characters reauested. If all the data will not 
fit in the current unit, the Insert Data routine qets the address of 
the next unit and moves in the remaininq data or repeat characters. 
After the specified ccunt of characters has been inserted, the Insert 
subroutine returns to the point from which it was called. 

External Routine: IEDCAL - Address "Finder routine - to find an 
address in a unit. 

Tables/Work Ar eas: AVT, buffer, ICE, SCP . 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem prcqram mcde. 



Buffer Step Routine (Chart AX) 

Module Name : IEDQAX 

Entry Point : SCAN - called by a hiqher-level MH routine to return the 
address of the next sequential byte in the buffer beinq processed. 

Functions : This routine returns to the callinq routine the address of 
the next seauential byte in the buffer that is beinq processed. 

The Buffer Step routine increments the scan pointer address 
reqister (RSCAN - reqister 5) and the scan pointer offset reqister 
(RSCANOFF - reqister 7) by one. It then coirpares RSCANOFE with the 
buffer prefix data size field (PRFSTZE) . If RSCANOFF is hiqher, the 
end of data in the buffer has been passed, and this routine returns to 
the callinq routine. 

The Buffer Step routine next compares RSCAN to the end-of-unit 
reqister (REOUAE - reqister 11). If RSCAN is lower, the reqisters are 
correctly set, and this routine returns to the callinq routine at a 
point that is four bytes bevond the return address in reqister 14. 

If RSCAN is net lower that REOUAD, the end of the current unit has 

been passed. Ihe routine qets the address of the next unit from the 

RCB of the current unit, sets RSCAN equal to the address of the first 

data byte in the new unit, and sets REOUAE to the address of the first 

byte beyond the end of the new unit. The routine then returns to the 
callinq routine at a point that is four bytes beyond the return 
address in reqister 14. 

Program Organization 271 



" External Routines : Ncne. 

Tables/Work Areas : Buffer currently beinq processed, AVT. 

Attributes : "Reentrant, serially reusable, refreshable, enabled, 
resident, problem program mode. 



Binary Search Routine (Chart A1) 

Module Name : IFDCA1 

Fntry Point : TEDOA101 - called throuqh the User Interface routine 
(TEDOUT) by a hiqher level MH routine to search a table. 

Functions : This routine searches a table that is arranqed in 

collatinq sequence. It is primarily designed to search the Termname 

^able. On entry, the address of the last 8 bytes of the FORWARD 
macro-qenerated parameter list is in reqister 1. 

The Binary Search routine compares the lenqth of the input field 
to the lenqth cf the name field in a table entry (TNTENLEN) . If the 
passed lenqth is lonqer, this routine puts a X'OO' return code in 
reqister 15 and returns to the callinq routine throuqh the Return 
Interface routine (IFDQLM) • If the passed lenqth is equal or shorter, 
the Binary Search routine sets the ccmpare lenqth for the main loop 
equal to the passed lenqth. 

The routine then clears the AVT field AVTDOUBI to zeros and moves 
the character strina to be found to that AVT field if this move is 
necessary. 

The Binary Search routine initializes the entry address to the 
address of the middle entry (TNTMIDEN) in the table, and sets the 
search extent to the full lenqth of one entry (TNTENLEN+3) multiplied 
by the search extent factor (TNTSRCHX) . The address of the last entry 
plus one is set by multiplyinq the full lenqth of one entry by the 
number of entries (TNTLFN) and addinq the product to the address of 
the first entry (TNTFTRST) . The routine then enters the main 
processinq loop at FNTRLCOP. 

^he Binary Search routine compares the entry address with the 
address of the last entry. If the entry address is not lew, it points 
beyond the end of the table. The routine decrements the entry address 
by the search extent. If the entry address is within the table, the 
routine compares the passed field with the name field cf that entry. 
Tf the entry name field is hiqh, the routine decrements the entry 
address by the search extent. Tf the entry name field is low, the 
routine increments the entry address by the search extent. 

After incrementinq or decreraentinq the entry address, the Binary 
Search routine compares the search extent tc the lenqth of one full 
entry. If it has become less that the lenqth of one entry, the table 
has been fully searched without findinq a name equal to the passed 
field, and the routine puts a X'OO 1 return code in reqister 15 before 
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passinq control tc.TEDQLM. If the search extent is net less than the 
lenqth of one entry, it is divided by two and the loop continues with 
the end-of-tatle compare. 

The Binary Search routine computes the effset to the entry (the 
ordinal index), places that offset in reqister 15, and returns control 
to the callinq routine throuqh TEDOLM. 

External Routines : None. 

Tables/Work Areas : AVT, Termname Table. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mede. 



Termname Table Code (Chart NT) 

Module Name : IEDCTNT 

Entry Point : IEDCTNT - activated by TCAM routines to calculate the 
Terminal Table address of an entry. 

Eunction : This subroutine converts the twe-byte ordinal index, or 
offset, to a Termname Table entry to its actual address in the 
Terminal Table. 

This subroutine calculates the address of the entry by performinq 
an effectice multiply of the index by the si-ze of the entry. The code 
of the routine is qenerated at MCF assembly time and varies dependent 
on the lenqth of the Termname Table. 

On completion, the Termname Table code places the address of the 
Terminal Table entry in reqister 1 and branches to the routine that 
called it. 

External Routines : None. 

^ables/Work Areas : None. 

Attributes: Resident, problem proqram mode, reentrant. 



MESSAGE HANDLING - EUEEES DISPOSITION MODUIES 



Buffer Disposition Subtask (Chart BD) 

Module Name : TEDCBD 

Entry Points: 

• TEDOBD01 - activated by the TCAM Dispatcher after the last seqment 
of a messaqe has been received or sent and processed by the MH up 
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to the inmessage/outmessage subgroup, when the end of an 
invitation list is reached, and when the last buffer of a block 
has been sent to a buffered terminal. 

• IEDQBD02 - activated by the TCAM Dispatcher to process an LCB from 
the Operator Awareness Message Router (IEDQNX) . 

^unctions : This subtask returns unused buffers to the Buffer "Return 
OCB and executes the INMSG/OUTMSG macro expansions* This subtask 
checks the parameter list for each macro in the INMSG/CUTMSG subgroup, 
checking the errcr word against the specified mask if execution of the 
function is conditional. If the routine represented by a parameter 
list requires a recalled header, the Buffer Disposition subtask tposts 
the E^B to the Disk I/O Q/CB to perform a recall. The recalled header 
is returned to Euffer Disposition by a tpost. Each routine that 
receives control from Buffer Disposition performs its functions and 
exits by tposting the recalled header (if ere was passed to it) or the 
ERB back to Buffer Disposition to continue execution of the macro 
expansions. In the case of recalled headers, after the recalled 
header is tposted by the macro routine, it is returned to Buffer 
Disposition by CPB Initialization (IEDOEA) . When an TNEND or OUTEND 
macro expansion is detected, Euffer Disposition checks for 
distribution list, multiple routing, and checkpoint request. If any 
of these functions have been reguested, the appropriate subtask 
receives contrcl through a tpost. For output messages, the message 
iust sent is then marked serviced. "For both send and receive, the LCB 
is then tposted to itself. 

If the error message bit is on (X f 20M in LCBCHAIN, Buffer 
Disposition gets the address of the Operator Awareness Message Router 
(IEDQNX) from the AVT. Buffer Disposition then branches to the 
message router with the LCB and a chain of elements set up to be 
tposted to the ready gueue. The Operator Awareness Message Router 
builds the errcr messaqe, tposts the message to its Destination QCB, 
puts the address of the OCB for TEBQBD02 in the first wcrd of the LCB, 
and tposts the ICE and the chain of elements to the ready gueue. 

External Routine : TEDOTNT - Termname Table code - to obtain the 
Terminal Table address of an entry. 

Tables/Work Areas: LCB, SCB, AVT, Termname Table, Terminal Table, 
buffer prefix, OCB. 

Attributes : Reusable, enabled, resident, refreshable, problem program 
mode. 



Cancel Message Routine (Chart AR) 

Module Name : IEDCAR 

Entry Point : IEDCAR - activated by the Buffer Disposition subtask 
(TEDOBD) to cancel a message. 
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^unctions : This routine sets a flaq in the buffer prefix (PFECNCLN) 
to notify the Destination Scheduler and CPB Initialization to cancel 
the message currently beinq received en the line. This flaq also 
stops multiple rcutinq and checkpoint functions that miqht apply to 
the messaqe beinq canceled. 

If the cancel request is for a terminal in lock mode, this routine 
cancels the nessaqe, sets up the LCE tc repoll the terminal, and 
decrements the input sequence number in the terminal entry. 

The Cancel Messaqe routine exits to the DSPCHAIN entry point of 
the tcam Dispatcher to tpost a chain cf elements that were passed to 
the Cancel Messaqe routine as input (a chain off reqister 1). 

External Foutines : IEDQTNT - Termname Table code - to qet the terminal 
entry address. 

Tables/Work Areas : AVT, LCE, SCE , Terminal Table. 

Attributes: Peusable, refreshable, enabled, resident. 



Operator Awareness Messaqe Pouter (Chart KX) 

Module Name : I ED CM 

Entry Point : IEDCNX - loaded at IN^PO time by the Attach routine 

(IEDOOS) if the system console is not specified as the primary 

operator control terminal; can also be loaded by the Chanqe Control 

Terminal routine (XEDQCN) if the primary operator terminal is changed 

by an operator control command. When IEDCNX is in the system, it is 
activated by Puffer Disposition (TEDOBD) when an error has occurred on 
a line. 

Functions: This routine directs error messaqes to the primary 
operator control terminal when that terminal is not the system 
console. 

The Operator Awareness Messaqe Pouter receives control from the 
Buffer Disposition subtask (IEDQBE) . The router first removes error- 
specific information from the LCB. This information was placed in the 
LCB by the EPP routine that qot control when the error was detected, 
^his information includes the line address (UCENAME) ; the command code 
of the failinq CCH (LCBPESTP) ; the two status bytes of the CSfl 
(LCBCSW+3) ; the first sense byte of the IOB (LCESENSO) ; the TP 
operation codes of the last retry (1CBE1AG2) and of the first failinq 
CCW (LCBSENS1); and the addressinq characters, last four dial diqits, 
or pollinq characters (LCEEFFCT) . The Operator Awareness Messaqe 
Pouter converts this error data to hexadecimal format and builds an 
error messaqe in a work area (AVTSAVE4) . The router then qets a 
buffer from the buffer unit pool, moves the messaqe into the buffer, 
and sets up the buffer prefix and the SCB tc tpost the buffer to the 
Destination OCE for the primary operator control terminal. The router 
then links tc the buffer the chain of elements passed from the Buffer 
Disposition subtask, turns off the error-messaqe bit in the LCB, and 
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passes control to the TCAM Dispatcher at entry point DSPCHAIN to tpost 
the chain of elements to the ready queue. 

External Poutines : None- 
Tables/Work Areas: AVT, LCB, buffer prefix, QCB, SCB, Terminal Table. 
Attributes: Fesident, reentrant, refreshable. 



Hold/Felease Terminal Boutine (Chart AS) 
Module Name : TEDCAS 
Entry Joints : 

• TEDO&S - activated by Buffer Disposition (IEDQED) to hold a 
terminal. 

• TPrQasoi ~ called to release a terminal when a buffer unit from 
Operator Ccntrcl or the time delay queue is tpcsted to this STCB. 

• GETC^B - activated by the TCAM Dispatcher when a CPE that 
TEDOAS is waitinq for is available. 

• ICBFTN - activated by the TCAM Dispatcher when the Send Scheduler 
for the OC! beinq released is available. 

^unctions : This module has two distinct functions - to hold and to 
release a terminal. The functions are performed accordinq to the 
entry point used by the callinq routine. 

Tf the Buffer disposition subtask encounters terminal errors, it 
branches to the Hcld/Pelease Terminal rcutine at the IEEQAS entry 
point to set the hold bit (TBMHELDN) in the appropriate terminal entry 
in the Terminal Table. A hold prevents messaqes from beinq 
transmitted to that terminal. The last messaqe sent to the terminal 
is also held until the terminal is released (the address of the first 
unit of the last messaqe sent is placed in the FEEC chain for held 
messaqes in the Priority QCB) . The routine passes the input buffer to 
the ^ime Delay subtask. 

Note: If the Terminal is in lcck mode, it is not held and the lock 
messaqe is retransmitted. 

When a buffer unit from Operator Control or the time delay queue 
is tposted to the STCB for the Hold/Pelease Terminal routine, the 
routine is activated at the TEDOAS01 entry point to release a 
terminal. The Pelease Terminal routine first qets control of the Send 
Scheduler STCB so that the Destination QCB will not be modified until 
the release function is complete. The routine then moves the QCBINTEF 
chain onto the first of the reqular FEFO chain (requires one write, 
therefore one CPB) and turns off the terminal entry hold bit. The 
Pelease Terminal routine then places the Send Scheduler STCB in the 
LCB STCB chain or in the dial-out call queue for dial lines. 
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This module exits to the DSPPOST or the rSPCHATtt entry point of 
the TCAM Dispatcher to place elements en the ready queue. 

External Routines : 

• IEDOTNT - Termname Table code - to locate the teririnal entry. 



• 



TEDOHG01 - Time Delay subtask - to insert an element on the time 
delay queue. 



• TEDQHG02 - Time Delay subtask - to remove an element from the time 
delay queue. 

• TGG019BB or TGG019BO - TCAM Dispatcher - the DSPPOSTP entry point, 
to tpost a buffer. 

Tables/Work Areas : AVT, SCB r Terminal Table, buffer prefix, CCE, CPE, 
STCE, DEE, UCE, DCB. 

Attributes: Reusable, enabled, resident, problem proqram mode. 



Create an Error Message Routine and Subtask (Chart AT) 
Module Name : IEDQAT 
Entry Point : 

• IEDQAT01 - activated by the Fedirect a Messaqe routine (IEDQAZ) to 
build an error messaqe and tpost it tc its destination. 

• STCBAT+2 - activated by the TCAM Dispatcher to return an empty 
unit to ccntain part of the errcr messaqe. 

functions: The Create an Error Messaqe routine builds an error 
messaqe in the buffer and tposts the buffer to its destination. 

The Create an Error Messaqe routine first determines whether the 
messaqe buffer already contains an errcr messaqe. If there is an 
error messaqe in the buffer, the routine exits by tpostinq the ERB 
back to the Buffer Disposition subtask. 

This routine qets the lenqth of the error messaqe from the 
parameter list cf the ERRORMSG macro expansion or, if that byte is 
zero, from the first byte of the messaqe itself. Eor the latter case, 
the address cf the messaqe is in the ERRORMSG macrc-qenerated 
parameter list. 

If the buffer does not contain a messaqe, the routine determines 
whether the errcr messaqe fits between the scan pointer (the end of 
the header) and the end of the buffer. If the messaqe will not fit, 
the Create an Error Messaqe routine determines whether one additional 
unit will provide enouqh space for the messaqe. If not, the routine 
truncates the messaqe. If an empty unit is needed, the routine tposts 
an EBB' to request one unit tc the Buffer Bequest QCE and returns 
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control to the TCAM Dispatcher to wait for the buffer request to be 

satisfied- When the unit is available, the Dispatcher activates the 

Create an Error Messaqe routine. At this pcint the routine links the 
new unit into the buffer. 

After qettinq a new buffer unit, the routine uses the User 
Interface routine (TDEQUI) to qive control to the Insert Data routine 
(IEDOA* 1 ) , which inserts the error messaqe in the buffer. On return, 
if there is a user-written exit routine present, the Create an Error 
Messaqe routine passes control to that routine* Upon return, the 
Create an Error Messaqe routine tposts the buffer that contains the 
messaqe to its destination. (The Pedirect a Messaqe routine, which is 
dispatched by Buffer Disposition, determines the buffer destination, 
then places the error messaqe in the buffer.) 

External Poutine : IEDQUI - User Interface routine - to activate the 
Insert Data rcutine (IEDOAF) , which inserts the error messaqe in the 
buffer. 

Tables/Work Areas : AVT, buffer currently beinq processed, LCB, SCB. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mcde. 



Pedirect a Messaqe Poutine (Chart AZ) 

Module Name : TEDCAZ 

Entry Point : IEPCAZ01 - activated by the Euffer Disposition subtask 
(TEDOBD) to redirect a messaqe to a specified destination. 

^unctions : This module redirects a messaqe to the destination 
specified by a user. 

The Pedirect a Messaqe routine first determines whether the 
redirect destination is in an option field, and if it is, links to the 
Locate Option Field Address routine (IEDQAE) via the User Interface 
routine to qet the option field address. Upon return, if the option 
field is not found, the Pedirect a Messaqe routine branches to its 
error handlinq loop (TESTDEAD) . If the option field address is found, 
the Redirect a Messaqe routine builds a parameter list for the Binary 
Search routine (IEDQA1) and branches throuqh the User Interface 
routine to qet the buffer destination key. If the readirect 
destination name is explicitly specified en the macro instruction, the 
routine also builds the parameter list and branches to the Binary 
Search routine. Upon return, if the redirect destination name is not 
in the Termnaire Table, the Pedirect a Messaqe routine branches to its 
error handlinq locp; otherwise, the routine passes the destination key 
returned by the Binary Search routine to the lookup Terminal Entry 
routine (IEDCAV) . If the redirect destination is the criqin or the 
oriqinal destination, the key is from either the PRFSPCE (oriqin) or 
the PPFDEST (oriqinal destination) field in the buffer prefix. In 
this case the routine also passes the key tc the Lockup Terminal Entry 
routine. On return, the Pedirect a Messaqe routine determines whether 

278 



the destination is a TSO device. If the destination is a TSO device, 
the routine branches to its error handlinq loop; otherwise the routine 
tposts the QCE for the messaqe to its destination by exitinq to the 
DSPCHAIN entry point of the TCAM Dispatcher. 

If an error messaqe is beinq redirected to its destination, the 
Redirect a Messaqe routine does not ttost the QCE; instead, the 
routine sets the SCBMACB field equal to the address of the error 
messaqe parameter list and then exits to the Create and Error Messaqe 
routine (IEDOAT) . 

The error handlinq loop (TESTDEAD) of the Redirect a Messaqe 
routine determines whether a dead-letter queue is defined. If the 
queue is defined, the routine qets the destination Hey for the queue, 
passes it to the lookup Terminal Entry routine, and tposts the messaqe 
to that destination. If no dead-letter queue is defined, the Redirect 
a Messaqe routine does net redirect the messaqe, but tposts the buffer 
to the Buffer Disposition QCB and exits to the TCAM Dispatcher 
(DSPCHAW - 

External "Routines : 

• TEDOUI - User Interface routine - to activate the followinq 
modules: 

IEDQAE - Locate Option Field Address routine - to qet the address 
of the option field. 

TEDQA1 - Einary Search routine - to qet the destination key for 
the messaqe. 

• TEDOAV - Lookup Terminal Entry routine - to qet the terminal entry 
for a specified destination. 

Tables/Work Areas: AVT, recalled-header buffer, SCE. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem proqram mode. 



Messaqe Generation Poutine (Chart EL) 

Module Name : IEDCEL 

Entry Point : TEDQBL - activated by the Buffer Disposition subtask 
(IEDOBD) when a MSGGEfl macro is specified in an inmessaqe or 
outmessaqe subqreup of an MH. 

Eunctions : Tbe Messaqe Generation routine finds a user-provided 
messaqe, moves the messaqe to the SCB for the currently connected 
terminal, translates the messaqe to the appropriate line code, and 
tposts the ERE that contains the messaqe to the Activate subtask 
(TEDOKA02) to cause the messaqe to be sent. 
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External Boutines : None. 

Tables/work Areas: ICE, SCE, AVT, BCB. 

Attributes : Feusable, refreshable, enabled, resident, problem program 
mode. 



Loq Messaqe Boutine (Chart EY) 

Module Name : TIDCEY 

Entry Point : TIDOBY - called by the Buffer Disposition subtask 
(TEDOBD) when a LOG macro is specified in an TNtfSG or OUTMSG subgroup 

of an MH. 

^unctions: This routine tposts a recalled header to the Destination 
OCB specified in the LOG macrc for loaqinq the messaqe. This tpost 
activates the Loq Scheduler, which loqs the messaqe. 

The Loq fessaqe routine exits to the ISPCHAIN entry point in the 
TCA!^ Dispatcher tc actually tpost the eleirert. 

External Foutines : None. 

Tables/Work Areas : SCE, buffer prefix. 

Attributes : Peusable, refreshable, resident, enabled, problem proqram 

mode. 



Loq Scheduler (Chart BZ) 

Module Name : 1 1 c E Z 

Entry Point : IEDQB2 - activated by the TCAM Dispatcher when the LOG 
LCB is on the ready queue or when a buffer has been tpcsted to the LOG 
Destination OCE. 

^unctions : This routine schedules the loqqinq of messaqes. The Loq 
Scheduler may be activated under the followinq conditions. 

• A Destination QCB with a buffer on the ready queue: the Loa 
Scheduler moves its STCB to the LOG LCB, tposts the LCE to itself, 
and exits tc the DSPBYPAS entry point of the Dispatcher. This 
action passes the messaqe buffer to the Destination Scheduler. 

• An LCB tposted to itself on the ready queue: the Loq Scheduler 
tposts the EFE in the LCB to the Disk I/O OCE to recall one 
buffer. The scheduler exits tc the DSPPCST entry point of the 
TCAM Dispatcher. 

• A E^B tposted to an LCB on the ready queue: the Lcq Scheduler 
checks any cutstandinq WBITE commands and frees the buffers. It 
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then issues WRITE commands for any buffer units to be written. If 
the end-of-messaqe was written, the Icq Scheduler tposts the IRE 
to the ICB again to handle the last buffer checks. If there are 
no more messaqes to lcq for this QCB, the scheduler moves its STCE 
back, to the Destination QCB by exitinq to the DSPUHAV entry point 
of the TCAM Dispatcher. 

If an error cccurs durinq the writinq cf a buffer, the CHECK macro 

issues an exit to the SYNAD routine specified in the DCB. The SYNAE 

routine must return to the CHECK macro. The user-written SYNAP 
routine must ccnfcrm to ESAM standards. 

External Routines : 

• OS Getmain routine (SVC 4) - to obtain main storaqe. 

• IGG019RB or IGG019RO - TCAM Dispatcher - the DSFUNAVP entry point, 
to move an STCE; and the DSPPOSTR entry point, tc tpost an 
element. 

• OS Check routine - to check a write operation. 

• OS Write routine ■- tc write a unit. 

Tables/Work Areas : ICB, SCE, DCB, AVT, CCF. 

Attributes : Reusable, refreshable, resident, enabled, problem proqram 
mode. 



Multiple Routing Subtask (Chart BA) 

Module Name : IFDCEA 

Entry Point : TEBCBA01 - activated when an FPE or a buffer is tposted 
to the Multiple Pcutinq QCB in order to queue a messaqe for additional 
destinations. 

Functions : The Multiple Poutinq subtask identifies additional 
destinations specified in a buffer and tpcsts the messaqe tc each of 
these destinations, in order. 

On initial entry, the EBB within the ICB is tposted to the 
Multiple Pcutinq subtask with the address cf the first buffer of a 
recalled messaqe in the EPB chain field (ICEERBCH) of the ICB. The 
subtask counts the number cf buffers passed (initially cnly cue) and 
keeps the addresses of bcth the first buffer of the messaqe and of the 
current buffer. At initial entry, the address of the current buffer 
is also the address of the first buffer. The subtask places the 
current buffer address in the ICB and places the current count of 
buffers in the current buffer. 

The Multiple Pcutinq subtask uses the offset frcm the first- 
secondary-destinaticn field (SCEMPFSD) of the SCB to set the scan 
pointer. The subtask loads the address of the Forward routine 
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parameter list from the SCBMFFPI field cf the SCE and then links to 
the Forward routine (IED0A5) throuqh the User Interface routine 
(TEDQUT) . When the Multiple Routing subtask reqains control, if the 
destination was fcund to be valid, the subtask determines whether this 
destination is a distribution list. If it is, the subtask sets the 
LCB to tpost the messaqe to each destination in the list before it 
reqains control. The subtask then tposts the recalled messaqe to the 
appropriate OCE (distribution list or sinale entry) and branches to 
the TCAM Dispatcher. 

Tf the Forward routine returns to the Multiple Routinq subtask 
with an invalid destination specified, the subtask reactivates the 
"Forward routine to find the next destination. 

After the first buffer of the recalled messaqe has been tposted to 
the first secondary destination, the Multiple Routinq subtask is 
reentered with another recalled buffer. The subtask qets the current 
buffer address from the ICE. Tf the current buffer is itself the 
first buffer of a messaqe, the subtask sets the current buffer count 
to one and sets the buffer iust tposted to the subtask as the current 
buffer. If the new buffer is not the first buffer of a messaqe, the 
buffer whose address was recovered from the ICE remains the current 
buffer and the buffer count is recovered from it. The subtask aqain 
sets the scan pointer from the f irst-seccndary-destinaticn field of 
the ICE and then passes control to the forward routine. 

Tf return from the Forward routine indicates that a destination 
field in the current buffer is incomplete, the buffer is part of a 
multiple-buffer header and the next buffer must be recalled. The 
subtask saves the data in the current buffer and stores the address of 
the first buffer in the messaqe, with all ether buffers that have been 
passed linked to it, in the ERE. The subtask increments the current 
buffer count by one, places the count in the FPB, and tposts the FFE 
to the Disk I/O OCE in order to recall another buffer. 

The FPE is tposted to the Multiple Routinq subtask when another 
buffer has been retrieved. At this point the subtask determines that 
two or more buffers are teinq passed (to distinquish from initial 
entry) and counts the number of buffers beinq passed. The subtask 
saves the address of the last buffer in the chain in the ICE, alonq 
with the address of the second buffer and any subsequent buffers 
linked to it. The last buffer in the chain is the new current buffer. 
The subtask sets the f irst-secondary-destinaticn field to the offset, 
of the first data byte in the current buffer. Then the subtask sets 
the scan pointer and links to the Forward routine. 

If return froir the Forward routine indicates that the FOA strinq 
has been encountered, there are no more destinations. The subtask 
sets the last recalled header to point to any recalled subsequent 
buffers, and sets all buffers with the address of the Buffer "Return 
OCE. The subtask then links the FFE to the last buffer and puts the 
address of the Buffer Disposition OCE in the FEB. The subtask clears 
the f irst-secendary-destinatien field of the SCB to zeroes and tposts 
the buffers and FFE via an exit to the TCAM Dispatcher. 
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External Poutine : IEDQUI - User Interface routine - to activate the 
Forward routine (IED0A5) , which deciphers secondary destinations in 
the messaqe header. 

Tables/Work Areas : SCB, AVT, LCB, tuffer prefix. 

Attributes : Serially reusable, refreshable, enabled, resident, 
problem program mode. 



Lock Poutine (Chart BE) 

Module Name : IEDCEE 

Entry Point : TEEQFE - called throuqh the User Interface routine by 
the LCCK macro expansion. 

Functions : This routine locks the connection between the currently 
connected terminal and its process entry destination by settinq a 
switch in the SCBSTATE byte of the SCB. The extended lock switch is 
set if the request is by the LOCK macro. 

If the routine finds that a terminal is net connected, the routine 
exits immediately to the Peturn Interface routine (IEDQLM) with X'04 1 
in register 15. If a terminal is connected but the destination is the 
Buffer Peturn QCE or is not an application proqram, the Lock routine 
exits with a return code of X'OB 1 in reqister 15. A return code of 
X'OB 1 also indicates that the buffer has an indiacted lenqth of zero 
or that the buffer is not a header buffer. A X'OC return code 
indicates that there is no GET DCB open for the destination 
application prcqram. The successful return code is X'OO*. 

External Poutine : TEDQTNT - Termname Table code - to qet a terminal 
entry address. 

Tables/Work Areas : AVT, ICE, QCE, SCB. 

Attributes : Peusable, refreshable, enabled, resident, problem proqram 
mode . 



Unlock Poutine (Chart BE) 

Module Name : IEPCBF 

Entry Point : TEDOBF - called throuqh the User Interface routine by 
the UNLOCK macro expansion. 

Functions : This routine unlocks the currently connected terminal by 
turninq off the lock bits in the SCBSTATE byte of the SCB (if they 
were on) . 
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Tf the currently connected terminal is rot locked, a return code 
of X'OU' is placed in reqister 15- Otherwise, X'OO 1 is returned in 
reqister 15. 

External Routines : None 

Tables/Work Areas : AVT, SCR. 

Attributes : Reusable, refreshable, enabled, resident, problem proqram 
mode. 



Distribution List Subtask (Chart EC) 

Module Name : IIDQBC 

Entry Point : IIDCBC - activated by the TCAM Dispatcher when a messaqe 
is sent to a destribution list entry in the Terminal Table. 

^unctions : This module tposts the buffers of a messaqe to each of the 
destinations specified in the distribution list to which the messaqe 

was routed. 

The Distribution List suttask tpcsts the messaqe to the 
Destination OCE for the first or next entry in the distribution list 
and exits to the Dispatcher. When the Destination Scheduler reqains 
control, it finds the duplicate header bit on in the buffer prefix and 
tposts the buffer to the QCE indicated in LCEFCCCE - the Eistribution 
List OCR. In this manner, the Distribution List subtask reqains 
controls to tpcst the messaqe to the next destination. 

When the buffer has been returned for the last destination in the 
list, if multiple routinq is not active, the buffer is tposted to the 
Buffer Return QCE and the LCB is tposted tc the Buffer Disposition 
OCB. Tf multiple routinq is active, the Distribution List subtask 
tposts the buffer to the Multiple Routinq QCE and sets LCERCQCE to 
refer to the Multiple Boutinq QCB. 

The Distribution List subtask exits to the DSPCHAIN entry point of 
the TCAM Dispatcher. 

External Routine : IEDQTNT - Term.name Table code - to qet the Terminal 
^able address of the distribution list entry and of each entry in the 
distribution list. 

Tables/Work Areas: AVT, LCB, SCE, buffer prefix, Termname Table, 
Terminal Table, CCE. 

Attributes : Reusable, refreshable, enabled, resident, problem proqram 
mode. 



Cascade List Subtask (Chart BG) 
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Module flame : TIDCBG 

Entry Point : IEDQBG - activated by the TCAK Dispatcher when a messaqe 
is sent to a cascade list entry in the Terminal Table. 

^unctions : This module tposts the buffers of a messaqe to one 
destination in the cascade list to which the messaqe was routed. 

The Cascade List subtask examines the terminal entry for each 
entry in the list in order, searchinq for the first terminal that can 
accept, is not held, has an open ICB, and has the fewest number of 
messaqes queued for it. Once an entry that meets these conditions is 
found, the Cascade List subtask tposts the messaqe to its Destination 
OCE and resets the destination fields in the SCE and in the buffer 
prefix. If a terminal that meets all these conditions cannot be 
found, the messaqe is tposted to the Destination QCE for the first 
entry in the list. 

The Cascade List subtask exits to the DSFPCST entry point of the 
TCAM Dispatcher. 

External Routine : TEDQTNT - Termname Table cede - to qet the Termname 
Table address of the cascade list entry and of each item in the 
cascade list. 

Tables/Work Areas : AVT, LCE, SCB , Termname Table, Terminal Table, 
buffer prefix, DCE, OCE. 

Attributes: Reusable, refreshable, enabled, resident, problem proqram 
mode. 



MESSAGE HANDLING - QUEUE MANAGEMENT ROUTINES 
Destination Scheduler (Chart HM) 
Module Name : IEDCHM 
Entry Points : 

• IEDOFM - frcm the TCAM Dispatcher with a full buffer to be queued. 

• TEDQHM02 - frcm the Reusability-Copy subtask (IGG019RP) or the 
Start-up Messaqe routine (TGGC19R6) with one unit of a buffer to 
be queued. 

• IEDQHM03 - from IEDQHM, the Reusability-Copy subtask and CPE 
Initialization to find the SCB address if the first EIEC messaqe 
on the input Destination OCE is beinq sent. 

Functions : This subtask assiqns a buffer tc a location in a messaqe 
queues data set (reusable disk, nonreusable disk, cr main storaqe, as 
applicable) by tpestinq the buffer to the Disk I/O QCE. The buffer is 
chained to other buffers of the messaqe, and this messaqe is chained 
to other messaqes in the same queue. 
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The first buffer of the messaqe contains the address of the next 
seqment and of the first buffer of next messaqe. Each buffer has the 
address of the next messaqe seqment (if it is not the last buffer) , 
the address of the additional records (if any), and, if it is not the 
first buffer cf a messaqe, the address cf the first buffer of this 
messaqe. 

If the messaqe is disk queued, the first and the last buffers of 
a messaqe contain the queue-back chain pointers. The queue-back chain 
is a time sequential record of the events (both sendinq and receiving) 
for a Destination OCB. If the QCB represents the destination of the 
messaqe, the first buffer appears in the queue-back chain from that 
QCB. If the OCB represents the source cf the messaqe (line or 
terminal) the last buffer of the messaqe appears in the queue-back 
chain of the QCB. 

Disk messaqe queuinq (reusable or nonreusable) is accomplished by 
assiqninq relative record numbers ahead on disk. There is a value 
called "address" for both reusable (AVTBADTR) and nonreusable 
(AVTNADDF) disk data sets in the AVT. There is a correspondence 
between the value of address and the physical location (MBBCCHHF) of 
the record on disk. When the address, mcdulo the total number of 
records in the data set, is used, there is a one-to-one 
correspondence. When a first buffer that is net also the last buffer 
of a messaqe is received, the Destination Scheduler reserves a value 
of address for the first buffer of the next messaqe for that 
Destination CCE and a value of address for the next buffer seqment of 
this messaqe. Sequential values of address are reserved for any 
additional records required. When a subsequent buffer that is not 
also the last buffer of a messaqe is received, the Destination 
Scheduler reserves locations for the next-seqment and for additional 
records. When a last buffer of a messaqe is received, no location for 
next-seqment is reserved. 

The main storaqe messaqe queues data set is not divided into 
numbered reccrds. One record corresponds in size to cne buffer unit. 
Units are not assiqned ahead as in disk queuinq; however, the messaqes 
in one queue are chained toqether and the buffers cf a messaqe are 
chained toqether. The value AVTCAEDB is similar to the address value 
on disk. &VTCADDF corresponds to the- number of units used cut of the 
total number reserved for main storaqe queues. Chaining is not done 
by record number for main storaqe queues, but by the actual address. 
The additional records are located throuqh the TIC fields in the BCB 
of the buffer units. 

When the first buffer of a messaqe to be main stcraqe queued is 
received, the buffer is chained to the first buffer of the previous 
messaqe in the queue. When a subsequent buffer of a messaqe to be 
main storaqe queued is received, the buffer is chained to the previous 
buffer of this messaqe. The number cf units ccrrespondinq to the 
number of units in the buffer is removed from the buffer unit pool. 
If the messaqes for this Destination QCB are to be main stcraqe queued 
only, the Destination Scheduler tposts these units to the Buffer 
Beturn OCB and places the buffer in the main storaqe queue of 
messaqes for the OCE. If the messaqe is to be disk queued also, the 
Destination Scheduler copies the the messaqe into the units from the 
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buffer unit tool and places the buffer in the main storaqe messaqe 
queue for the QCB. The oriqinal buffer, therefore, is disk queued. 

When the Destination Scheduler receives the last buffer of a v 
messaqe and the scheduler associated with this Destination QCB is in 
the STCB chain cf the Destination QCB, the Destination Scheduler 
issues a BAIR to a subroutine of this scheduler. This BALE notifies 
the scheduler that a messaqe is available. 

The Destination Scheduler exits to the TCAM Dispatcher at DSPPOST 
or DSPDISP or, if called by the Reusability-Copy suttask, to the 
callinq routine. 

External Routines: 



• 



IEDOTNT - Termname Table code - to obtain the address of the 
Terminal Talle entry frcm the offset into the Termname Table. 



* The subroutine of the scheduler for the Destination QCE. 

Tables/Work Areas : ICE, DCE, SCB, buffer prefix, QCB, AVT, Terminal 
Table, disk data area. 

Attributes : Reusable, refreshable, enabled, resident, problem proqram 
mode. 



Destination Scheduler - Main Storage Queuing Only (Chart HM1) 
Module Name : IEDCHM1 
Entry Joints : 

• TEDQPM1 - from the ^CAM Dispatcher with a full buffer to be 
queued. 

• IEDQHM02 - activated by the Start-up Messaqe routine (IGG019E6) 
with one unit of a buffer to be queued. 

• TEDQHM03 - called frcm IEDQHM1 to find the SCE address if the 
first FEEC messaqe on the input Destination QCB is beinq sent. 

^unctions : This subtask assiqns a buffer to a location in a main 
storaqe messaqe queues data set. The buffer is chained to other 
buffers of the messaqe, and this iressaqe is chained to other messaqes 
in the same queue. 

The first buffer of the messaqe contains the address of the next 
seqment and cf the first buffer of next messaqe. Each buffer has the 
address of the next messaqe seqment (if it is net the last buffer) , 
the address of the additional records (if any), and, if it is not the 
first buffer of a messaqe, the address of the first buffer of this 
messaqe. 
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When the first buffer of a messaqe tc be main storaqe queued is 
received, the buffer is chained tc the first buffer of the previous 
messaqe in the queue. When a subsequent buffer of a messaqe to be 
main storaqe queued is received, the buffer is chained to the previous 
buffer of this messaqe. The number of units correspondinq to the 
number of units in the buffer is removed frcm the buffer unit pool. 
^he Destination Scheduler tposts these units to the Buffer Beturn QCE 
and places the buffer in the main storaqe queue cf messages for the 
OCB. 

When the Destination Scheduler receives the last buffer of a 
messaqe and the scheduler associated with this Destination OCB is in 
the STCB chain cf the Destination OCB, the Destination Scheduler 
issues a BAIB to a subroutine of this scheduler. The BAIB notifies 
the scheduler that a messaqe is available. 

The Destination Scheduler exits to the TCAM Dispatcher at DSPPOST 
or DSFDISP. 

External Boutines : 

• TEDO^NT - Terra name Table code - to obtain the address of the 
Terminal Table entry from the offset into the Termname Table. 

• The subroutine of the scheduler for the Destination QCB. 

Tables/Work Areas: LCE, DCB, SCB, buffer prefix, QCB, AVT, terminal 
entry, disk data field. 

Attributes : Peusable, refreshable, enabled, resident, problem proqram 
mode. 



Destination Scheduler - Disk Queuing Only (Chart HM2) 

nodule Name : I*DCH?12 

Entry Points : 

• IEDQHN2 - from the TCAM Dispatcher with a full buffer to be 
queued.- 
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• TEDQHM02 - from the Beusability-Copy subtask (IGG019KF) or the 
Startup Messace routine (TGG019*6) with one unit cf a tuffer to be 
queued. 

• TEDQHM03 - called from TEDQHM2, the Eeusatility-Copy subtask, and 
CPB Initialization to find the SCB address if the first messaqe on 
the input Destination OCB is teinq sent. 

Functions : This subtask assiqns a buffer to a location in a messaqe 
queues data set (reusable disk or ncnreusable disk r as applicable) by 
tpostinq the tuffer to the Disk I/O QCB. The buffer is chained to 
other buffers cf the messaqe, and this messaqe is chained to other 
messaqes in the same queue. 

The first tuffer of the messaqe contains the address of the next 
seqment and of the first buffer of next messaqe. Each buffer has the 
address of the next messaqe seqment (if it is not the last buffer) , 
the address of the additional records (if any) , and, if it is not the 
first buffer of a messaqe, the address cf the first buffer of this 
messaqe. 

When the messaqe is disk queued, the first and the last buffers of 
a messaqe contain the queue-back pointers. The queue-back chain is a 
time sequential record of the events (both sendinq and receivinq) for 
a Destination OCE . If the QCB represents the destination of the 
messaqe, the first buffer appears in the queue-back chain from that 
OCB. If the CCE represents the source cf the messaqe (line or 
terminal) the last buffer of the messaqe appears in the queue-back 
chain of the QCB. 

Disk messaqe queuinq (reusable or ncnreusable) is accomplished by 
assiqninq relative reccrd numbers ahead on disk. There is a value 
called "address" for both reusable (AVTEADDR) and nonreusable 
(AVTNADDR) disk data sets in the AvT. There is a correspondence 
between the value of address and the physical location (MEECCHHR) of 
the record on disk. When the address, modulo the total number of 
records in the data set, is used, there is cre-to-one correspondence. 
When a first buffer that is not also the last buffer of a messaqe is 
received, the Destination Scheduler reserves a value of address for 
the first buffer of the next messaqe for that Destination OCB and a 
value of address for the next buffer seqment of this messaqe. 
Sequential values of address are reserved for any additional records 
required. When a subsequent buffer that is not also the last buffer 
of a messaqe is received, the Destination Scheduler reserves locations 
for the next-seqment and for additional records. When a last buffer 
of a messaqe is received, no location for next-seqment is reserved. 

When the Destination Scheduler receives the last buffer of a 
messaqe and the scheduler associated with this Destination QCB is in 
the STCB chain cf the Destination QCB, the Destination Scheduler 
issues a BMP tc a subroutine of this scheduler. This EAIB. notifies 
the scheduler that a messaqe is available. 

The Destination Scheduler exits to the TCAM Dispatcher at DSPPOST 
or DSPDISP or, if called by the Reusability-Copy subtask, to the 
callinq routine. 
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External Boutines : 

• IEDQTNT - Termname Table code - to obtain the address of the 
Terminal Table entry form the offset into the Termname Table. 

• The subroutine of the scheduler for the Destination QCB. 

Tables/Work Areas: LCE r DCE, SCB, buffer prefix, QCB, AVT, terminal 
entry, disk data field. 

Attributes : Feusable, refreshable, enabled, resident, problem program 
mode. 



CPB Initialization (Chart FA) 
Module Name : IEDCFA 
Entry Points : 

• IEDQFA - the CPB Initialization routine - called by the TCAM 
Dispatcher to queue a buffer on disk or to obtain full buffers 
from a main storaqe cr disk messaqe queue. 

• IEDQFQ - the CPE Cleanup routine - called by the TCAM Dispatcher 
to handle CPBs after disk operations and to fill buffers from data 
in CPEs that have read a reccrd cr frcm units in a main storaqe 
queue . 

Functions : This module consists cf two routines: IEDQFA, the CPE 
Initialization routine, which initializes CFBs to write or read buffer 
units to or frcm disk; and IEDQFQ, the CPB Cleanup routine, which 
handles the CPEs after disk I/O has been completed. 

There are three different types of input to the IEDQFA entry point 
of the CPE Initialization module, and the functions performed depend 
on the input: 

• A buffer to be written on disk. The input contains the relative 
record numbers for the units of the buffer. The buffer is tposted 
to the Disk I/O QCB by the Destination Scheduler. CPB 
Initialization builds the CPEs to write the record on disk. 

• Buffers to be flaqqed serviced or canceled on the messaqe queues 
data set. These buffers were tposted to the Disk I/O QCE by the 
Buffer Disposition suttask. CPE Initialization builds the CPBs to 
write the requested records on disk. 

• An FEE tposted to obtain full buffers. The Send Scheduler tposts 
the FEB to obtain full buffers to satisfy an initial request for 
sendinq. Euffer Disposition tposts the EPB for recall. The 
EOB/ETE Handlinq subtask tposts the ERE for recalled buffers. The 
Get Scheduler tposts the EEE to obtain full buffers to satisfy a 
GET command. PCI Appendaqe tposts the EEE to qet buffers for 
subsequent transmission. For recall, the address of the first 
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byte of data to put in the buffer is in the SCBDEOB field of the 
SCB; otherwise, it is in SCBSCSEG. CFB Initialization builds CPBs 
for disk reads, obtains the buffers, fills them with data r and 
tposts either the buffer or the EftB with the buffers to the 
appropriate QCB. 

CPB Initialization exits to the EXCP Driver when there are either 
no elements to process or no CPBs available. If there is no disk in 
the system, CPB Initialization exits to the TCAM Dispatcher. 

If a loaical read error occurs durinq a recall when a request is 
made to read a record and the record number read does not agree with 
the requested record number, CPB Initialization sets the appropriate 
error flaqs and returns the EBB to the specified QCE. 

There are two types cf input to the IEDQEQ, or CPB Cleanup, part 
of the CPB Initialization module, and the functions performed depend 
on the input: 

• OCB - the CPB Cleanup OCB is tpcsted to itself to initiate cleanup 
of the CPEs. Disk End Appendaqe tpcsts the QCB after disk I/O is 
complete and the completed CPBs have teen placed on AVTDKAPQ. CPB 
Cleanup resets the CPB buffer address into CPBXBEA and examines 
CPBELAG for X'BO*. If this flaq is set, the CPEs belonq to the 
Beusablity-Ccry suttask, so CPB Cleanup enqueues the CPBs on 
AVT^USQ. If the flaq is not set, CPB Cleanup returns the CPBs 
for disk writes to the CPB free pocl, and if the CPB was for a 
disk read, places the data in the buffers and returns the CPB to 
the CPB free pool. 

• Buffer - a buffer unit is tposted to satisfy a request from CPB 
Cleanup. Buffer Peturn tposts the available unit to the Cleanup 
OCB. CPB Cleanup locates the CPB that is associated with this 
buffer on the No-buffer queue. The buffer is associated with the 
CPB to be later processed by the IEDQEA part of CPE 
Initialization. 

After all CPBs on the CPB Cleanup QCB have been processed, CPB 
Cleanup branches to the Reusability-Copy suttask (IGG019BP) if either 
the "T*eus first time" switch is on, the "Copy needs control" bit is 
set, or AVTPET3SQ has elements on it. Otherwise, CPB Cleanup exits to 

TEDQ^A. 

External Routines : 

• IGG019BE or IGG019BO - TCAM Dispatcher - to place an element on 
the ready queue by priority. 

• TEDQHM03 in IEDOHH - Destination Scheduler - to find the SCE 
address when the first EEEO messaqe on the input Destination QCB 
is beinq sent. 

Tables/Work Areas ; LCB, SCB, buffer prefix, Terminal Table, AVT, QCB, 
CPE, DCB, disk data field. 
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Attributes : Reusable, refreshable, enabled, resident, problem program 
mode. 



CPB Initialization - Wain Storage Queuing Only (Chart EA1) 
Module Name : IEDCFA1 
Entry Points : 

• IEDQFA1 - the CPP Initialization routine - called by the TCAK 
Dispatcher to obtain full buffers from a main storage gueue or to 
flag a message serviced. 

• IEDQFQ - the CPB Cleanup routine - called by the TCAM Dispatcher 
with a buffer unit that is to be used to build a buffer for a main 
storage gueue. 

^unctions : This module consists of two routines: IEDQFA1, the CPB 

Initialization routine, which gets full buffers from a main storage 

gueue and flags a message serviced; and IEDQFQ, the CPE Cleanup 
routine, which builds buffers for a main storage gueue. 

^here are two dirrerent types of input to the IEDQFA1 entry point 
of the CPB Initialization module, and the functions performed depend 
on the input: 

• Buffers tc be flagged serviced cr canceled on the message gueues 
data set. These buffers were tposted to the Disk I/O QCE by the 
Buffer Disposition subtask. CPE Initialization either frees the 
buffer frcir the message or sets the 'cancel 1 flag in the message 
on the message gueue. 

• An EBB tpcsted to obtain full buffers. The Send Scheduler tposts 
the ERE tc obtain full buffers to satisfy an initial reguest for 
sending. Buffer Disposition tposts the ERE for recall. The 
EOB/ETB Handling subtask tposts the EBB for recalled buffers. The 
Get Scheduler tposts the ERE to obtain full buffers to satisfy a 
GET command. PCI Appendage tposts the EBB to get buffers for 
subseguent transmission. For recall, the address of the first 
byte of data to put in the buffer is in the SCBDEOB field of the 
SCB; otherwise, it is in SCBS-CSEG. CPB Initialization obtains the 
buffers, fills them with data, and tposts either the buffer or the 
EBB with the buffers to the appropriate QCE. 

CPB Initialization exits to the TCAM Dispatcher when there are no 

elements to prccess. There is one type of input to the IEDQFQ, or CPE 

Cleanup, part of the CPB Initialization module '- a buffer. The Buffer 
Return routine tpcsts an available buffer unit to IEDQFQ to satisfy an 

FEB reguest. CPB Cleanup locates the portion of the message to be 

placed in this buffer and then branches to IEDQFA1 for buffer 
processing. 
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External Routines : 

• IGG019BE or IGG019BO - TCAM Dispatcher - to place an element on 
the ready queue by priority. 

• TEDQHM03 in IIDQHM1 - Destination Scheduler - to' find the SCP 
address when the first EEEO messaqe en the input Destination QCB 
is beinq sent. 

Tables/Work Areas : LCB, SCE, buffer prefix. Terminal Table, AVT, QCB, 
CPE, DCB r disk data field. 

Attributes : Peusable, refreshable, enabled, resident, problem proqram 
mode. 

CPE Initialization - Disk Queuing Only (Chart EA2) 

Module Name : IEDCEA2 

Entry Points : 

• IEDQEA2 - the CPB Initialization routine - called by the TCAM 
Dispatcher to queue a buffer on disk cr to obtain full buffers 
from a disk messaqe queue. 



• 



lEDOEO - the CPB Cleanup routine - called by the TCAM Dispatcher 
to handle CPBs after disk operations and to fill buffers from data 
in CPBs that have read a record. 

^unctions : This module consists of two routines: IEDQEA2, the CPE 
Initialization routine, which initializes CPEs to write or read buffer 
units to or from disk; and IEDQEO, the CPE Cleanup routine, which 
handles the CPEs after disk I/O has been completed. 

There are three different types of input to the TEDQEA2 entry 
point of the CPE Initialization module, and the functions performed 
depend on the input: 

• A buffer to be written on disk. The input contains the relative 
record numbers for the units of the buffer. The buffer is tposted 
to the Disk I/O QCB by the Destination Scheduler. CPB 
Initialization builds the CPBs to write the record on disk. 

• Buffers to be flaqqed serviced or canceled on the messaqe queues 
data set. These buffers were tposted to the Disk I/O QCE by the 
Buffer Disposition subtask. CPE Initialization builds the CPEs to 
write the requested records on disk. 

• An EBE tpested to obtain full buffers. The Send Scheduler tposts 
the EBB to obtain full buffers to satisfy an initial request for 
sendinq. Euffer Disposition tposts the EBB for recall. The 
EOB/ETB Handlinq subtask tposts the EBP for recalled buffers. The 
Get Scheduler tposts the EBB to obtain full buffers to satisfy a 
GET command. PCI Appendaqe tposts the EBB to qet buffers for 
subsequent transmission. Ecr recall, the address of the first 
byte of data to put in the buffer is in the SCB; otherwise, it is 
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in SCESCSEG. CPB Initialization builds CPFs for disk reads, 
obtains the buffers, fills them with data, and tposts either the 
buffer or the ERB with the buffers to the appropriate QCB. 

CPB Initialization exits to the EXCP Driver when there are either 
no elements to process or no CPBs available. 

If a logical read error occurs durinq a recall when a request is 
made to read a record and the record number read does not agree with 
the requested reccrd number, CPB Initialization sets the appropriate 
error flaqs and returns the ERB to the specified QCE. 

There are two types of input to the IEDQFQ, or CPB Cleanup, part 
of the CPB Initialization module, and the functions performed depend 
on the input: 

• QCB - the CPB Cleanup QCB is tposted to itself to initiate cleanup 
of the CPEs. Disk End Appendaqe tposts the QCE after disk I/O is 
complete and the completed CPBs have teen placed en AVTDKAPQ. CPE 
Cleanup resets the CPE buffer address into CPBXREA and examines 
CPBPLAG for X'SO*. If this flaq is set, the GPEs belong to the 
Reusability-Ccpy subtask, so CPB Cleanup enqueues the CPBs on 
AVTREttSQ. If the flaq is not set, CPB Cleanup returns the CPBs 
for disk writes to the CPE free pool and, if the CPE was for a 
disk read, places the data in the buffers and returns the CPB to 
the CPB free pool. 

• Buffer - a buffer unit is tposted to satisfy a request from CPE 
Cleanup. Buffer Return tposts the available unit to the Cleanup 
QCB. CPB Cleanup locates the CPB that is associated with this 
buffer on the No-buffer queue. The buffer is associated with the 
CPB to be later processed by the IEDQFA2 part of CPE 
Initialization. 

After all CPBs on the CPB Cleanup QCB have been processed, CPB 
Cleanup branches to the Reusability-Copy subtask (IGGC19RP) if either 
the "Reus first time" switch is on, the "Copy needs control" bit is 
set, or AVTREUSC has elements on it. Otherwise, CPE Cleanup exits to 
TEDQEA. 

External Routines : 

• TGG019RB or IGG019RO - TCAM Dispatcher - to place an element on 
the ready queue by priority. 

• IEDQHM03 in IED0HM2 - Destination Scheduler - to find the SCB 
address when the first EEEO messaqe on the input destination QCB 
is beinq sent . 

Tables/Work Areas : LCB, SCB, buffer prefix, Terminal Table, AVT, QCB, 
CPE, DCB, disk data field. 

Attributes : Reusable, refreshable, enabled, resident, problem proqram 
mode. 
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EXCP Driver (Chart RQ 
Module Name : TGGC19FC 
Entry Points : 

• IGG019BC - the EXCP Driver routine - called by the CPB 
Initialization routire to start disk I/C. 

• TEDOEP - the Convert routine - call€d by IGG019EC to convert the 
absolute record number to the MBECCBHF address in the disk data 
set. 

^unctions : The EXCP Driver routine of this module chains the CPBs 
that were bequn by CPB Initialization in the prcper sequence, adds 
Seek and Search-TIC CCWs where necessary, and sets the absolute disk 
address in the IOE. EXCP Driver then calls ICS with the EXCP macro to 
start disk I/C on the line. When the channel proqram is completed, 
EXCP Driver oasses additional CPBs to the IOB for the Disk End 
Appendaqe to retry, and then returns to the TCAM Dispatcher. 

There are three maior steps in this routine: insertinq by CC 
priority, cptimizinq the disk channel prcqram, and issuinq an EXCP. 

• Insert by CC priority 

The EXCP Driver routine takes each CPB from the input queue 
(AVTINCPO) and uses the Convert routine to convert CPBADDR to the 

MBBCCHHP address. 

The Convert routine converts an absolute record number to an 
MBBCCHHF disk address for a multi-volume TCAM disk messaqe queue. 

The disk messaqe queue consists of one or more similar extents of 
one fixed, unblocked data set. Each extent is on one or more disk 
drives of the saire type, and each extent must contain the same number 
of continuous cylinders on a cylinder boundary. The records are 
assiqned to the disks as discussed under Multiple Arm Support in the 
Method of Operation section of this publication. 

The Convert routine obtains the ' absolute record number to be 
converted from the CPEADDP field of the CPB. After usinq values 
stored in the AVT to convert this value to MBBCCHHF, the converted 
value is placed in the CPBABSAD field of the CPB. All ether fields, 
includinq the input field, are unchanqed, except that the command 
chain bit in the second EEAD/WBITE CCW is turned off. This routine 
then branches tack to the EXCP Driver routine. 

The EXCP Driver routine uses "M" as the search index to find the 
appropriate ICB for this extent. It then searches the New queue of 
the appropriate ICB, usinq "CC" as the arqument to find the proper 
place for the new CPB. The order is ETEC-per-cylinder , but cylinders 
are in order with the current arm position of the disk havinq the 
hiqhest priority. 

• Optimize the disk channel proqram 
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The FXCP Driver routine compares the new CPB with the previous CPB 
on the New queue. ^ive conditions are recognized r and accordingly, 
one of three possible types of CPPs is built into the new CPB. 



Condition CPE-Type 

1. There is net a previous CBP 

2. Previous CPB is fcr a different CC 

3. Previous CPB is for the same CC r but 
a different HH larae 

4. Previous CPB is fcr the same track, 
but its record is not the cne 
immediately preceding the record of 
the new CPB Medium 

5. Previous CPB is for the record 
immediately preceding the record of 
the new CPB (read only) . 



Medium 
Medium 



Small 



A large CPB starts with seek, search, and TIC CCWs* It is used to 
change heads en the same cylinder. A medium CPB starts with search 
and TIC CCWs. It is used to locate non-sequential records on the same 
track as the previous CPB, and also to start the new channel program 
on a new cylinder. A small CPB has only READ/WRITE CCWs. It is used 
for finding seguential records on one track. 

• EXC* 

After all cf the CPBs have been built onto the New gueue, each IOB 
is checked to be sure that if any CPBs are available, the Retry gueue 
has some. If EXCP is not busy, EXCP Driver shifts the Retry gueue 
CPBs to IOBSTAPT, shifts one cylinder of CPEs from the New gueue to 
the Retrv aueue, and then issues an EXCP command. 

If EXCP is busy cr if there are no CPEs on the New gueue, EXCP 
Driver branches to the TCAM Dispatcher. Register 15 is set egual tc 
X*08' to indicate that there is a chain pointed to by register 1. 

External Routine : OS EXCP routine (SVC 0) - to start I/O on the 

channel. 

^ables/Work Areas; IOB, DEE, CPB, AVI. 

Attributes: Resident, reusable, refreshable, problem program mode. 



^XCP Driver for a Single CPB (Chart RF) 



Module Name: ICGO^R^ 



Entry Points: 
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• TGG019PF - the EXCP Driver routine - called by the CPB 
Initialization routine tc start disk I/O for one CPE* 

• IEDQFP - the Convert routine - called by IGG019BF tc convert the 
absolute record number to the MBBCCEHE address in the disk data 
set. 

^unction : The EXCP Driver for a Sinqle CPE takes the CPB that was 
bequn Fy CPB Initialization and finishes tuildinq the CCWs. This 
module adds Search-TIC CCWs where necessary, calls IEDQFP to translate 
the absolute disk address to an MBBCCHHB value, and then calls TOS 
with the EXCP macro to start disk I/O. When the channel proqram is 
completed, EXCP Driver returns to the TCAM Dispatcher. 

External Boutine : OS EXCP routine (SVC 0) - to start I/O on the 
channel. 

Tables/Work Areas : ICE, DEE, CPB, AVT. 

Attributes: Resident, reusable, refreshable, problem proqram mode. 



Disk End Appendaqe (Chart R2) 



Module Name: IGGC19B2 



Entry Point : IGGC19B2 - called by ios at the end of a disk operation. 

Functions : This appendaqe receives control from IOS at the end of a 
disk I/O operation. It removes the CPBs frcm the IOB and makes them 
available for the CPB Cleanup routine by tpostinq the CPE Cleanup QCB 
to the disabled ready queue. CPBs are obtained from IOBSTABT by usinq 
CPBtfEXT as a chaininq pointer. The CPBNEXT field of the last CPB is 
zero. The CPBs are passed to CPB Cleanup via one of two FIFO queues, 
AVTDKAPQ or AVTDKEflQ. The CPE Cleanup QCB is taqqed AVTCPECB. If 
AVTETT1 is set to X'80', AVTDKENQ is used, instead of AVTDKAPQ, tc 
hold CPBs that are beinq returned to CPB Cleanup. 

If any CPEs are available on the retry queue, they are returned to 
IOS with a request to retry the disk channel proqram. The locked bit 
in IOBXLOCK of the IOE is first checked for permission tc try I/O on 
the CPBs on the retry queue. If locked, the retry queue is left 
untouched. The chain of CPBs iust finished by IOS is in IOESTABT, and 
the WBBCCHHF of the first CPB frcm the retry queue is set to IOBSEEK 
if retry is to be done. 

Disk End Appendaqe examines the CPB Cleanup QCB for a priority 
value of zero. This value indicates that the QCB is not on the ready 
queue. If the QCE is not on the ready queue. Disk End Appendaqe 
tposts the QCB to itself on the disabled ready queue in order to 
activate the CPE Cleanup routine (IEDQFQ in IEDQFA) . 

Disk End Appendaqe posts complete the ECB for the TCAM Dispatcher 
in order to reactivate the TCAM task. Disk End Appendaqe then returns 
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to IOS via reqister 14 if there is no retry, or via reqister 14+8 if 
retry is to be attempted. 

External Boutine : OS Post routine (SVC 2) - tc post complete the TCAM 

Fein ■ 

Tables/Work Areas : OCE, IOB, CPB, AVT. 

Attributes: Reentrant, refreshable, supervisor mode. 

Disk End Appendage for a Single CPB (Chart PK) 

Module Name : IGGC19FK 

Entry Point : TGG019FK - called by TOS at the end of a disk operation. 

Function : This appendage receives control from IOS at the end of a 
disk I/O operation. It removes the single CPB from the ICE and makes 
it available for the CPE Cleanup routine by placing the CPB on the 
AVTDKAPO FI^C gueue. The Disk End Appendage then t posts the CPE 
Cleanup OCE to the disabled ready gueue in order to activate CPB 
Cleanup to process the CPB. This Disk End Appendage complete the ECE 
for the TCAM Dispatcher to reactivate the TCAM task and then returns 
to IOS via reqister 14. 

External Foutine : OS Post routine (SVC 2) - tc post complete the TCAM 
ECB, which allows the TCAM Dispatcher to be reactivated. 

Tables/Work Areas : QCB, TOE, CPB r AVT. 

Attributes: Reentrant, refreshable, supervisor mode, disabled. 



Feusability-Ccpy Subtask (Chart HP) 
Module Name: IGG019BP 



Entry Point : IGG019FP is loaded by the Disk Message Queues Open 
routine and has only one defined entry point. There are, however, two 
logical entries: 

• FEUS - called by CPB Initialization (TEEQFA) to make the disk data 
set available for reuse. 

• COPY - called by the TCAM Dispatcher tc move an entire message 
from one message gueue to another. 

Functions : This module makes the disk messaqe queues data set 
reusable by periodically performing two functions: 

1. Moving the unused preassigned locations for the first units of 
messages into the current zone by placing a cancel bit in the old 
location of the units en disk, and 
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2. Copying unsent messaqes into the current disk zone and enqueuinq 
them fcr transmission tc an alternate destination. 

If the user specifies OUEUES=DR on the TERMINA1 macro and OPTCE=R 
on the DCB for the reusable disk messaae queues data set, the 
reusability function of the Reusability-Copy Subtask is applicable. 
The disk data set is loqically divided into four zones, and when 
Destination Assiqnment (IEDQHM02) assiqns a new disk record to a 
location that is equal to the current zone boundary (AVTLODPT) , 
Destination Assiqnment sets a "first time" switch to request CPB 
Initialization to exit to REUS. CPE Initialization branches to REUS 
at a midzone point, and the Reusability-Copy subtask cancels all 
unused preassiqned next-messaqe locations in the precedinq zone. This 
moves each next-messaqe location into the current zone. The subtask 
also copies all unsent messaqes in the zcne iust before the precedinq 
zone into the current zone, enqueuinq the messaqes for transmission to 
an alternate destination. 

The COPY part of the Reusability-Copy subtask is activated to copy 
a messaqe from one queue to another whenever two receivinq 
destinations are to receive the same messaqe, but have their queue on 
different messaqe queues. It is also activated when multiple-buffer- 
header messaqes have secondary header records in a zone that is 
different from the text records. 

The "PEUS function can stop TCAM receivinq operations by settinq 
the "REUS disk is full" bit (X»40' in AVTBIT 3). When both the "REUS 
is runninq" and the "REUS first time" flaqs are on, this subtask 
allows tcaw to only send messaqes. Normal messaqe traffic can be 
resumed when this subtask subsequently finds the "REUS first time" 
flaq off and turns off the "REUS disk is full" bit. 

After completinq its processinq, the Reusability-Copy subtask 
exits to CPB Initialization at IEDOEA02. Any qenerated CPBs are 
passed to EXCP Driver (IGG019RC) on a EIEC queue. If, however, this 
subtask receives a loqical read error or disk, it issues an ABEND, 
S045, U00C2. 

The Reusability-Copy subtask uses a unit from the buffer unit pool 
as a work area that has the followinq DSECT format: 
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Offset 
+0(0) 

+4(4) 
+8(8) 
+12 (C) 
+16(10) 
+20(14) 

+24 (18) 

+28 (1C) 
+32 (20) 
+36 (24) 
+40 (28) 









SAVEFEFO 






DQCB 


NBUNT 


SQCB 


DNFL 


DESTQCB 


Reserved 


SOURCQCB 


SRFL 


BUFFER/IDBADPTR 


XTRA 


NTXT 


NTXT (Cont.) 


NEWXTRA 


NEWXTRA 
(Cont.) 


NEWHEADR 


Reserved 


BADHEAD 


ALTDESX 


BITS 





SAVEFEFO - Save area for the first 5 bytes of the data portion of the 
record 

DQCB - Destination priority OCB 

NBUNT - Decremented counter of additional units to be copied, 
oriqinally set from PRENEUNT 

SOCB - Source priority QCB 

DNFL - Destination messaqe queue type - to be OR'ed with CPBFLAG: 
X»20» reusable disk 
XMO* ncnreusable disk 
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X'OO 1 main storage only 

DESTOCB - Destination master QCB 

SOURCQCE - Source master QCE 

SREL - Source messaae queue type - to be OR'ed with CPEFIAG: The hit 
definitions are the same as DNEL above 

BUFFER - In COPY, the address of the criqinal unit tposted to COPY. 

IDBADPTR - In REUS, the absolute disk reccrd number of the record 
whose EEEO pointer indicated the message to qc to the alternate 
destination. 

XTRA - The absolute address of the next additicnal unit tc be fetched 
into main storage when mcvinq a messaqe 

NTXT - The absolute address of the next buffer to be fetched into main 
storaqe when irevirq a message 

NEWXTRA - The absolute address of the position in which the next 
additional unit is to be written. 

NEWHEADR - The absolute address of the first unit for the alternate 
destination. 

BADHEAD - The absolute address of the first unit of a messaqe to be 
sent to an alternete destination. 

ALTDESX - Index in the Termname Table of the alternate destination. 

BITS - Elaq bits for REUS: 

X'BO 1 - first message of this QCB was to qo to 

an alternate destination. 
X'40 f - last messaqe of this QCB has been checked 

by Reusability. 

The Reusability-Copy subtask uses one CPB to transfer an entire 
messaqe from one queue to the other. At the time the CPB is obtained 
from the CPB free pool, the unit work area is taken from the buffer 
unit pool to contain inf crmation about the status of the messaqe beinq 
moved. This unit work area is attached tc the CPE by a pointer at 
CPBAERB. When the copy operation is ccmpleted, or when this zone 
servicinq by Reusability is finished, the subtask returns the unit 
work area to the buffer unit pool and the CPB to the CPB free pool. 

External Routines: 



• IEDQHG02 - Time Delay subtask - to remcve the checkpoint element 
from the time delay queue in order to tpost the element to the 
Checkpoint CCB. 

• TEDQHM02 - Destination Scheduler - to receive a buffer, put the 
address value in the prefix, and put the messaqe into the main storaqe 
messaqe crueues data set if that is the destination- 
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• TEDQHM03 - Destination Scheduler - to determine whether the only 
messaqe on the Priority QCB is beinq sent. 

Tables/Work Areas: AVT, CPE, Termname Table, ICE, CCE, buffer prefix, 
Terminal Table, 

Attributes: Reusable, nonrefreshable, enabled, problem program mode. 

MESSAGE CCNTRCI FBOGRAM TERMINATION ROUTINES 
Resident Closedcvr Completion (Chart NA) 
Module Name : IEDCNA 
Entry Point : 

• IEDONA - called by the TCAM Dispatcher when the closedown 
completion element is on the ready queue. 

• IEDQNA3 - called by the OS Termination routine when a TCAM 
attached task terminates. 

Eunctions : At the IEDONA entry point, this routine links to the 
Nonresident Closedown Completion module. After control is returned, 
this routine restores the user registers from AVTSAVE1 and returns to 
the user code that follows the PEATY macro expansion. 

At the IEDCNA3 entry point, this routine determines whether the 
attached task terminated abnormally. If so, IEDQNA3 neqates the TCE 
address in reqister 1 and then links to IEDQNA2. Otherwise, IEDQNA3 
returns to OS. 

External Routine : IEDQNA2 - Nonresident Closedown Completion routine 
- to close down the MCP and the attached tasks. 

Tables/Work Areas : AVT, TCE. 

Attributes: Reentrant, resident. 



Nonresident Closedown Completion Routine (Chart NA2) 

Module Name: IEDCNA2 

Entry Point : TEDCNA2 - called by the Resident Closedown Completion 
routine (IEDONA) to close down the MCP and the attached tasks. 

Eunctions : When reqister 1 is positive, this routine waits for the 
completion of all disk activity in the MCP. Tf there is disk activity 
in the MCP, Closedown Completion exits to the TCAM Dispatcher to tpost 
the closedown completion element tack to the ready queue. 

Tf there is no disk activity in the TCAM system, the Closedown 
Completion routine sets a closedown completion bit in the environment 



checkpoint request element and posts the ECEs for any attached tasks. 
This routine waits for the termination of the attached tasks and then 
detaches the tasks. The Closedown Completion routine checks for the 
presence of Checkpoint, On-Line Test, and FE Common Write before 
issuinq a DETATCH; however. Operator Control is unconditionally 
detached. 

After the above functions have been completed, this routine 
returns to the Resident Closedown Completicn routine (IEDQNA) . 

When register 1 is negative, a TCAM attached task has terminated 
abnormally. This module compares the TCE address passed from OS with 
the TCB address in the AVT to determine which task terminated. If the 
task was TOT'S, this module issues an ABEND with a completion code of 
42 to abend the MCP. If the task was operator control, IEDCNA2 issues 
a WTO messaqe to the system console and then returns to IEDQNA3. If 
the task was checkpoint, this module issues a WTC messaqe to the 
system console, clears AVTCKGET to zero so that no more checkpoints 
will be attempted, and returns to IEDQNA3. If the task was FE Common 
Write, TEDQNA2 issues a WTO messaqe to the system console, clears 
AVTCWFL1 to zero to indicate an inactive status, and returns to 
IFD0NA3. 

External Boutines : None. 

Tables/Work Areas : AVT, IOE, DCB, DEB. 

Attributes: Transient, reentrant. 



MCP Closedown Processing Routine (Chart CO) 

Module Name : IEDCCO 

Entry Point - IEDOC0 - called when an MCPC1CSF or CLOSEMC macro is 
issued in an application proqram or when the HALT operator control 
command is issued from a terminal or the system console. 

Functions : This routine processes an MCPCLCSE or CLOSEMC macro from 
an application prcqram or a HALT ccmmand frcm a terminal or the system 
console. 

The MCP Closedown Processinq routine first scans the input command 
for syntax errors. If there are errors, this routine returns to 
TEDOCA with X'OM* in reqister 15. Otherwise, this routine scans all 
the LCBs to set the X»01 f bit in LCBQCEA+2 for each stopped line. The 
MCP Closedown Processinq routine then sets the proper closedown in 
proqress switches in AVTEIT1. 

If the Feusability-Copy subtask is active, the MCP Closedown 
Processinq routine issues a WAIT until the disk I/O is complete. 
After this if any line is sendinq data, the MCP Closedown Processinq 
routine issues a WAIT on the Operator Control ECB. This allows the 
MCP to qain control to process elements en the ready queue. 
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When the ICB is posted complete, the MCP Closedown Processing 
routine regains ccntrcl to continue checkinq for line activity. This 
routine checks the lines and issues WAIT macros until all sending 
activity has stopped. At this point, the MCP Closedown Processing 
routine returns to Operator Control so that the Stop line routine can 
be activated to issue a HALT I/O on each line. 

After the Stop line routine has performed its functions, the MCP 
Closedown Processina routine is reloaded tc examine the PCB use count 
fields. If there is an open DCB for a PCB (use count not equal to 
zero), this routine issues a WTO error message that contains the job 
name of the application program to the system console* This routine 
then issues a WAIT on the Operator Control ECE to allow time for a 
CLOS"* to te executed in the application program. When the CLOSE is 
executed, the MCP Closedown Processing routine regains control to 
continue examining the use counts until the routine determines that 
all application program DCBs are closed. 

when all the ECBs are closed, the MCP Closedown Processing routine 
rechecks the LCBs. If any LCB is marked sending, receiving, or free, 
this routine issues a WAIT to allow time for the LCB to be marked 
stopped. When all the LCBs are marked stopped, this rcutine tposts 
each LCB to itself and issues a WAIT to flush the gueues. Then this 
routine issues a WAIT on the Operator Ccntrol ECB until all the CPBs 
are in the CPB free pool. 

After all of the above functions are completed, the MCP Closedown 
Processing rcutire tposts an element tc the ready gueue to reguest 
clcsedown. Tf the checkpoint DCB is open, the routine tpcsts the 
environment reguest element; otherwise, the routine tpcsts the 
closedown completion reguest element. The MCP Closedown Completion 
routine returns to the address in register 14 - the Operator Control 
task. Note that the element is tpcsted to the ready gueue via the 
AOCTL SVC 102 routine. 

External Boutines : 

• IGC102 - ACCTL SVC 102 routine - to tpost an element to the ready 
gueue. 

• OS Wait routine (SVC 1) - to allow time for certain MCP functions 
to complete. 

Tables/Work Areas; CVT, AVT, TCE, DEE, DCB, ICB. 

Attributes : Beentrant, transient. 

Line Group Close Eoutines (Charts 14 and 15) 
Module Names : IGG02035, IGG02036 
Entry Points: 
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• TGG02035 - activated by an XCTL from an T/C supported routine to 
close the line qroup DCBs. The routine may also be reentered by 
a loop from itself if there are multiple DCBs to be processed. 

(Chart 24) 

• TGG02036 - activated by an XCTI from the line Group Close routine 
(TGG02035) after a CLOSE line ECB is issued in a TCAM MCP. It may 
also be reentered by a loop frcm itself if there are multiple DCBs 
to be processed. (Chart L5) 

Functions ; The functions of each routine are defined according to 
entry point. 

• IGG02035 

Load 1 of the line Group Close routine determines whether the 
closedown condition is the result of an abend in the MCP. If the MCP 
has not abended, the routine issues an EXCP macro on the line to 
perform error recordinq via the ERP routines. On the ether hand r if 
the MCP has afcended, the routine determines whether there are any 
application prcqrams active in the system. If there are some active r 
the Line Group Clcse routine determines whetner any of them have been 
scheduled to be abended. If ncne have teen scheduled, the routine 
schedules them to be abended and branches tc the Abnormal Termination 
routine, which abends each application proqram with a completion code 
of 046. After processinq each application proqram in the system, the 
routine issues an EXCP macro on the first line in the line qroup in 
the MCP and branches to the EPP routines to perform OBB-SDP error 
recordinq. 

On return from the EPP routines, the Line Group Clcse routine 
checks all the DCEs for the lines in the MCP and then issues an XCTL 
macro to qive control to the executor identified by the next non-zero 
entry in the system Where-to-qo Table. 

• IGG02036 

The purpose of this routine is to close a line qroup DCB in a TCAM 
MCP. Load 2 of the Line Group Close routine purqes all I/O on the 
lines associated with this DCB, disables the lines unless they are 
connected to a Type III adapter, frees the associated ICBs, and clears 
the associated line entries in the Cross Reference Table (if present). 

Load 2 of the Line Group Close routine also examines every DEB in 
the TCB DEB chain to determine whether there is an additional line 
qroup or messaqe queues DCB to be closed. If there is not, the Line 
Group Close 2 routine places zeros in the AVT pointer in the 
Dispatcher prefix and issues a FPFEMAIN for the Cross Pefrence Table, 
if ore is present. 

IGG02036 issues an XCTL to the module indicated by the next non- 
zero entry in the system Where-to-Go Table. This module can be any 
one of the system modules IGG0200B throuah IGG0200G. 

External Poutine : OS Ereemain routine (SVC 5) - to free the Cross 
Peference Table if all DCBs have been processed. 
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Tables/Work Areas : Where-to-Go Table, DCE, DEE, TCP, Cross Beference 
Table. 

Attributes; Transient, enabled, reentrant. 



Checkpoint Close Foutine (Chart L6) 

Module Name ; IGGC2041 

Entry Point : IGG02041 - called when a CICSE checkpoint DCB macro is 
issued in the MCP. 

^unctions: This routine closes the checkpoint DCB in an MCP. If this 
is a normal closedown, the Checkpoint Close routine sets an indication 
in the checkpoint control record and rewrites the record on disk. It 
then frees the checkpoint work area by a FFEEMAIN macro instruction. 
The address of the checkpoint work area is in AVTCKGET, unless some 
error causes the checkpoint function to be eliminated from the system. 
In this case, the address is in AVTCKELE. If both .fields are equal to 
zero, there was not enouqh main storaoe for the GETMAIN, so the 
FFEEMAIN and delete functions are bypassed. 

The only error recognized by this routine is a disk error while 
writinq the control record. If this occurs, the Checkpoint Close 
routine uses WTO to issue an error messaqe and exits, as it would if 
no error had occurred, to the next entry in the Where-to-Go Table. 

External Foutine : IECPCNVT - an OS system routine that converts the 
relative track address tc an actual disk address. 

Tables/Work Areas : CVT, AVT, checkpoint work area. 

Attributes: Feentrant, transient, supervisor mode. 



Message Queues Close Foutine (Chart L1) 

Module Name : TGGC2030 

Entry Point : IGGC2030 - activated by an XCTI from a system. I/O 
support module when a CLOSE messaqe queues or checkpoint DCE is issued 
in a TCAM MCP. It may also be reentered by a loop from itself if 
there are multiple messaqes queues DCBs tc be processed. 

Functions ; This routine closes a messaqe queues DCB in a TCAM MCP. 
The Messaqe Queues Close routine removes the DEE for this DCB from the 
DEB chain in the TCB and frees the IOBs associated with this DCB. 

The Messaqe Queues Close routine also examines every DEE in the 
TCE DEE chain to determine whether there is an additional DCB to 
close. If there is not, the Messaqe Queues Close routine issues a 
FFEEMAIN command for all areas that were obtained at INTFO time and 
places zeros in the AVT pointer in the prefix of the Dispatcher. 
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If the DCE0P1CD field of the DCB indicates a Checkpoint DCB, this 
close routine puts the identification (41) of the Checkpoint Close 
routine in the next entry in the system Where-to-Go Table. 

The Messaqe Queues Close routine then issues an XCT1 to the module 
indicated by the next non-zero entry in the system Where-to-Go Table 
- this can be any module with a name from the value TGGC190B to 
IGG0190G or IGG01941, as determined by the system close functions. 

External Foutine: OS Freemain routine (SVC 5) - to free main storage 
that is associated with the DCBs. 

Tables/^ork Areas : Where-to-Go Table, DCE, DEE, TCB, Cross Beference 

Table. 

Attributes: Transient, enabled, reentrant. 



APPLICATION PBOGBAM INITIALIZATION AND TERMINATION ROUTINES 
GET/PUT and BEAD/WFITE Open Executor (Charts 17, L8) 
Module Names : 

• IGG01946 - Load 1. (Chart L7) 

• IGG01947 - Load 2. (Chart L8) 
Entry Points : 

• IGG01946 - called by the OS system CPEN routine when an OPEN 
GET/PUT or FEAD/WFITE DCE is specified in an application program. 

• TGG01947 - called by an XCTL from TGGC1946. 

Functions : This module activates a data transfer communication link 
between an application prcqram and the MCP.. The Open Executor is used 
to open input (GET or READ) and output (PUT or WKITE) DCBs in the 
application prcqram. It executes with a supervisor storage protection 
key and, for the most part, disabled to interruptions. 

When the Open Executor (Lead 1) is activated, it first tests the 
AVT address pointer in the CVT to determine whether there is an active 
MCP in the system. If there is not an active MCP, the Open Executor 
does not open the DCB, sets an unsuccessful open flag in the DCB, and 
exits to TGG01933. 

If there is an active MCP in the system, the Open Executor gets 
the "gueuename" (that was coded on the DD card) from the Job File 
Control Block (JFCB) in the DCB work area. The User Interface routine 
is then invoked to activate the Binary Search routine (IEDQA1) , which 
uses the "gueuename" parameter to search the Termname Table for the 
corresponding process entry. When the matching entry in the Termname 
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Table is found, control returns to the Open Executor, which, in turn, 
issues a GETMAIN command to obtain main storaqe fcr an access method 
work area and for a Data Extent Block (DEB) . If the "queuename" is 
invalid, the Open Executor exits to IGG01933 for error prccessinq. 

The Open Executor tpcsts a special element that contains a pointer 
to the process entry in the Termname Table to the Open/Close subtask 
in the MCP. (The AOCTL SVC 102 routine is used to tpost the element 
to the ready queue in the MCP.) The Open Executor then issues a WATT 
to put the application proqram in the wait state. This allows the MCP 
to qain control to process the special element iust tpcsted from the 
application proqram. 

When the application proqram ECB is posted complete by the MCP, 
the WATT condition is satisfied and the Open Executor reqains control. 
It inspects the status flaq in the process entry to determine whether 
the MCP successfully allocated main stcraqe in the MCP for this 
application proqram. If so, the Open Executor initializes the access 
method work area by linkinq it to the DCB and the process entry work 
area in the MCP. The DEE is also initialized and enqueued on the TCB 
DEB chain. If the MCP did not allocate space for this application 
proqram (either the process entry was already in use or a GETMAIN was 
unsuccessful) the DCB is not opened, the DEB is not enqueued, an 
unsuccessful open flaq is set in the ECB, and the Open Executor exits 
to IGG01933 fcr error prccessinq. 

The Open Executor then leads the appropriate access method module 
for the DCB beinq opened. For an input DCB, the appropriate GET/PEAD 
routine is loaded and linked to the DCE; for an output DCB, the 
appropriate PUT/WPITF routine is leaded and linked to the DCB. The 
Check routine is loaded if this is a read/write condition, and if the 
user has specified a POINT macro, the Point routine is also leaded. 

After the above functions are, performed. Load 1 of the Open 
Executor saves the information needed by load 2 (TGG01947) in the 
OPEN/CLOSE work area. The Open Executor (Load 1) then transfers 
control (XCTL) to next entry in the Where-to-Go Table. The next 
entry, in this case, is the IGG019U7 entry point of Load 2 of the Open 
Executor. 

Load 2 of the Open. Executor first determines whether it is 
continuinq the open of an input DCE. If it is an input DCB, the 
Executor inspects the Destination QCB for this application proqram in 
the MCP. If there is not a complete messaqe on this QCB, the Get 
Scheduler STCB in the MCP is moved from the Pead-ahead QCB to the 
application proqram Destination QCB. If there is a messaqe, an ERB 
for the messaqe buffers is- initialized and tpcsted to the Disk I/O OCR 
in the MCP. 

If locate mode is specified, the Open Executor issues a GETMAIN 
for a work area and stores its address in the DEE* If the GETMAIN is 
unsuccessful, the Open Executor exits to IGG01933 for error 
processinq. 
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Upon successful completion of the above functions, the Open 
Executor sets a successful open flaa in the DCE and returns to the 
system OPEN routine (the next entry in the flrere-to-Go Table) . 

External Routines : 

• TEDQUI - User Interface routine - to activate the Einary Search 
routine (IEDQA1) , which locates the "queuename" entry in the 
Termname Table. 

• IGC102 - ACCTL SVC 102 routine - to tpost a special element to the 
MCP ready queue. 

• IEDQNB05 - Application Proqram/Operator Control Interface routine 
- to take an MCP checkpoint. 

Tables/Work Areas: CVT, AVT, TCE, Termname Table, BCB beinq opened, 
JFCB, access method work area, DEB process entry, process entry work 
area, CPEN/CLCSE work area. 

Attributes : Transient, reentrant, refreshable, enabled, supervisor 

mode. 

GET/PUT and READ/WRITE Close Executor (Charts L9 and L10) 
Module Names : IGG02046, IGG02047 
Entry Points : 

• TGG02046 - called by the system Close rcutine when a CLCSE GET/PUT 
or READ/WRITE DCB is issued in an applicaticn proqram. (Chart 19) 



• 



IGG02047 - activated by an XCTL from IGG02046 tc complete 
applicaticn proqram closedown. 



Functions : These routines deactivate a data transfer communication 
link between an application proqram and the MCP. Beth loads of the 
Close Executor are used to close input (GET/READ) and output 
(PUT/WRITE) DCBs in the applicaticn proqram. They execute with a 
supervisor stcraqe protection key, and, for the most part, disabled to 
interruptions. The functions of each module are discussed accordinq 
to entry point. 

• IGG02046 

^or an input DCB, if an ERB is tposted to the Bead-ahead QCB, Load 
1 of the Close Executor tposts a special element that contains the 
address of the DCB process entry in the Termname Table to the 
Open/Close subtask in the MCP. If the EBB is not busy, the Close 
Executor tests the Bead-ahead QCB for full buffers to be tpested to 
the Buffer Return QCB. If the Get Scheduler is in mid-cycle, the 
Close Executer does not tpost the special element* The Get Scheduler 
tposts the element when it finishes its cycle and recoqnizes that a 
CLOSE has been issued for the DCB associated vith the process entry. 
If the Get Scheduler is waitinq on the application proqram Destination 
QCB, its STCB is unchained. (This tpost is accomplished via the AQCTL 
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SVC 102 routine.) A WATT macro is then issued to allow the MCP to 
gain control to process the special element just tposted from the 
application prcqram. 

For an output DCB, the Close Executor tests to determine whether 
a buffer was saved from the last PUT or WHITE operation. If it was, 
the buffer is flagged as end-of-message and tposted to MH . The Close 
Executor then tposts a special element tc the Open/Close subtask in 
the MCP and issues a WAIT command. 

when the application program ECE is posted complete, the Close 
Executor regains control to free main storage occupied by the access 
method work area, the locate mode work area (if any), and the DEB, to 
issue a DELETE macro for any loaded routines, to restore the DCB to 
its pre-open status, and to set the close flag in the DCB. 

If the MCF closedown bit in the AVT is on, the GET/PUT and 
FEAD/WRITE Close Executor posts complete the Operator Control ECB in 
the AVT. This allows closedown processing to complete. 

After completing its functions, TGG02C46 . transfers control to 
IGG02047 to complete the application program closedown procedure. 

• IGG02047 

Load 2 of the GET/PUT and READ/WRITE Close Executor scans all the 
TCAM LC*s to determine whether any lines are locked to the application 
program DCB that is being closed. If an LCB is locked to the DCB in 
guestion, IGG02047 removes the associated line from lock mode and 
tposts (via TGC102) the LCB to itself to free the line. 

After all DCBs have been closed for this invocation, Load 2 of the 
Close Executor transfers control to the system OPEN routine (the next 
entry in the Where-to-Go Table) . 

External Routines : 

• IGC102 - AQCTL SVC 102 routine - to ttcst a special element or an 
LCB to the MCP ready gueue. 

• IEDQNB05 - Application Program/Checkpoint Interface routine - tc 
take an MCP checkpoint. 

Tables/Work Areas; CVT, AVT, DCB to be closed, TCB, CCE, EEE, access 
method work area, process entry, process entry work area, OPEN/CLOSE 
work area, LCB. 

Attributes : Transient, reentrant, refreshable, enabled, supervisor 
mode. 



Open/Close Suttask (Chart EU) 



Module Name : IEDCEU 
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Entry Point : IEDOEU - qains control when a special element 
(containinq the address of a process entry in the Termname Table) 
tposted by the Open or Close Executor in an application proqram qets 
to the top of the ready queue in the MCP. 

Functions ; This routine allocates main storaqe in the MCP for an 
application proqram. The allocated main storage is to contain a 
process entry work area, an LCB, and one or more SCEs. 

The Open/Close subtask is an MCP routine. It qains control when 
a special element containinq the address cf an application proqram 
process entry in the Termname Table is at the top of the MCP ready 
crueue. This special element is placed on the ready queue by the Open 
or Close Executor in an application proqram. 

If the Open/Close subtask is activated by the Open Executor, it 
first allocates main storaqe for a process entry work area/SCB and 
links it to the process entry. It then increments the use count in 
the t>CB, loads the appropriate scheduler, links the scheduler to its 
Destination OCE, sets a qood-open flaq in the process entry, posts the 
application proqram ECE complete, and returns to the TCAM Dispatcher. 
If any GETMAIN or IOAD fails, a return code is stored in the process 
entry and the cpen-failed flaq is set in the process entry. 

Tf the Open/Close subtask is activated by the Close Executor, it 
first frees the process entry work area/SCB and decrements the use 
count in the PCB . The subtask then delinks and issues a DELETE macro 
for the appropriate scheduler, deactivates the application proqram 
Destination OCB, and turns off the open flaq in the process entry. If 
the use count in the PCE is now equal to zero, the LCB is also freed. 
The Open/Close subtask relinquishes control by posting the application 
proqram ECB complete and returninq to the TCAM Dispatcher. 

If a GET or PEAD DCB is beinq closed, the Open/Close subtask 
determines whether the EPB is in use and ensures that all buffers 
assiqned to the ccrrespondinq Destination CCB are in the buffer unit 
pool. If the EPB is in use, this subtask returns to the TCAM 
Dispatcher to wait for EPB cleanup by the Get Scheduler. 

External Poutines : 

• IGC102 - AQCTL SVC 102 routine - to post the application proqram 
ECB. 

• OS Getmain routine (SVC 4) - to qet main storaqe for an LCB and 
the process entry work area. 

• OS Freemain routine (SVC 5) - to free main storaqe for an LCB and 
the process entry work area. 

Tables/Work Areas : Process entry in the Termname Table, OCB, PCB, 
process entry work area, SCE. 

Attributes : Peertrant, refreshable, enabled, resident, problem 
proqram mode. 
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• IGC102 - AQCT2 SVG 102 routine - to pest the application program 
ECB. 

APPLICATION PBOGBAM I/O BOUTINES 

Get Scheduler (Chart EW) 

Module Name: IEDCEW 

Entry Point : IEDQEW - activated by the TCAM Dispatcher when a special 
element from a GET/BEAD routine in an application proqram is on the 
MCP ready queue. 

Function : This routine performs a read-ahead activity from the disk 
messaqe queues data set in anticipation of a GET command from an 
application prcqram. The Get Scheduler also reacts to retrieve 
requests from an application proqram. 

The STCB for the Get Scheduler waits on either the Destination QCB 
or on the Bead-ahead QCB for a particular application program. The 
Get Scheduler STCB is on the Destination QCB until a complete messaqe 
enters the system. It then waits en the STCB chain of the Bead-ahead 
OCE. 

As lonq as there are buffers available and more than two messages 
have not been read from the messaqe queue, the Get Scheduler tposts an 
EBB to the Disk I/O QCB to have a buffer filled with data and placed 
on the Destination QCB. The Disk I/C QCB activates the CPB 
Initialization routine, which satisfies the EBE and passes the full 
buffers on the EBB to the Get Scheduler. The Get Scheduler places 
these buffers in the element chain of the Bead-Ahead QCB to be read by 
the application proqram GET/BEAD routine. 

The Get Scheduler insures that MH processes only one message at a 
time. If the messaqe handler for a particular applicaticn proqram is 
already processinq a messaqe and a new messaqe arrives, the Get 
Scheduler enqueues the buffers of the new messaqe on the Pre-MH queue. 
When MH completes the prior messaqe, the Get Scheduler tposts an EBE 
for buffers fcr the next messaqe. Also, the prior messaqe is not 
marked serviced until the next messaae has been processed by the 
application prcqram. 

If a messaqe is a lock inquirey, the Get Scheduler turns en bit 3 
(X'20») in the byte at LCBINSBC+2 in the 1CB for the source terminal. 
This indicates that a response is due to the source terminal. The Get 
Scheduler also increments by cne the lock response count (LCBINCAM) in 
the LCB for the application proqram pointed to by the PCB. 

When the applicaticn proqram GET/BEAD routine reads and 
subsequently empties the full buffers, it tposts a special element to 
the Get Scheduler in the MCP to indicate how many buffers can be 
returned to the buffer unit peel. The Get Scheduler returns the 
buffers and requests another disk read. 
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This operation continues unless the Get Scheduler receives a 
special retrieve element. At this point, it waits for any requested 
I/O activity tc complete. 

If the specified destination for the special retrieve element is 
a main-storaqe-only queue, the messaqe cannot be retrieved and an 
error return cede (X'^OM is passed to the application proqram in the 
process entry work area. 

If the specified destination for the special retrieve element is 
not a main-storaqe-only queue, the Get Scheduler alters the LCB and 
the SCB to teqin retrievinq messaqes from the indicated destination 
messaqe queue. The recall header bit (LCBRCLIN) in the LCE is turned 
on, so the Disk End Appendaqe tposts full buffers directly to the 
Read-ahead QCB. The Get Scheduler examines each header for the 
requested sequence number. If the requested sequence number cannot be 
found, an errcr cede (X f 40M is returned to the application proqram in 
the process entry work area. If the requested header is fcund, the 
Get Scheduler requests that the messaqe be read from disk. As each 
buffer of the nessaqe beinq retrieved is tposted to the Read-ahead 
OCB, the Get Scheduler tests the GIT DCB to see if the application 
proqram is in retrieve mode. If the application proqram leaves 
retrieve mode before the entire messaqe is read, the Get Scheduler 
returns any unfilled buffers to the buffer unit pool and then resumes 
normal operaticn. 

When the Get Scheduler determines that the DCB for the current 
process entry is beinq closed, the scheduler sets up any buffers on 
the "Read-ahead QCE to be returned to the buffer unit pool. In this 
situation, the scheduler also tpests a special closedown element to 
the Open/Close subtask (IEDCEU) . 

External Routine: IGC102 - AOCTL SVC 102 routine - tc post the 
application prcqram ECB complete in crder to activate the waitinq 
application prcqram. 

Tables/Work Areas: DCB for GET or READ in the application proqram, 
Read-ahead CCE, Termname Table, AVT, process entry work area, 
application prcqram ECB. 

Attributes: Reentrant, refreshable, enabled, transient, problem 
proqram mode. 

GIT/READ Routine (Chart RG) 

Module Name: IGGC19RG 

Entry Point: IGG019RG - called when a GET or READ macro is issued in 
a SAM compatible TCAM application proqram. 

^unctions: This routine reads data from full buffers on the element 
chain of the Read-ahead QCB in the MCP into an application proqram 
work area. It also includes support for messaqe retrieval and the 
checkpoint user exit (CKPTADD) . 
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The GET/TREAD routine reads data from the buffers in the MCP until 
either the application prcqram work area is filled, an entire work 
unit is moved, or the end of a messaqe is reached. For QSAM, if the 
Read-ahead QCE is empty and SETEOF is net specified, the GET/READ 
routine waits fcr more data. For BSAM, the routine stores a 
completion code of X'OI 1 or X , 02' in the DECB. The GET/BEAD routine 
builds a special element that contains the number of buffers emptied 
and uses the AQCTL SVC 102 routine to tpost this element to the Get 
Scheduler STCB in the MCF. 

The GET/BEAD routine branches to the user EODAE address, if 
specified, on the subsequent GET or BEAE/CHECK request followinq 
recoqnitior cf a buffer that contains an end-of-file indicator in its 
prefix (SETEOF condition). For QSAM, a return code of X'04 1 is placed 
in reqister 15 if the SETEOF condition exists and no EODAD is 
specified. For BSAM, the SETEOF condition causes a code of X'TO* to 
be placed in the EECE. 

Tf the SETEOF condition is not present, the GET/READ routine does 
not pass control to the next user-ceded instruction in the application 
proqram until the user request is completely satisfied. (The routine 
uses a WAIT command to maintain control.) Tf the BEAD request is 
used, the WAIT is delayed until the CHECK macro is issued. After 
successful completion of a GET operation, X'OO 1 is placed in reqister 
15. For a BEAE operation, a X'TF 1 completion code is placed in the 
DECB. 

If OPTCD=C or W is specified on the DCE macro, the GET/BEAD 
routine places the name of the source terminal and/or a work area 
contents description in the application proqram work area. If the 
source is not specified in the buffer prefix (e.q., from a dial line), 
blanks (X f 40») are placed in the terminal name field in the work area. 

If c checkpoint exit is specified on the DCB macro, the GET/READ 
routine takes this exit each time the first buffer of a messaqe is 
processed and each time a checkpoint has teen taken in the MCP since 
the last time the first buffer of a messaqe was examined. 

Tf the SYNAD user exit is specified, it is taken on work area 

overflow if CPTCE=C is not specified. If SYNAD is not specified, the 

user receives a return code in reqister 15 for a GET request or in the 

DECB for a BEAD request. For QSAM a return code of X'08' indicates a 

work area overflow. For BSAM, the code fcr work area overflow is 
X'52». 

External Routines: 



• 



OS Wait routine (SVC 1) - to wait for data to arrive on the 
element chain of the Read-ahead QCB in the MCP. 

TGC102 - AQCTI SVC 102 routine - to tpost a special element to the 
Get Scheduler STCB in the MCP. 



Tables/Work Areas: CVT, Get/Read DCB, application prcqram work area, 
AVT, Read-ahead QCB, access method work area, DECE, DEE, Termname 
Table, process entry work area, PCE. 

Attributes: Reentrant, refreshable, prcblem program mode, enabled, 
transient. 



Check Routine (Chart RL) 

Module Name: IGGC19PL 

Entry Point: IGG019RL - called when a CHECK macro is issued in an 
application prcqram in conjunction with a BEAD or WRITE macro. 

"^unctions: This routine tests for completion of the read or write 
request that is related to this check request. It also tests for 
errors that may have occurred durinq the execution of the associated 
READ or WRITE macro. 

If the event control block (ECB) in the data event control block 
(DECB) is posted complete and the DECE ccmpleticn code is X^E*, the 
Check routine returns control to the user at the next sequential 
instruction fcllowinq the CHECK macro expansion. 

If data has appeared on the Read-ahead CCB since the Read routine 
examined it (DECB completion code equal to X'UO), the Check routine 
invokes the GET/READ routine by a BALR instruction. Upon return from 
the GET/READ routine, the DECB completion code is rechecked. 

At end-of-file (SETEOF) , the Check routine takes the EODAD exit, 
if one is specified. Otherwise, a return cede of X'04' is returned to 
the next sequential instruction after the CHECK macro-expansion. 

Tf a READ or WRITE error is detected, the Check routine takes the 
SYNAD exit, if specified. Otherwise, an errcr return code is passed 
to the next prcqram instruction. A return code of X 1 *^ 1 after a READ 
operation indicates that a work area overflow occurred; X'OB' after a 
WRITE operation indicates a sequence error; X'OC* indicates an invalid 
destination. 

If the ECE is not posted complete and no error indication is 
detected in the DECB, the Check routine issues a WAIT for the 
completion of the event under consideration. When the wait is 
satisfied (a messaqe arrives on the Read-ahead QCE) , the Check routine 
invokes the appropriate TCAM SAM routine. 

External Routine: IGG019RG - GET/READ routine - to read buffers from 
the Read-ahead CCE. 

Tables/Work Areas: DECB, DCB, DEE, access method work area. 
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Attributes: Peentrant, refreshable, problem program mode, enabled, 
transient . 



Get Scheduler FTFC Routine (Chart EZ) 

Module Name; IEDCEZ 

Entry Point: IEDOEZ - activated by the TCAM Dispatcher when a POINT 
macro followed by a GET macro is issued in an application program and 
the Get Scheduler STCE is on the STCB chain of the Destination QCE, 
rather than on the STCB chain of the Head-ahead QCE. 

^unctions: This routine recognizes the retrieve element and tposts it 
to the application program Destination QCE to indicate to the Get 
Scheduler the need to process the retrieve element. 

External Routines: None. 

Tables/Work Areas: Fead-ahead QCB, Destination QCE. 

Attributes: Reentrant, refreshable, enabled, transient, problem 
program mode. 



PUT/WFT^E Routine (Chart FI) 

Module Name: IGG019FT 

Entry Point: TGGC19FI - called when a PUT cr WFITE macro is issued in 
a SAM Compatible TCAM application program. 

Functions: This routine prepares the data in the application program 
PUT/WFITE work area for transfer into buffers in the MCP. 

The PUT/WFITE routine initializes certain fields of the access 
method work area with data from the application program DCE, DECB, and 
work area prefix. Tf locate mode is used, the address of the 
PUT/WFITE work area is in the DEB; otherwise, it is supplied as an 
operand of the PUT cr WFITE macro. 

The PUT/WFITE routine takes the synchronous checkpoint exit if a 
checkpoint has been taken in the MCP sinc€ the last PUT or WFITE and 
the DCB has an EXIST entry offset of X'OF 1 . 

If destination terminal name is specified as the work unit, the 
routine converts the name to a Termname Table offset to be stored in 
the access method work area. 
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The PUT/WFITE routine tposts (via the AQCTI SVC 102 routine) a 
special element to the Put Scheduler in the MCP. It then issues a 
WAIT command tc pass control to the MCP. When the Put Scheduler qains 
control, the presence of this special element on the ready queue 
causes the Put Scheduler to empty the application proqram PUT/WRITE 
work area. The application proqram does not reqain control until the 
entire work area has been transferred intc WCP buffers. 

v or a PUT operation in locate mode, the PUT/WRITE work area 
address is returned to the user in reqister 1. Therefore, data is not 
moved until the second and subsequent operations. 

If the application proqram is eliqible tc be swapped, the AQCTL 
SVC 102 routine causes it to be flaqqed not eliqible tc be swapped 
until the PUT/WRITE operation is completed. It performs the same type 
of function for application proqrams that can be rolled out. 

At the completion of a PUT (OSAM) operation, reqister 15 contains 
a return code, normally zero. It is X'04 1 if either the terminal name 
or the Termname Table offset is invalid. If message segments or work 
units are not in proper sequence, the return code is X'OS 1 . 

At the completion cf a successful WRITE (BSAM) operation, byte 

zero of the EECB contains a completicr cede of X^E 1 . The DECE 

completion code for an invalid terminal name is X 1 ^' and for a work 
unit sequence error is X'48 1 . 

External Routines: 

• IEDQUI - User Interface routine - to activate the Einary Search 
routine (IEDQA1) to scan the Termname Table for the specified 
terminal name. 

• OS Wait routine (SVC 1) - to allow the Put Scheduler in the MCP to 
emptv the application proqram PUT/WRITE work area. 

• IGC102 - AQCTL SVC 102 routine - to tpost a special element to the 
Put Scheduler STCE in the MCP. 

Tables/Work Areas; CVT, AVT, PUT/WRITE ECE, PUT/WRITE work area, 
DECB, Read-ahead OCE, Termname Table, access method work area, DEB, 
process entry work area, PCE. 

Attributes: Reentrant, refreshable, probleir proqram mode, enabled, 
transient. 



Put Scheduler (Chart EC) 
Module Name: IEDCEC 
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Entry Point; IEDQEC - activated by the TCAK Dispatcher when a special 
element from an application prcqram PUT/WRITE routine is on the MCP 
ready queue. 

Functions: This routine moves data from an application prcqram into 
MCP buffers. The Put Scheduler requests buffers from the buffer unit 
pool r fills them with data from the application prcqram work area, and 
tposts the full buffers to the appropriate MH in the MCP. 

When the application proqram work area is empty and the last 
buffer tposted to MH is not EOM, the Put Scheduler posts the ECB for 
the application proqram complete, if it is waitinq. It also flaqs the 
application proqram eliqible for if it has been flagqed net eliqible 
to be swapped (TSO only) , and eliqible fcr rollout if flaqqed not 
eliqible fcr rcllcut. If the last buffer is EOM, the Put Scheduler 
posts the application proqram ECB after Buffer Disposition tposts the 
application prcqram ECB back to IEEQEC. 

When the messaqe destination is specified and the lock response 
count in the application prcqram LCB is not zero, the Put Scheduler 
determines whether the destination terminal Is locked to the 
application prcqram that initiated the post operation. If so, the Put 
Scheduler moves the Send Scheduler STCB tc the STCB chain of the LCE 
for the terminal and then decrements the leck response count. 

Tf the PUT or WRITE ECB indicates that the user is usinq record 
format without a leadinq TCAM work area contents description byte, the 
D ut Scheduler saves the last full buffer in the element chain of its 
OCB. At CLOSE time, which implies end-of-messaqe (EOM) , this latest 
full buffer is tpested tc MH and flaqqed EOM. 

External Routines: 

• TGC102 - AQCTI SVC 102 routine - to post the application proqram 
ECB complete after the data in the application program work area 
has been transferred into MCP buffers. 

• IGG019RE or TGG019RO - TCAM Dispatcher - to tpost the EBB or full 
buffers 

Tables/Work Areas: AVT, LCB, PUT or WRITE DCE in the application 
proqram, DEB, PCB, access method wcrk area, process entry, process 
entry work area, OCB, SCB, Termname Table, application proqram work 
area . 

Attributes: Transient, reentrant, refreshable, enabled, problem 
proqram mode. 



APPLICATION PROGRAM MESSAGE RETRIEVAL-POINT ROUTINE 



Point Routine (Chart KM) 
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Module Name; I GG 01 9PM 

Entry Point; IGG019RM - activated by the PCTNT macro expansion in a 
TCAM application prcqram. 

? unctions; ^his routine builds a messaqe retrieval control block from 
input information specified by the user. This control block is used 
by the GET/BEAD routine to retrieve the specified messaqe. 

When the Point routine qains control to initiate messaqe 
retrieval, it stores the Terminal Table entry address, the messaqe 
sequence number, and the messaqe type (input or output) in the 
retrieve control block. The routine also sets the retrieve flaq in 
the access method work area to indicate that messaqe retrieval is in 
proqress. 

The Point routine issues a return code in reqister 15. For 
successful completion, the return code is X'OO*. A return code of 
X'OS' indicates that an invalid terminal name was specified, a return 
code of X'OU' indicates that an invalid sequence number was specified, 
and a return cede of X'OC indicates an invalid queue type. 

External Routine: IEDQUI - User Interface routine - to activate the 
Binary Search routine (TED0A1) to scan the Termname Table for the 
specified terminal name. 

Tables/Work Areas; CVT, AVT, DCE, DEB, access method work area, QCB, 
Termname Table, Terminal Table entry. 

Attributes ; Feentrant, refreshable, problem prcqram mode, enabled, 
transient. 



APPLICATION PROGRAM COMPATIBLE QTAM ROUTINES 

GET Compatible Routine (Chart FH) 

Module Name; IGG019RH 

Entry Point: TGG019RF - called when a GET macro is issued in a 
compatible QTAM application proqram. 

functions: This routine moves data from full buffers on the element 
chain of the Bead-ahead QCB in the MCP into an application proqram 
work area. 

The GET Compatible routine reads data from the buffers in the MCP 
until either an entire work unit is moved, the application proqram 
work area is full, or the element chain of the Fead-ahead QCB is 
empty. If the queue is empty and an entire work unit has not been 
read, the GET Compatible routine takes the EODAD exit, if specified. 
If no EODAD address is specified and this condition exists, a WAIT 
macro is issued to allow time for more data to be placed on the queue. 
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When the GET operation completes, or when the queue is empty, the 
GET Compatible routine builds a special buffer return element and 
tposts it, via AQCTL SVC 102, to the Get Scheduler STCE in the MCP. 
This returns the empty buffer units to the MCP. 



If a work area overflow occurs, the GET Compatible routine takes 
the SYNAD exit, if specified, and does not read the segment that would 
cause the overflow. If no SYNAD exit is specified, the routine places 
a X' 04 'return code in reqister 15. 

If the work unit for the application program is a messaqe, the GET 
Compatible routine checks for an ECM buffer. If the work unit is a 
seqment, a sinqle loqical buffer is used. If the work unit is a 

record, the routine scans for EOB, NL , CP , IF, or ECM, 

External Routines: 



• 



OS Wait routine (SVC 1) - to wait for data to arrive on the 
element chain of the Pead-aheac! QCB in the MCP. 



• IGC102 - AQCTL SVC 102 routine - to tpost a special element to the 
Get Scheduler STCB in the MCP. 

Tables/Work Areas: CVT, AVT, DCE, DEE, access method work area, 
Termname Table, buffer prefix, PCB, process entry work area. 

Attributes: Peertrant, refreshable, problem program mode, enabled, 
transient . 

PUT Compatible Routine (Chart PJ) 

Module Name: IGGC19PJ 

Entry Point: IGG019PJ - called when a PUT macro is issued in a 
compatible OTAM application proqram. 

functions: This routine prepares data in the application program 
PUT/WPITE work area for transfer into buffers in the MCP. 

The PUT Ccirpatible routine initializes certain fields of the 
access method wcrk area with data from the application program work 
area prefix and from the DCE. The User Interface routine (IEDQUI) is 
called to activate the Binary Search routine to convert the 
destination terminal name to a Termname Table offset. The PUT 
Compatible routine then converts the compatible QTAM work area 
contents descriptor byte to its TCAM eguivalent and verifies the 
segment/record sequence. 

The PUT Compatible routine tposts (via AQCTL SVC 102) a special 
element to the Put Scheduler in the MCP. The routine then issues a 
WAIT to pass control to the MCP. When the Put Scheduler gains 
control, the presence of this special element on the ready queue 
causes the Put Scheduler to empty the application program PUT/WPITE 
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work area. The ECB for the application prcqram is posted complete 
when the entire work area has been transferred intc buffers in the 
MCF. 

At the completion of a PUT compatible operation, reqister 15 
contains a return code - X'OO' if the operation was successful. A 
return code of X*40* indicates an invalid record or seqment sequence. 

External Routines: 

• IEDQUI - User Interface routine - to activate the Binary Search 
routine (IEDQA1) to scan the Termname Table for the specified 
terminal name. 

• OS Wait routine (SVC 1) - to allow the Put Scheduler in the MCP to 
empty the application proqram PUT/WRITE work area. 

• IGC102 - A0CT1 SVC 102 routine - to tpost a special element to the 
Put Scheduler STCB in the MCP. 

Tables/Work Areas; CVT, AVT, DCB, QCB, Termname Table, access method 
work area, PUT/WRITE work area, DEE, process entry work area, PCB. 

Attributes: Reentrant, refreshable, problem prcqram mode, enabled, 
transient. 

Retrieve Service Routine (Chart ES) 

Module Name: IEDQES 

Entry Point: IEDCES - activated when a RETRIEVE macro is issued in a 
OTAM application proqram that is cperatinq with a TCAM messaqe control 
proqram. 

Functions: The Retrieve Service routine provides TCAM support for 
messaqe retrieval from a QTAM application proqram. The routine first 
converts the terminal name of the messaqe destination to a Termname 
Table offset. The routine then builds a special element that consists 
of this offset and other messaqe informatics: the number and type of 
the buffer - for retrieval of the first buffer of a messaqe, this 
element contains the sequence number and type of the buffer; for 
subsequent buffer retrieval, it contains the relative record address 
of the buffer to be retrieved. 

The AOCTL SVC 102 routine is used to tpost the special retrieve 
element to the Retrieve Scheduler (IEDQE7) QCE in the PCE in the MCP. 
The Retrieve Service routine then issues a WAIT to allow time for the 
MCP to retrieve the requested buffer. 

When the special retrieve element is on top of the ready queue, 
the Retrieve Scheduler qains control. Tf the buffer is retrieved, the 
Retrieve Scheduler places it on the element chain of the PCE QCB and 
posts complete the waitinq Retrieve Service ECE in the application 
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program. Otherwise, the routine places an X'04 f error return code in 
reqister 15. 

The Retrieve Service routine reqains control at the instruction 
iust after which the OS WATT command was issued. If an error return 
code (X'04 f ) is in reqister 15, the address or sequence number of the 
buffer requested is incorrect. If the return cede in reqister 15 is 
equal to X'OO 1 , the Retrieve service routine moves the retrieved 
buffer into the application prcqram area and builds a compatible QTAM 
buffer. The routine then tposts (via AQCTL SVC 102) a buffer return 
element to the Retrieve Scheduler and exits to the next user 
instruction in the application prcqram. 

External Routines: 

• IEDQUI - User Interface Routine - to activate the Einary Search 
routine (IEDQA1) to scan the Termname Table for the specified 
terminal name. 

• IGC102 - AQCTI SVC 102 - to tpost the special element to the 
Retrieve Scheduler QCB in the messaqe ccntrol proqram. 

Tables/Work Areas: CVT, AVT, EEB, access method work area, PCE, 
Terminal Table entry, QCB* Termnams Table, TCB, SCB, 1CB, buffer 
prefix. 

Attributes: Reentrant, refreshable, problem proqram mode, transient, 
enabled. 

Retrieve Scheduler (Chart E7) 

Module Name: TEDQE7 

Entry Point: TEDQE7 - activated when a special retrieve element from 
a compatible QTAM application prcqram is at the top of the MCP ready 
queue. 

Eunctions: The Retrieve Scheduler retrieves a buffer from a disk 
messaqe queues data set for a compatible QTAM application proqram. 
The special retrieve element that activates this routine contains a 
sequence number for retrieval of the first buffer of a messaqe or the 
relative buffer address for subsequent buffer retrieval. (The special 
retrieve element is tposted to the Retrieve Scheduler QCB by the 
Retrieve Service routine in the compatible QTAM application proqram.) 
Tor an initial request, the Retrieve Scheduler scans the queue-back 
chain for the specified sequence number until either the number is 
found or it is determined to be lost or net en the queue. When a 
buffer is retrieved, the Retrieve Scheduler places the buffer in the 
element chain of the QCB in the PCE and posts complete the ECE for the 
waitinq Retrieve Service routine. 

When the Retrieve Service routine qains control, it empties the 
buffer and tpests a buffer return element to the Retrieve Scheduler. 
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The Retrieve Scheduler returns the empty buffer to the buffer unit 
pool, deallocates main stcraqe for the dummy LCB and SCE, and waits 
for another retrieve request. When a retrieve request has been 
handled, the Retrieve Scheduler exits tc the DSPDISP entry point of 
the TCAM Dispatcher. 

External Routines: 

• IGG019RE or TGG019FO - TCAM Dispatcher - to tpost elements to the 
ready queue. 



• 



TGC102 - AQCTL SVC 102 - to OS POST the Retrieve Service routine 
ECB complete. 



Tables/Work Areas: AVT, PCB, SCB, ICB, QCB, Terminal Table entry. 

Attributes: Reentrant, refreshable, problem prcgram mode, enabled, 
transient . 



APPLTCATTON PROGRAM NETWORK CONTROI ROUTINES 

Operator Contrcl/Application Program Interface Routine (Chart ET) 

Module Name: IEDCET 

^ntry Point : IEDCET - called and loaded durinq execution time by an 
TCHNG, RELEASEM, MCPCLOSE, or CLOSEMC macro expansion in an 
application program. 

^unctions: This routine allocs the user tc perform a subset of the 
TCAM operator control functions from an application prcgram without 
actually issuinq a PUT command for an operator control message. 

The Operator Control/Application Prograir Interface routine uses 
the AQCTL SVC 102 routine to move a control block (Command Input 
Buffer) that indicates the type of command and other pertinent data 
into the PCEWRKA field in a Process Control Block (PCE) . This 
Interface routine tposts the CIB to the Operator Control QCB for 
processing. It then (except in closedown operations) issues a WAIT to 
put the amplication program in the wait state. The format of the CIB 
is as follows: 
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Offset 


+4 
+8 
+12 
+16 
+20 
+24 



Operator Control QCB Address 


Priority 


Link Field 


Verb 
Code 


Length 
X'lC 





Return Code 


ECB Address for Application Program 












When the Operator Control task has processed the command, it posts 
the waitinq application proqram ECE complete. The Interface routine 
then reqains ccntrcl and moves the return code set by operator control 
from the PCB field that contains the CIB to reqister 15 for inspectio 
n bv the user. 

If this routine is invoked when a TCAM MCF is not active in the 
system; that is, the AVT pointer in the GVT is zero, the routine 
places a return cede of X'OI 1 in reqister 15. If an invalid password 
is specified or if a password is required but not specified, this 
routine puts a X'14' return code in reqister 15. 

Tf the Operator Control/Application Froqram Interface routine is 
activated by an MCPCLOSF or an CLOSEMC macrc expansion and a closedown 
is already in prcqress (AVTCLOSN is set in AVTBIT1) , the routine does 
not perform its functions. It returns to the next sequential 
instruction in the application proqram with a return code of X'OO' in 
reqister 15. 



External Routines: 

• TGC102 - ACCTI SVC 102 routine - tc meve 
boundaries and to post ECEs complete. 



data across partition 



• OS Wait routine (SVC 1) - to put the application proqram in the 
wait state. 

Tables/Work Areas: CIE, PCE, AVT, CVT, Operator Control QCE. 

Attributes: Problem proqram mode, serially reusable, enabled, 
resident. 



TCOPY Service Routine (Chart E1 ) 

Module Name: TEE0E1 

Entry Point: IEDQE1 - called when a TCOPY macro is issued in an 
application prcqram. 

Functions: This module copies a terminal entry into a work area in an 
application prcqram. 

The TCOPY Service routine uses the TCAM Binary Search routine 
(activated via the User Interface routine) to find the Termname Table 
entry that corresponds to the terminal name specified by the user. 
The Termname Table entry contains the address of the corresponding 
Terminal Table entry. The TCOPY Service routine determines the type 
of entry, computes its size, and moves the entry into the application 
program work area. Any option fields are also moved into the wcrk 
area. 

Tf the terminal name specified by the user is invalid, this 
routine places a return code of X'20* in reqister 15. A return code 
of X'OB 1 indicates that TCAM is not in the system and X'OC indicates 
that there is net an open DCB in the application program. 

External Routine: IEDQUI - User Interface routine - to activate the 
Binary Search routine (TEDQA1) to scan the Termname Table for the 
specified terminal name. 

Tables/Work Areas: CVT, AVT, Termname Table, Terminal Table, 
application prcqram work area, TCB, DCB, access method work area. 

Attributes: Reentrant, refreshable, enabled, resident, problem 
program mode. 



QCOPY Service Routine (Chart E2) 

Module Name: TEDQE2 

Entry Point: IEDQE2 - called when a CCCPY macro is issued in an 
application prcqram. 

Functions: This module copies a queue control block (QCE) into a work 
area in an amplication proqram. 

The OCOPY Service routine uses the TCAM Binary Search routine 
(activated via the User Interface routine) to find the Termname Tatyle 
entry that corresponds to the terminal name specified by the user. 
The Termname Table entry contains the address of the corresponding 
terminal Table entry, and the Terminal Table entry points to the 
associated Destination QCB. The QCOPY Service routine computes the 
size of the OCE, includinq all priority level QCBs, and moves the QCE 
into the application proqram work area. 
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Tf the terminal name specified by th€ user is invalid, a return 
code of X^O' is placed in reqister 15. If the terminal type is 
invalid, a return code of X'OU* is placed in reqister 15, A return 
code of X'OS* indicates that TCAM is not in the system and X'OC* 
indicates that there is not an open DCB in the application prcqram. 

External Foutine: IEDQUI - User Interface routine - to activate the 
Binary Search routine (IEDQA1) to scan the Termname Table for the 
specified terminal name. 

Tables/Work Areas: CVT, AVT, Termname Table, Terminal Table, 
Destination OCE, application prcqram work area, TCE, DEB, 

Attributes; Reentrant, refreshable, enabled, resident, problem 
prcqram mode. 



TCHNG Service floutine (Chart E3) 

Module Name: IEDCE3 

Entry Point: IEDQE3 - called when a TCHNG macro is issued in an 
application prcqram. 

Functions: This routine updates the contents of a Terminal Table 
entry by copyinq an altered entry from an application proqram work 
area into the Terminal Table. 

The TCHNG Service routine uses the Binary Search routine 
(activated via the User Interface routine) to find the Termname Table 
entry that corresponds tc the specified terminal name. The Termname 
^able entry points to its associated Terminal Table entry. The TCHNG 
Service routine determines the type of entry, computes its size, and 
moves the entry , as well as any option fields, from the application 
proqram work area to overlay the Terminal Table entry. 

If there is a password in the AVT, the TCHNG Service routine 
checks for a password as input. If there is an input password, the 
TCHNG Service routine loads the Password Scrambler routine to scramble 
the characters. The TCHNG Service routine then compares the passwords 
to determine whether to update the Terminal Table entry. If the 
passwords match, the entry is updated; if the passwords do not match, 
a return code of X f 1U f is placed in reqister 15 and the entry is 
unchanqed. A return cede of X'OS 1 indicates that TCAM is net in the 



system, X'OC 1 indicates that there is not an open DCB, and X^O* 
indicates that an invalid terminal name was specified. 

If the update of the Terminal Table entry is successful and the 
TCAM checkpoint data set is open (AVTCKGET=0) , the TCHNG Service 
routine links tc the TCAM Application Frcqram/Checkpcint Interface 
routine (TEDONE) at a special entry point (IEDQNB02) . 



External Foutines: 

• TEDQTJi - user Interface routine - tc activate the Binary Search 
routine (IEDQA1) to scan the Termname Table for the specified 
terminal name. 

• TEDQE6 - Password Scrambler routine - tc scramble the characters 
of the application proqram-specif ied password. 

• TEDQNB - Application Prcqram/Checkpcint Interface routine - to 
take a checkpoint of the MCP after a Terminal Table entry change 
has been made. 

Tables/Work Areas: CVT, AVT, Termname Table, Terminal Table, 
application prcqram work area, TCE, DEB, access method work area. 

Attributes: "Reentrant, refreshable, enabled, resident, problem 
prcqram mode. 



TCOPY Service Foutine (Chart EH) 

Module Name: I1DCE4 

Entry Point: IEDQE4 - called when an ICOPY macro is issued in an 
application prcqram. 

Eunction : This routine copies the invitation list for a line qroup 
into a work area in an application prcqram. 

By followinq a chain cf system control blccks (see flowchart E4) , 
the ICOPY Service routine compares the "ddname" of each TCAM line- 
qrouD ECB with the name coded in the ICOPY macro. The routine qets 
the address cf the invitation list frcir the matchinq ECB and then 
computes the si2e of the list. The routine then moves a copy of the 
list into the application proqram work area. 

At the completion of this routine, reqister 15 contains a return 

code: 

• X'OO 1 - normal completion of the ICOPY function. 

• X'OiH - an invalid relative line number was specified. 

• X'OB 1 - TCAM is not in the system. 

• X'20' - an invalid "ddname" for line-qrcup DCB was specified. 

External Foutines: None. 

Tables/Work Areas: CVT, AVT, MCP TCB, MCP TIOT, MCP DEB chain, 
application proqram work area, DCB, invitation list. 
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Attributes: Reentrant, refreshable, enabled, resident, problem 
proqram mode. 



Password Scrambler Pontine (Chart E6) 

Module Name; IEDCE6 

Entry Point: IEDQE6 - called as a subroutine to scramble the 
characters of a password. 

^unctions: This routine scrambles the characters of an input password 
so that it can be compared to an already scrambled password in the 
AVT. This provides an internal security check to keep proqraras in 
other system partitions from altering the contents of the MCP tables 
and, work areas. 

External "Routines: None. 

Tables/Work Areas: None. 

Attributes: Problem proqram mode, reentrant, refreshable, enabled, 
transient. 



OPERATOR CCNTRCL ROUTINES 

Resident Operatcr Control Module (Chart CA) 
Module Name: IEDCCA 
Entry Points; 

• TEEOCA01 - activated by OS when Operator Control is attached. 

• TEEOCA02 - activated by the transient operator ccntrcl routines 
when a field in an input operatcr control command needs to be 
scanned. 

^unctions : This module defines the Operatcr Control AVT and qives 
control f to the initial load of the Operatcr Contrcl ccntrcl module 
(IGC0010D) for command processinq. 

At the IEEQCA01 entry point cf the Resident Operator Control 
module, the module puts an entry code cf 1 in reqister to indicate 
to TGC0010D that Operator Control has lust been attached and 
initialization functions must be performed. At the IEEQCA02 entry 
point, the module puts an entry code of 4 in reqister to indicate 
that an input command needs to be scanned. The Resident Operator 
Control module activates TGC0010T* by issuinq the TCPCTL macro. The 
TOPCTI macro expansion issues SVC 104, which loads IGC0010D. 
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If Operator Control has -just been attached and, upon return from 
the Operator Control control module, closedown is in proqress, the 
resident module returns immediately to OS. If, however, Operator 
Control has iust been attached and closedown is net in progress, this 
module ensures that all input operator control commands are processed 
before returninq to OS. 

External Foutine; SVC 104 - the TOPCTL macro - to activate the 
Operator Control control module - load (TGCOOIOT) for command 
processinq. 

Tables/Work Areas: AVT, Operator Control AVT. 

Attributes: Resident, serially reusable, refreshable, enabled. 

Operator Control Control Module - load (Chart Z1) 

Module Name: IGC0010D 

Entry Point : IGCC010D - activated by IEDQCA, IGC0210D, TGC0410D, or 
from a subroutine within its own CSECT to process an operator control 
command. 

^unctions: The specific functions of this nodule depend en the entry 
code that is passed as input in reqister 0. If the entry code is 
equal to one, the Operator Control Control Module - load performs 
operator control initialization functions. The module builds an 
Operator Control ECE in the AVT and then issues an OS WAIT for an 
operator control command to be tposted to the Operator Control QCB. 
When the WAI^ is satisfied, this module puts an entry code of 1 in 
reqister 11 and then issues an XCTI to IGC0110D, which beqins 
processinq the command. 

If the entry code is equal to 2, this control module puts an enltry 
code of 4 in reqister and executes itself as a subroutine to scan 
for the next field in the input command. If the command contains an 
t'O'E or an EOT, which implies that the command was net followed by a 
blank, or if the end of the field or data is reached, the module sets 
the "last field" indicator and returns to the callinq routine. 

If the entry code is equal to 3, this module first scans the input 
command for fields that specify a terminal name, a DDNAME, an absolute 
address, a relative line number, ONTP , or CEFTP. The control module 
checks the validity of the format of the fields; and if no errors are 
detected, sets reqister 15 equal to X'OO*. If errors are detected, 
the module puts X , 02» in reqister 15. The control module then returns 
to the callinq routine. 

If the entry code is equal to 4, the Operator Control Control 
Module - load scans the input command for a field that is terminated 
by the end of the the input, an EOB or EOT, 8 characters, or a valid 
delimiter. If the module finds a blank in the command, the module 
sets the "last field" indicator. When the module finds a field- 
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terminating condition, it saves the scanned field in the Operator 
Control AVT, puts the number of bytes scanned in register 15, and 
returns to the calling routine. 

External Routine: OS Wait routine (SVC 1) - to wait for an input 
operator control command. 

Tables/Work Areas; AVT, buffer. Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient. 



Operator Control Control Module - load 1 (Chart Z2) 

Module Name: IGC0110B 

Fntry Point: TGC0110D - activated by IGC0010D, IGC0210B, IGC0310D, or 
IGC0410D to continue processing an input operator ccntrcl command. 

Functions: The specific functions of this module depend on the entry 
code that is passed as input in register 11. If the entry code is 
egual to one, the Operator Control control module - Load 1 prevents 
any further gueuing of operator control commands when closedown is in 
progress. If a restart is in progress, this module performs the 
command processing defined for an entry code of 2; otherwise, the 
module performs the processing defined for an entry code of 3. 

If the entry code is egual to 2, this ccntrol module saves the 
checkpoint element for this reguest and leads and gives ccntrcl to the 
appropriate operator control functional processing module or modules. 
Upon return from the last necessary processing module, the control 
module deletes the processing module,, puts an entry code of 1 in 
register 11, and transfers control to IGCC310D for further command 
processing. 

If the entry code is egual to 3, this ccntrol module processes 
only commands from the system console. When a valid verb, other than 
START, STOP, or HAIT is found, this module puts an entry code of 1 or 
2 in register 11 and passes ccntrol to TGCC210D for further command 
processing. For a HALT command, this module performs the processing 
defined for the entry code 2. For a START or STOP verb or if 
closedown is in progress, this module dequeues a new input operator 
control command and starts the entry code 3 processing again. If this 
module finds an invalid verb in the command, the module passes control 
to IGC0310D with an entry code of 3 in register 11. 

If the entry code is egual to 4, restart is in proqress and this 
module checks fcr the next restart command. If there is no other 
command or if closedown is in progress, this module returns to the 
calling routine.. If there is another command that is from an 
application program or On-Line Test and the command is valid, this 
module branches to the code for an entry code of 2. If there is 
another command from an application program and the command is 



invalid, this irodule puts an entry code cf 3 in register 11 and exits 
to TGC0310D. Otherwise, the command is from a terminal and this 
module puts an entry code of 1 in reqister 11 and passes control to 
IGC0410D. 

External Routines: 

• OS OEDIT routine - to prevent queuinq further operator control 
commands . 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator* 

• CS Load routine (SVC 8) - to lead an operator control processing 
routine. 

• OS Delete routine (SVC 9) to delete the operator control 
processing routine from main storaqe. 

• Operator Control Processing routines - to perform specific 
functions requested by an operator control command. These 
routines are IEDQCE, IEDQCG, TEDQCH, IEDQCI, IEDCCJ, IEDQCK, 
IEDQCL, IELQCM, IEEQCN, IEEQCO, IEDQCP, IEBQCO, IEDCCU, IEDQCV, 
IEDOCW, IEIQCX, IEEQCZ, IErCCO, TIBQC1, TEEQC2, TEDQC3, and 
TED0C6. 

Tables/Work Areas: AVT, buffer, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient. 



Operator Control Control Module - lead 2 (Chart Z3) 

Module Name: IGC0210D 

Entry Point : IGCC210D - activated by TGC0110D or IGC0410E to continue 
processinq operator control commands. 

^unctions: The specific functions cf this module depend upon the 
entry code that is passed as input in reqister 11. Tf the entry code 
is equal to 1, this module checks the format of VARY, HOLD, RELEASE, 
MODIFY, and DISPLAY commands. If the command is valid, this module 
puts an entry code of 2 in reqister 11 and exits to IGC0110D. For 
invalid commands, this module puts an entry code of 3 in reqister 11 
and exits to IGC0310D. 

If the entry code is equal to 2, this irodule checks the format of 
MODIFY and DISPLAY commands for valid operands. This module exits to 
IGC0110D with an entry code of 1 in reqister 11 and to IGC0310D with 
an entry code cf 3 in register 11 for invalid commands. 

External Routine : SVC 104 - the 10PCTL macro - to activate IGC0010E 
with an entry code of 2 to -get the next field in the command. 
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Tables/Work Areas : AVT, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient. 

Operator Contrcl Control Module - Load 3 (Chart Z4) 

Module Name: IGCC310D 

Entry Point : TGC0310D - activated by IGC0110D, IGC0210D, or IGC0410D 
to continue processinq an input operator control command. 

Functions: The specific functions of this module depend on the entry 
code that is passed as input in register 11. If the entry code is 
equal to 1 , this module processes checkpoint requests. This module 
builds a checkpoint request element and ttosts that element (via SVC 
102) to the Checkpoint QCB. Upon return, this module dequeues the 
request command and, for a terminal request, passes control to 
TGC0510P. For a request from the console or an application proqram, 
this module continues processinq as thcuqh the entry code is 2. If 
the request is canceled, this module passes control to IGC0410D with 
an entry code of 2. 

If the entry code is equal to 2 and the operator control command 
is from the system console, this module sends a WTO response, frees 
the CIB, puts an entry code of 3 in reqister 11, and exits to 
TGC0110D. For an entry code of 2 and a command from an application 
proqran or On-line Test, this module OS FCSTs the ECE, puts an entry 
code of 1 in reqister 11, and exits to IGC0110D. 

If the entry code is equal to 3, this mcdule qenerates an error 
messaqe for an invalid command. If the invalid command is from the 
MCP, this module exits to TGC0510D, which builds the output messaqe. 

Fxternal Routines: 

• IGC102 - AQCTL SVC 102 routine - to pest an ECE or tpost an 

element in the MCP. 

• OS Wait routine (SVC 1) - to wait for an element from checkpoint. 

• OS WTO routine (SVC 35) - to send a messaqe to the system 
operator. 

• OS Delete routine (SVC 9) - to delete an operator control 
processinq routine from main storaqe. 

• OS OEDIT routine - to free the CIB. 
Tables/Work Areas: AVT, buffer. Operator Ccntrol AVT. 
Attributes: Serially reusable, refreshable, enabled, transient. 
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Operator Contrcl Control Kodule - Load 4 (Chart 2^) 

Module Name: IGCC410D 

wintry Point: TGC0410D - activated by IGC0110D, IGC0310D, or IGC0510D 
to continue processinq operator control commands. 

^unctions: The specific functions of this module depend on the entry 
code passed as input in reqister 11. If the entry code is equal to 1, 
this module calls IGC0010D to scan an operator control command from a 
terminal to determine whether the command has been canceled. If the 
command is canceled, no further processinq is performed and this 
module exits to TGC0310D. If the command is not canceled and is a 
HALT command, this module exits to TGC0210D with an entry code of 2 in 
reqister 11. If the command is net canceled and is net a HALT 
command, this module exits to IGC0110D. 

If the entry code is equal to 2, this module determines the source 

of the command. For a command frcm a terminal, this module passes 

control to the code for an entry code of 3. Otherwise, this module 
puts an entry cede of 2 in reqister 11 and exits to IGC0310D. 

Tf the entry code is equal to 3, this module performs the 
processinq necessary to complete sendinq a response messaqe. If 
closedown is net in proqress, this module puts the destination for the 
response in the buffer, updates the SCB, puts a code of 1 in reqister 
11, and exits to IGC0110E. Tf closedown is in prcqress or if the 
terminal is net connected, this module puts the entry code (1) in 
reqister 11 and exits immediately to IGC0110D. 

External Boutines: 

• SVC 102 - AQCTL SVC 102 routine - to tpest the response messaqe to 
the Buffer risposition QCE. 

• SVC 104 - the TOFCTL macro - to activate IGC0010D. 

• OS Delete routine (SVC 9) to delete an operator control 
processinq routine from main storaqe. 

Tables/Work Areas: AVT, buffer, ICE, SCE, Operator Control AVT. 

Attributes : Serially reusable, refreshable, enabled, transient. 



Operator Contrcl Contrcl Module - Load 5 (Chart Z6) 

Module Name: IGCC510D 

Entry Point: IGC0510D - activated by IGC0310D to tuild a response 
messaqe for the MCP. 
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Functions; The purpose cf this module is tc build an output response 
messaqe that is tc be sent to the MCP. This mcdule determines whether 
the input buffer is larqe enouqh to contain the output messaqe, and if 
it is not, obtains enouqh additional units to hold the messaqe. This 
module calculates the required output size by adding the prefix size 
to the lenqth. of the output data. The module multiplies the number of 
input buffers times the buffer lenqth and then compares the result to 
the outDUt messaqe lenqth. If the output messaqe is not lcnqer, this 
module puts the messaqe in the buffers and exits to IGC0410D. 

If the output messaqe is lonqer than the input buffer size, this 
module subtracts the buffer lenqth from the output lenqth and then 
divides the result by the number cf bytes in a unit to qet the number 
of additional units required. This module builds an EBB with the 
required unit count, uses SVC 102 to tpost the ERE to the Buffer 
Request OCE, and issues an OS WAIT to allow time for the request to be 
satisfied. Upon return, this module links the new units tc the input 
buffer, puts the messaqe in the buffer, and exits to IGC0410D. 

External Routines: 



* TGC102 - ACCTL SVC 102 routine - to tpcst an EBB to the Buffer 
Request OCE in the MCP. 

• OS Wait routine (SVC 1) - to wait for the EBB request to be 
satisfied. 

Tables/Work Areas: AVT, buffer, ERE, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 



TCAM Command Scheduler - SVC 34 (Chart N?) 

Module Name: IGC1303D 

Entry Point: IGC1303D - activated when an .SVC 34 module recoqnizes a 
command with a TCAM keyword operand. 

^unctions: The TCAM Command Scheduler builds a Command Input B'lock 

(CTB) for any operator control command entered from the system 

console. The commands are VARY, HOLD, REIEASE, DISPLAY, MODIFY, and 
HALT. 

The TCAM Command Scheduler first issues a GETMATN macro to obtain 
an area in which to build the CTB. After the CIE is built, the 
routine issues a CEDIT macro, which puts the CIB into the CIE chain. 
The scheduler then posts the ECB pointed to by the first word of the 
Communications Parameter List, so that Operator Control can be 
activated and exits to the address in reqister 14. If the return code 
from QEDIT indicates that the CIE limit has been reached, the 
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scheduler issues a FPEEWAIN for the CIB, reiects the operator control 
command, and issues an indicative error messaqe to the system console 
by exiting to IGC0503D. 

The TCAM command Scheduler also exits to IGC0503D to issue an 
error messaqe if there is no TCAM MCP in the system or if the GETMAO 
for main storaqe is unsuccessful. 

External Foutines: 

• OS Getmain routine (SVC 4) - tc obtain main storaqe. 

• OS "Freemain routine (SVC 5) - to release main storaqe. 

• OS OEDTT routine - to put the CIE in the CIB chain. 
Tables/Work Areas: Extended save area, CVT, CIE, AVT. 
Attributes: Feentrant, supervisor mode, transient. 



Modify Options Pontine (Chart CE) 

Module Name: TEE-QCE 

Entry Point: lEEOCP - loaded by the Operator Control control module 
to process ETSPLAY OPTION and WCDTEY CPTTCfl commands. The command 
that caused this routine to be activated is one of the follcwinq: 

T control chars! ( MODTEY I ident,OPT=statname,opf ldname, data 
T control charsl (DISPLAY) TP,OPTTCN,statname ,opf Idname 

1 D ] 

Eunctions: This routine processes operator control commands that 
request display or modification of terminal option fields. 

The Modify Cptions routine first leads its work area (IED0C5) , 
which is used as a conversion area for both the modify and display 
functions. The routine serially searches the Termname Table for an 
entry that matches an entry specified in the common input block, which 
is passed as input to the routine. If a matchinq entry is not found 
in the Termname Table, the routine prepares an error messaqe (IED016I) 
and returns control to the Operator Control control module. 

If a matchinq entry is found, the Modify Options routine serially 
searches the Option Characteristics Table for the option field 
specified in the MODTEY or DISPLAY command. If no option is found, 
the Modify Options routine prepares an error messaqe (IED034T) and 
returns control to the control module. When there are no cptions for 
the terminal entry, the ^FMOPTEN field is set off in the TFMSTATE 
control table. 
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If the option field specified in the MCDTFY or DISPLAY command is 
not defined for the terminal entry, the routine prepares an error 
message (TEP034I) and returns control to the Operator Control control 
module. If the specified option is defined, the Modify Option routine 
obtains the address of the option field and tests the input to 
determine whether the command is a DISPLAY cr a MODIFY command. 

If the command is a MODIFY, the Modify Options routine qives 
control to the Operator Control Scan subroutine (IEEQCA02) by 
branching to the OPCSCAN entry point in order to obtain the 
replacement data. On return, if there is nc data or if end-of-message 
was reached before the end of the field, the routine prepares an error 
raessaqe (TE0C1EI) and returns control to the control module. 
Otherwise, the Modify Options routine places the replacement data in 
the work area (TEDQC5) . 

Tf the option field type definition does not match the replacement 
data; for example, the field is in decimal notation and the data is in 
character representation, the routine prepares an error message 
(TED056I) and returns control to the Operator Control control module. 
Also, if a hexadecimal data field contains invalid characters, the 
Modify Options routine prepares an error message (IED077I) and returns 
control to the control module. 

The Modify Options routine normally places character data in the 
option field of the MODIFY command, and converts decimal and 
hexadecimal fields from EBCDIC to the correct format and stores the 
new values in the option field. If the new fields are larger than the 
option field, the routine does not store the fields, but prepares an 
errror message (IED062I) and returns control to the control module. 
After the new data has been placed in the option field of the MODIFY 
command, the Modify Options routine prepares a response message 
(TED050I) and returns control to the Operator Control control module. 

If the command is a DISPLAY command, the Modify Options routine 
places the option field of the command in the work area (IECQC5) . If 
the data format is characters and the option field is all blanks, the 
routine Places the characters 'ALL BLANKS' into the response message 
(IED035I) . Since no conversion is required for character data, the 
routine prepares a response messaqe (IED035I) and returns control to 
the control module. For decimal or hexadecimal representation in the 
option field, the routine determines whether the field contains zero. 
If the data is zero, the routine prepares a 'data is zero' message 
(IED035I) and returns control to the control module. If there is data 
in the option field, the routine converts the data into a printable 
format, prepares a message response (IFDC35I) and returns control to 
the Operator Control control module. 

On entry to the Modify Options routine, the address of the 

Operator Control AVT is passed in register 1. The common input block 

is located at the label OPCCKELE. The fields in the common input 
block that this routine uses are the following. 
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Offset 


Field- Name 


+ 8 


CFCTNME 


+ 18 


OPCFLG 



+ 24 OFCOPFLD 

External Boutines : 



Field Description 
Name of the terminal 
X'80 1 for DISPLAY command 
X'40' for MODIFY command 
Name of the option field 



TFDOCA - Besident Operator Control module - the Operator Control 
Scan subroutine (IEDQCA02) , tc serially search the Termname Table 
and option field CSFCT. 



OS Load routine (SVC 8) 



to load the IEDCC5 work area. 



Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and space for insertion of variable data, AVT, 
^ermname Table, Terminal Table entry. Operator Control AVT, buffer, 
translate tables. 



Attributes: Serially reusable, refreshable, enabled, 
problem program mode. 



transient, 



Copy Line Information Boutine (Chart CG) 

Module Name: IEDCCG 

Entry Point : IEDQCG - loaded by the Operator Control control module 
to process DISPLAY ADDB commands. 

functions: This routine processes operator control commands that 
request display of the line address and relative line number for a 
specified terminal. The command that caused this routine to be 
activated is as fellows: 



r control chars! 



DISPLAY 
D 



TP, ADDB ,statname 



The Copy Line Information routine finds the Termname Table throuqh 
the AVT and serially searches for the entry that matches the one 
specified in the common input element. If a matching entry in the 
Termname Table cannot be found, the routine constructs an error 
messaqe (IED016I) and returns to the control module. 

When a matchinq entry in the Termname Table is found, the Copy 
Line Information routine places the terminal name in a response 
messaqe (IEDC38I) and obtains the address of the corresponding entry 
in the Terminal Table. If the entry is a process entry (bit 2 is on 
in TBMSTATE) , the entry has no line information, the fact of which is 
noted in a messaqe response (IED090I) and the routine returns control 
to the control module. 

At this point, the Copy Line Information routine qets the QCE 
address from the terminal entry (TBMDESTQ) and places its relative 
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line number (after it is converted to printable EBCDIC) in the 
response messaqe (TED038I) . The routine obtains the address of the 
DCB from the QCE (OCBDCEAD) and determines whether the line attached 
to the terminal has been opened. If the line is not open, the routine 
prepares an error messaqe (IED091I) and returns control to the control 
module. The line is now checked to determine whether an open idle 
condition has occurred (DEBUCBAD is zero) . If so, the routine 
prepares an error messaqe (IED091I) and returns control to the 
Operator Control control module. 

If the line is open, the Copy Line Information routine places the 
address of the UCE in a response messaqe (TED038I) . Then the routine 
qets the TCB address from the AVT (AVTTCB) and uses it to find the 
Task I/O Table (TIOT) address at the location TCB+12. The routine 
adds the DCETIOT value to the TIOT startinq point, moves the ddname 
field from the resultinq location into the response messaqe (IED038I) , 
and returns control to the control module. 

On entry to the Copy Line Information routine, the address of the 
Operator Control AVT is passed in reqister 1. The common input block 
is located at the label OPCCKELE. The routine uses only the OPCTNAME 
field to qet the terminal name from the common input block. 

External Poutines: None. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response and space for insertion of variable data, AVT, DEB, DCB, QCB, 
Termname Table, Terminal Table entry, Operator Control AVT* 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 



Copy Terminal Information Poutine (Chart CH) 

Module Name: IEDCCH 

Entry Point: TEDOCH - loaded by the Operator Control control module 
to process DISPLAY TEPM commands. The command that caused this 
routine to be activated is as follows: 

r control chars! j DISPLAY I TP,TEPM ,statname 

I D J 

Functions: This routine processes operator control commands that 
request display of the fields in a specified terminal entry. 

The Copy Terminal Information routine obtains the Termname Table 
address from the AVT and serially searches it for the name that 
matches the one specified in the common input block. If the matchinq 
name cannot be found, the Copy Terminal Information routine prepares 
an error messaqe (IED016T) and returns control to the control module. 
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T tfhen a name match is found, the Copy Terminal Information routine 
qets the Terminal Table entry address and places the terminal entry 
name in the response messaqe (IED033I) . The routine converts the 
input and output sequence numbers (from TEMINSEO and TBMOUTSQ) to 
printable characters and places them in the T1D033I messaqe. 

If the terminal entry is net a process entry (bit 2, X^O 1 , in 
TBMSTATE is net turned on) , the routine qets the intensive mode search 
table, converts the sense data (TPMSENSE) to printable information, 
and places it in the TED033I messaqe. If the entry is a process 
entry, the routine places the characters TtfTENSE=NC in the IED033I 
messaqe. 

Finally the Copy Terminal Information routine qets the status byte 
(TESTATE) , places the printable equivalents of its bit values in the 
IED033I messaqe, and returns contrcl to the Operator Control control 
module. 

On entry to this routine, reqister 1 contains the address of the 
Operator Control AVT, from which the ccirmcn input block can be 
obtained. The name of the requested terminal is located in the 
checkpoint element in the CPCTNME field of the common input block. 

External Routines: Hone. 

^ables/Work Areas; Work areas that contain the fixed portion of each 
response messaqe and space for insertion of variable data, AVT, CIB, 
Termname Table, Terminal Table entry, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 



Copy ICB Information Routine (Chart CI) 

Module Name: IEDCCI 

Entry Point: IEDOCI - loaded by the Operator Contrcl control module 
to process DISPLAY LINE commands. The command that cuased this 
routine to be activated is as follows: 

T control chars! i DISPLAY ) TP,LINE, ddname,rln 

j D I address 

^unctions: This routine processes operator control commands that 
request display of the LCB fields for a specified line. 

The Copy LCE Information routine determines whether the input 
command format specifies the line in the DDNAME/FLN or hardware 
address format by checkinq the common input block, which is obtained 
from the Operator Control AVT - the address of which is passed in 
reqister 1. If DENAME/ELN is specified and if the relative line 
number is specified as ALL, the routine rejects the input command, 
because the relative line number may provide information for a sinqle 
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line only. If the relative line number is not specified as ALL, the 
routine converts the relative line number to hexadecimal (for internal 
TCAU use) and determines whether the result is zerc or greater than 
255, the maximum relative line number allowed. 

Tf the relative line number is zero or greater than 255, the Copy 
LCB Information routine reiects the command, prepares an error message 
(IED019I), and returns control to the Operator Control control module. 
If the relative line number is valid, the routine qets the address of 
the TCB from the AVT (AVTTCB) , finds the TIOT via the TCB, and 
determines the offset into the TIOT for the DDNAME that was specified 
in the input command. 

When both DENAME/BLN and hardware address formats have been 
specified in the input command, the Copy ICE Information routine gets 
the starting address of the DEB chain from the TCB and locates the 
first DCP (DEEDCEAD). If the DCB is not for a TCAM line (DSORG does 
not egual X'HO 1 ), the routine gets the next DEE in the chain 
(DEBDEBAD) and examines that DCB. If there are no DEEs that have 
associated TCAP ECBs, the routine prepares an error messaqe (IED017I) 
and returns control to the control module. 

If the input command format is DDNAME/FIN, the routine compares 
the TIOT offset in the DCB , (DCBTIOT) to the one calculated in 
searching the TIOT. If the offsets are not egual, the routine gets 
the next DEB and makes the comparison again. When the correct DCB has 
been located, the routine determines whether the associated UCE 
(DEBUCBAD) is zerc (implyinq an open idle condition has occurred) . If 
the UCB is zerc, the routine reiects the input command, prepares an 
Q rror message (IED018T), and returns ccntrel to the control module. 
If the line specified in the input command is open, but its relative 
line number is greater than the number of lines in the line group, the 
routine reiects the command, prepares an error message (IED018I), and 
returns control to the ccntrel module. 

If a hardware address was specified in the input command, the Copy 
LCB Information routine gets the UCB from the DEB (DEBUCBAD) and 
compares it to the specified address. If the UCB is not the one 
associated with the DEB, the routine gets the next DEB and makes the 
comparison again. 

Eor both DDNAME/RLN and hardware address formats, once the DCB 
address has been verified, the routine determines whether the line has 
been opened. Tf the line is not open, the routine prepares an error 
message (TED017I) and returns control to the control module. If the 
line is open, the routine determines the address of the LCB from the 
DCB (DCBIOBAD + (ECEFIOBX x rln) - IOB length). Then the routine gets 
the LCB status byte and determines whether any bits are on. If there 
are some bits on, the routine uses the status conversion table to 
convert the values tc printable data and places the result in a 
response message (IED032T) . If no bits are on, the routine places the 
characters 'NO BITS ON 1 in the response message (IED032I) . Next, the 
routine gets the SCB from the LCB, converts the error word to 
printable data by using the error conversion table, and places the 



result in the response messaqe (TED032T) . If there are no bits on in 
the error word, the routine places the characters 'NO EITS ON 1 in the 
response messaqe (IED032I) .. The Copy LCB Information routine returns 
control to the Operator Control control module. 

On entry to this routine, reqister 1 contains the address of the 

Operator Contrcl AVT from which the common input block can be obtained 

at the label OPCCKELE. The Copy LCB Information routine uses only the 

first sixteen bytes of the common input block, the format of which is 
as follows. 




+ 5 
+ 8 



Field Name 

OPCCKELE 

CPCLEN 



OPCBLN 
OPCTNME 



Field Description 

Address of the common input 

Lenqth cf the relative line 

If X»00» - ALL 

If X' 80' - Ho rln 

1ECDIC relative line number 

DENAME or hardware address 



block 
number 



External Routines: None. 

Tables/Work Areas : Work areas that contain the fixed portion of each 
response messaqe and space for insertion cf variable data, AVT, LCB, 
DCB, DEB, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 

Copy OCB Information Routine (Chart CJ) 

Module Name: TEECCJ 

Entry Point: IEDOCJ - loaded by the Operator Contrcl control module 
to process DISPLAY OUEUE commands. The command that caused this 
routine to be activated is as follows: 

T control chars! DISPLAY TP, QUEUE, statname 

D 

^unctions: This routine processes operator control commands that 
request the display of the OCB fields for a specified terminal. 

The Copy OCB Information routine locates the Termname Table from 
the AVT and serially searches it for an entry that matches the one 
specified in the common imput block, the location of which is 
specified in the Operator Control AVT - the address of which is in 
reqister 1. If a matchinq entry cannot be found, the routine prepares 
an error messaqe (IED016I) and returns contrcl to the Operator Control 
control module. 

If the terminal entry is found, the Copy CCB Information routine 
qets the address of the OCB from the entry (TBMDESTQ) and the address 
of the DCB from the OCB (QCBDCBAD) , and checks to determine whether 
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the DCB has teen opened. If the BCB is net open, the routine reiects 
the input command because there is no queue status. The routine 
prepares an error message (IED091I) and returns control to the control 
module. If the DCB is open, the routine uses the address of the DEE 
(DCBDEBAD) to check the DCB address (DEBTJCEAD) . If the UCB address is 
2ero, a line open idle condition has occurred, and the line is 
considered to be not open. The routine rejects the input command, 
prepares an error message (IED091I), and exits to the control module. 

tf the line is open, the Copy QCE Information routine gets the 
number of messages en the queue, converts it to a printable number, 
and places the result, along with the terminal name, in a response 
message (TED031I) . The routine gets the status field (QCBSTAT) from 
the OCB, converts the status data to printable equivalents, and places 
the result in the response message (IED031I) . If no status bits are 
on, the routine places the characters 'NO BITS ON 1 in the response 
message (IEBO 311) . 

The Copy CCE Information routine obtains the first priority QCB 
associated with the master QCE, converts it to a printable number, and 
places it in the response message (IED031T) . -If there are more 
priority QCBs, each one is converted and the printable eguivalent is 
placed in the response message (IEB031I) . The routine returns control 
to the Operator Control control module. 

On entry to this routine, register 1 contains the address of the 
Operator Control AVT, which contains the common input block that 
points to the label OPCTNME. This label is the name of the terminal 
for which QCB values are to be displayed. 

External Routines: None. 

Tables/Work Areas; Work areas that contain the fixed portion of each 
response message and space for insertion of variable data, AVT, 
Termname Table, Terminal Table entry, QCE, Operator Control AVT, DCB, 
DEB. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem program mede. 



Copy Held Terminals Eoutine (Chart CfO 

Module Name: IEDQCK 

Entry Point: IEDOCK - loaded by the Operator Control control module 
to process DTSPIAY INTER commands. The command that caused this 
routine to be activated is as follows: 

("control chars! .^DISPLAy[ TP, INTER 

D 



Functions: This routine processes operator control commands that 
request display of the list of terminals that are currently beinq 

held. 

The Copy Held Terminals routine qets the address of the Terminal 
Table from the AVT and then steps throuqh the table to test each entry 
to determine whether it is beinq held (intercepted) . If it is a 
process entry (X^O 1 is on in TBMSTATE) , it cannot he held. If an 
entry is beinq held, the routine sets a bit to indicate an entry found 
and places the name of the entry in a list. When the end of the 
Terminal Table is reached, the routine tests the bit to determine 
whether any entries were held. If no entries are held r the routine 
returns a response messaqe indicatinq this to the control module. If 
the bit is set, the routine places the list of entries in a response 
messaqe and returns to the control module. 

External Eoutines: None. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and. space for insertion of variable data, AVT, 
Termname Table, Terminal Table, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 



Copy Invitation list Entry Boutine (Chart CI) 

Module Name: IEECCL 

Entry Point: TEDCCL - loaded by the Operator Control control module 
to process DISPLAY ACT and DISPLAY INACT commands. The command that 
caused this routine to be activated is as fellows: 

r control charsl j DISPLAY I TP,( ACT ) A ddname,rln [ 

D \ j INACTi j address \ 

Functions: This routine processes operator control commands that 
request display of a list of either the active or the inactive 
terminals for a qiven line. 

The Copy Invitation List Entry routine determines whether the 
ddname/relative line number format or the hardware address format is 
specified in the common input block. The routine issues an error 
messaqe (IED018I) and reiects the command if it is a ddname/relative 
line number and the relative line number specified is ALL, because the 
Copy Invitation List Entry routine displays data only for a sinqle 
line. If the relative line number is not ALL, the routine converts 
the relative line number to a hexadecimal value. If this value is 
zero or is qreater than 255, the routine reiects the command due to an 
incorrectly specified relative line number, sends the messaqe 
(TED018I), and exits to the Operator Control Control module. If the 
relative line nuirber is valid, the Copy Invitation List Entry routine 
obtains the TCP address from the AVT and serially searches the TIOT 
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(at TCB + 12) for a ddname matchinq that specified. If it finds no 
match, the routine builds an error messaqe (IED017I) and returns 
control to the control module (IEDQCA) . When it finds a match on the 
ddname, the Copy Invitation List Entry routine saves the offset into 
the TIOT. 

"Por roth input formats, the Copy Invitation List Entry routine 
obtains the start of the DEB chain from the TCB (TCE + 8) . The routine 
tests the DCB for each line to see if it is a TCAM line ECB (DSORG of 
X'40M and if it is not r it finds the next DEB (from DEEEEEAD field of 
the DEB) . If the routine reaches the end cf the DEB chain before it 
finds a valid ECB, it builds an error messaqe (IED017I) and returns 
control to the control module (IEDQCA) . 

If the command was specified in the ddname/relative line number 
format, the Copy Invitation List Entry routine compares the offset 
into the TIOT (DCETIOT) to the one it computed above. If they are not 
equal, the routine obtains and tests the next DEB- When it finds the 
proper DCB, the routine tests the LCB address in the DEB (DEBUCBAD) 
for zero, implyinq line operand dd dummy. If the UCB address is zero, 
the Copy Invitation List Entry routine builds an error messaqe 
(TED017T) and returns control to the ccntrcl module (IEDQCA) . If the 
computed relative line number is qreater than the number of lines in 
the line qroup (found in the DEENMEXT field of the DEE) the routine 
reiects the command, builds an error messaqe (IED017I) , and returns 
control to the control module. 

If the hardware address format was specified, the Copy Invitation 
List Entry routine compares the input address to the UCBs associated 
with the DEB. The routine then tests the DEB chain as above until it 



When the Copy Invitation List routine obtains the proper DCB for 
either format, it tests the DCB to see if it is open. If it is not 
open, the routine builds an error messaqe (IED017I) and returns 
control to the control module. If the line is open, the routine 
obtains the invitation list address from the DCBINVLI field of the 
DCB. The routine then serially searches the invitation list for each 
active or inactive entry in the list. The routine obtains the 
terminal name for each appropriate entry in the list from the Termname 
Table and places that name in a response messaqe (IED036I or IED037I) . 
When it reaches the end of the list, the Copy Invitation List Entry 
routine places the line name in the response messaqe and returns 
control to the Operator Control ccntrcl module. 

External Poutines : None. 

Tables/Work Areas; Work areas that contain the fixed portion of each 
response messaqe and space for insertion cf variable data, CIB, DEB, 
DCB, Termname Table, AVT, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem prcqram mode. 
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Copy Operator Control Terminal Routine (Chart CM) 

Module Name: IEPCCM 

Entry Point: IEIQCM - leaded by the Operator Control control module 
to process DISPLAY PPITERM and DISPLAY SECTEBM commands. The command 
that caused this routine to be activated is as follows: 

("control! {DISPLAY} TP r JPPITERM/ 
D J JSECTERmJ 

Functions: This routine processes operator control commands that 
request display of the primary operator control terminal or the list 
of secondary operator control terminals. 

The Copy Operator Control Terminal routine locates the Termname 
Table from the AVT and checks the common input block, the location of 
which is obtained from the Operator Control AVT, the address of which 
is in reqister 1 , to determine the type of input command. The OPCELG 
field contains X'80' for the primary operator control terminal and 
X'UO* for any secondary operator control terminals. If the primary 
operator control terminal is to be displayed, the routine qets the 
terminal offset from the AVT (AVTOPCON) and determines whether it is 
zero (indicates the system console). If the offset is zero, the 
routine places the name SYSCON in the response messaqe (IED041I) and 
returns control to the Operator Control control module. If the offset 
is not zero, the routine adds the offset to the start of entries in 
the Termname Table. The name at the resultinq address is placed in a 
response messaqe (IED041I) , and control returns to the control module. 

If the list of secondary operator control terminals is to be 
displayed, the Copy Operator Control Terminal routine examines each 
entry in the Terminal Table. If an entry is for a secondary operator 
control terminal (TRMSCNYN on in TRMSTATE) , its name is placed in the 
list to be returned as a response (IED043T SECCNDARY=statname) . After 
all entries have been checked, the routine returns the list to the 
control module. 

External Routines: None. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and space for insertion of variable data, AVT, 
Termname Table, Terminal Table entry. Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 
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Change Control Terminal Poutine (Chart CN) 

Module Name; IEDCCN 

Entry Point; I1DQCN - loaded by the Operatcr Control control module 
to process MODIFY OPFFATOP commands. The command that caused this 
routine to be activate' 1 is as follows: 

Tcontrol charsl (modify/ ident ,OPEEATOP=lstatname I 

| F J JSYSCCN I 

Functions: This routine processes operator ccntrcl commands 
requesting that the primary operator control terminal fce changed to 
the terminal specified in the command. 

The Change Control Terminal routine first checks the common input 
block, the location of which is obtained from the Operator Control 
AVT, the address of which is in register 1, to determine whether the 
specified primary terminal is the system console. If it is, the 
routine compares the primary terminal offset in the AVT (AVTOPCON) to 
zero. If the offset is zero (the system console is already primary) , 
the routine prepares a response message (IED042I) and tranches to the 
Operator Control control module. 

If the system console is not already primary, the AVTOPCON field 
is set to zero. If the Operator Awareness Message Pouter routine 
(IEDONX) is present in the TCAM system (AVTNX is not egual to zero) , 
the Change Control Terminal routine deletes the Operatcr Awareness 
Message Router routine and sets the AVTNX field in the AVT to zero. 
Then the routine prepares a response message (IED041I) and returns 
control to the control module. 

If the offset of the primary terminal specified in the common 
input block is not zerc r the Change Control Terminal routine finds the 
Termname Table from the AVT and serially searches it for an entry to 
match the one specified in the common input block. If there is no 
matching entry, the routine prepares an error message (IED016I) and 
returns control to the ccntrcl module. If a matching entry is found, 
the routine checks to determine whether it is a valid secondary 
terminal (TPMSCNYN is on in TFMSTATE) . If it is not valid, the 
routine prepares an error message (IED044I) and returns ccntrcl to the 
Operator Control control module. 

Once the matching entry has been located, the Change Control 
terminal routine compares the terminal cffset from the beginning of 
the Termname Table to the contents of the AVTOPCON field in the AVT, 
and if they are the same, the terminal is already a primary terminal. 
The routine prepares a response message (IEE042I) and exits to the 
control module. If the offset and AVTOPCON are not the same, the 
routine places the new offset (of the matching terminal found) in the 
AVTOPCON field and determines whether the Operator Awareness Message 
Pouter routine is present (AVTNX is net egual to zero). If it is not 
in the system, the Change Control Terminal routine loads the Operator 
Awareness Messaqe Pouter routine, stores its address in the AVTNX 
field of the AVT, prepares a response message (IEE041T) , and returns 
control to the Operator Control ccntrcl module. 



External Routines: 

•. OS Load routine (SVC 8) - to load the Operator Awareness Messaqe 
Pouter routine (IEDQNX) . 

• OS Delete routine (SVC 9) - to delete the Operator Awareness 
Messaqe Pouter routine (IEDQNX) . 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and space for insertion of variable data, AVT , 
Termname Table, Terminal Table entry. Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem prcqram mode. 



Change Terminal Routine (Chart CO) 

Module Name: IEDCCO 

Entry Point: IEDQCO ■- loaded by the Operator Control control module 
to process VARY TERMINAL commands. The command that caused this 
routine to be activated is as follows: 



T control chars 



1 |VARY\ termname, (CflTP W, E ) 
( V ) (OEETPJ I E / 



Functions: This routine processes operator control commands that 
request that a specified terminal be either activated or deactivated 
for enterinq, or for both enterinq and acceptinq. 

The Chanqe Terminal routine serially searches the Termname Table 
for an entry matchinq that specified in the common input block. If it 
does not find a match, the Chanqe Terminal routine builds an error 
messaqe (IED016I) and returns control to the Operator Control control 
module (IEBOCA) . 

When it finds a matchinq entry, the Chanqe Terminal routine tests 
it for a process entry (X^O* in the TRMSTATE field). If the entry is 
a process entry, it has no invitation list, and the Chanqe Terminal 
routine builds an error messaqe (IED090I) and returns ccntrcl to the 
control module. 

The Chanqe Terminal routine uses the QCE at TRMDESTQ in the 
^ermname Table to obtain the relative line number (QCBEELLN) and the 
DCE (QCBDCEAD) . The routine then tests the DCE for open status, and 
if it is not open the routine builds an error message (IED091I) and 
returns control to the ccntrcl module. 

The Chanqe Terminal routine qets the address of the DEE from the 
DCBDEBAD field cf the DCB and uses the DEB to find the UCB address 
(DEBTJCBAD) . The routine tests the UCB for zero. If it is zero, the 
line has been opened DDDDMMY, so the routine builds an error messaqe 
(IED091T) and returns to the ccntrcl module. 

Program Organization 347 



The routine uses the DCBTOBAD field of the DCB to find the LCB 
address and then tests the LCE for dial (the ICBBIAL tit is on in 
LCBSTAT2) . Tf the line is a dial line, the Chance Terminal routine 
builds an error message (IED088T) and returns to the control module. 
The Chanqe Terminal routine tests the line to see if it is stopped. 
Tf it is net stopped, the routine rejects the command, builds a 
messaqe (TFD089I) - and returns control to the centre! module. 

^he Chancre Terminal routine obtains address of the invitation list 
from the DCBINVLI field of the DCB. 

The routine tests the input block to determine if it contains a 
VAFY ON or CFF command. If it is en, the routine tests the invitation 
list to determine if all the entries are active. If the entries are 
all active the Chanqe Terminal routine builds a messaqe (IEE019I) and 
returns control to the control module. 

The Chanqe Terminal routine tests each entry in the invitation 
list to see if it is the entry for the terminal. If the entry is for 
the terminal and if it is not already active, the Chanqe Terminal 
routine swaps it from the inactive to its proper location in the 
active part of the list. The routine then sets a bit to indicate that 
the list was chanqed. When it reaches the end of the list, the Change 
Terminal routine tests this bit. If the tit is not en, the terminal 
is already active and the routine builds an "already active" message 
(TED019I) and exits tc the control module. If the bit is on, the 
routine builds a messaqe (IED020I) and returns control to the Operator 
Control control module. 

If the command is a VARY OFF, the Chanqe Terminal routine tests 
the invitation list for active status. Tf all the entries in the list 
are inactive, the routine builds a response message (IED025I) and 
exits to the control module. 

The routine tests each entry in the invitation list to see if it 
is an entry for the terminal. If it is for the terminal and if it is 
active, the routine swaps it from the active to the inactive side of 
the list, decrements the active count, and sets a bit to indicate that 
the list was changed. When the routine has examined all the entries 
in the list, it tests the bit. Tf the bit is off the terminal was 
already inactive, so the routine builds an "already stopped" message 
(TFD025I) and returns control to the control module. If the bit is 
on, the Chanqe Terminal routine builds a message (IED026I) and returns 
to the control module. 

External Routines: None. 

Cables/Work Areas: Work areas that contain the fixed portion of each 

response messaqe and space for insertion of variable data, AVT, 

Termname Table, Terminal Table entry, QCE, LCB, DEB Operator Control 
AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mede. 
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Alter Trace Status Routine (Chart CP) 

Module Name: IEDCCP 

Entry Point; IEDOCP - loaded by the Operator Control control module 
to process MODIFY TRACE commands. The command that caused this 
routine to be activated is as follows: 

T control charsl \ MODIFY) ident , TRACF=f ddname, rln[ (, ON 

F I J address J J OFF 

Functions: This routine processes operator control commands that 
request a chanqe of trace status for a specified line. 

The Alter Trace Status routine first checks the common input 
block, passed tc it from the Operator Control AVT, the address of 
which is in register 1, to determine whether the DDNAME/RLN or the 
hardware address format was specified in the input command. If DDNAME 
is specified, the routine determines whether RIN equals ALL; and if 
so, the routine reiects the command, prepares an error messaqe 
(TFD018TV, and returns control to the Operator Control control module, 
because trace can be altered only on a sinqle line basis. 

If the RIN is not ALL, the routine converts the RLN value to 
hexadecimal and determines whether the result is zero cr greater than 
255, the maximum value, either of which is invalid for a relative line 
number. The routine reiects the command, prepares an error message 
(IED018I) , and returns control to the control module. 

If the RLN is valid, the Alter Trace Status routine gets the 
address of the TCB from the AVT (AVTTCB) and serially searches the 
TIOT, the address of which is in the TCB, for the ddname specified. 
If no matching ddname is found, the routine prepares an error message 
(TFD017I) and exits to the control module. When a matching ddname is 
found, the routine saves the offset into the TIOT. 

For both EBMMF/RLN and address formats, the Alter Trace Status 
routine locates the DEB chain from the TCB and examines each DCB 
(DEBDCBAD) to determine whether it is a TCAM line DCB 
(DCBESORG=X«40M . If it is not a TCAM line DCB and if the end of the 
DEB chain has been reached, the routine prepares an error message 
(TED017I) and branches to the control module. 

For the DOAME/RLN format only, the Alter Trace Status routine 
comapres the TCAM line DCB's TIOT offset to the one just saved. If 
the offsets are not the same, the routine continues searching the DEE 
chain. When the correct DCB is found, the routine compares the 
relative line number to the number of lines in the line gijoup 

(DEBNMEXT) . If the relative line number is larger, the routine 
prepares an error message (IED017I) and returns control to the control 
module. The routine checks the line for an open idle condition 

(DEBUCBAD field is zero) , and if it has occurred, prepares an error 
message (IED017I) and exits to the control module. 



Program Organization 349 



Tor the address format, the Alter Trace Status routine compares 
each UCB associated with a DEB tc the address specified in the input 
command, and searches the DEB chain until a matching address is found. 

Once the correct DCB is found for either format, the Alter Trace 
Status routine checks the DCB for an open condition. If the DCB is 
not open, the routine prepares an error messaqe (IEE017I) and returns 
control to the control module. If the DCB is open, the routine 
calculates the ICE address from the DCB. Next, it checks the AVT for 
the presence cf a Trace Table (AVTPACE field is net zero) . If there 
is no Trace Table, the Alter Trace Status routine prepares an error 
messaqe (TED055I) and returns control to the control module. 

If a Trace Table is found and if a trace is tc te performed, the 
Alter Trace Status routine checks the trace bit. If it is already on, 
the routine prepares a response messaqe (IEr024I) and returns control 
to the contrcl mcdule. Otherwise, the routine turns en the trace bit 
(LCBTPACE in the ICBSTAT2 field of the LCB) , turns on a bit to 
indicate that a checkpoint is needed, prepares a response message 
(IED023I) , and returns control to the control module. 

If a trace is to be stepped and the ICE trace bit is net on, the 
routine prepares a response messaqe (TED030I) and exits to the control 
module. Otherwise, the Alter Trace Status routine turns the trace bit 
off, turns the checkpoint bit en, prepares a response messaqe 
(IED029I) , and returns control to the Operator Control control module. 

External Poutines: None. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and space for insertion cf variable data, AVT, LCB, 
DCE, DEB, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mede. 



Stop/Resume Terminal Transmission Routine (Chart CQ) 

Module Name: IEDC.CQ 

Entry Point: IEDQCQ - leaded by the Operator Control contrcl module 
to process HOLD and PELEASE operator control commands and PELEASEM and 
MPELEASE application proqram macros. The command that caused this 
routine to be activated is one of the follcwinq. 

("control chars! Wapy I termname, \ CNTP 

1 V ( 1 CFFTP 



r control chars! (HOLD ] TP=statname 

H 
PELEASE 
A 
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Functions: This routine processes operator control commands 
requestinq that a specified terminal be prevented from acceptinq 
messaqes or requestinq release of a specified held terminal. 

The Stop/Besume Terminal Transmission routine serially searches 
the Termname Table for an entry matchinq that in the common imput 
block. Tf the routine reaches the end cf the table before findinq a 
match, it builds an error messaqe (IED016T) and returns ccntrcl to the 
Operator Control control module (IEDQCA) . When the Stop/Besume 
Terminal Transmission routine finds a matchinq entry in the Termname 
Table, it saves the address of the entry in a reqister. The routine 
then tests the input block to see if a HOLD or EELEASE is to be done. 

Tf a HOLD is to be done r the Stop/Besume Terminal Transmission 
routine tests the entry to see what type it is. If it is net a sinqle 
terminal the routine builds an error messaqe (IED060I) and returns 
control to the control module. 

Tf the terminal is already held (the TBMHELDN bit is on in 
TB^STATE) , the Stop/Besume Terminal Transmission routine tests to see 
if it was held by a HOLD or by a VABY command. If the command was 
HOLD, the routine builds a messaqe (IED052I) and returns to the 
control module. Tf the command was VABY, the routine tests a bit set 
by the Chanqe Terminal routine (TEDQCO) . If the bit is on, the 
Stop/Besume Terminal Transmission routine builds a messaqe (IED025I) 
and returns to the control module. If the bit is off, the routine 
builds a messaqe (IED026I) and returns contrcl to the control module. 
Tf the hold code is not in the system (the AVTAS field in the AVT is 
zero), the terminal cannot be held. If this is the case, the routine 
builds an error messaqe (TED060I) and exits to the control module. 

The Stop/Besume Terminal Transmission routine obtains the address 
of the OCB from the TBMDESTO field of the Terminal Table and tests the 
OCB for its queue type. If it is a main-storage-only queue (the 
OCBCOBE bit is on in the OCBDSELG byte) , the terminal cannot be held. 
The routine builds an error messaqe (IED060I) and returns to the 
control module. 

The Stop/Besume Terminal Transmission routine obtains the address 
of the DCB from the OCEDCBAC field of the CCB and tests it to see if 
it is open. If the line is net open, the routine builds an error 
messaqe (IED060I) and returns to the control module. If the line is 
open dd dummy (the DEBUCBAD of the DEB is zero) , the routine builds an 
error messaqe (IED060I) and returns contrcl to the control module. 

If the entry is queued by terminal (the CCBTEBMQ bit in the 
OCBELAG byte is on) , the Stop/Besume Terminal Transmission routine 
turns on the OCB held flaq (QCBTBMHO in CCBSTAT) . The routine then 
turns on the hold bit in the Terminal Table (TEMHELDH in TBMSTATE) and 
sets the checkpoint bit (OPCCKBIT in the Operator Control AVT) . The 
routine tests the input to see if this is a HOLD command only or if it 
is an entry for a VABY terminal. The routine builds the appropriate 
response messaqe (IED051I for a HOLD command; IED025I or IED026I for 
VABY dependinq upon the bit set by the Chanqe Terminal routine) , and 
returns to the control module. 
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If the Stop/Resume Terminal Transmission routine determines that 
it must perform a release function, it tests the hold bit in the 
Terminal Tatle entry. If the bit is off, the terminal is already 
released. The routine then determines whether the command was a 
RELEASE or a VJBY. If the command was RELEASE, the routine builds a 
messaqe (TED053I) and returns to the control module. If the command 
was VARY, the Stop/Resume Terminal Transmission routine tests a bit 
set by the Change Terminal routine. If the bit is on, the routine 
builds a messaqe (IED020I) , or if the bit is off, the routine builds 
a messaqe (IEB019I) and returns control to the control module. 

If the held bit is off, the Stop/Resume Terminal Transmission 
routine builds an element request block (ERE) to request a buffer, and 
issues an A0CT1 macro (IGC102) to obtain the buffer. The routine then 
issues a WAIT (SVC 1) for the buffer to be received. When the WAIT is 
satisfied, the Stop/Resume Terminal Transmission routine removes the 
new buffer from the operator control queue, places the terminal-to-be- 
released offset in the new buffer, and queues the buffer to the 
TEDOAS01 entry point of the Hold/Release Terminal routine (IEDQAS) . 
^he Stop/Resume Terminal Transmission routine issues another AQCT1 
macro to qive the new buffer to the release function (TEDCAS01) above. 
The routine builds a response messaqe (TEDC20I if the command was 
RELEASE and IED05UI if the command was VARY) . The Stop/Resume 
Terminal Transmission routine then sets the checkpoint flaq and 
returns control to the control module. 

External Routines: 



• IGC102 - AQCTI SVC 102 - to obtain a new buffer and to tpest it to 
TCAM for further processinq by the Hold/Release Terminal routine. 

• OS Wait routine (SVC 1) - to wait for a buffer to be received. 

Tables/work Areas: Work areas that contain the fixed portion of each 

response messaqe and space for insertion of variable data, AVT, CIB, 

Termname Table, Terminal Table entry. Operator Control AVT, ERB, DIB, 
OCE, and DCB. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem proqram mode. 

Start Line Routine (Chart CU) 
Module Name: IEEOCU 

Entry Point: TIDQCO - loaded by the Operator Control control module 
to process STARTLN and VARY ONTF commands. The command that caused 
this routine to be activated is as follows: 



T control chars! )VARy[ }ddname,rln( ,ONTP 

ddname 
address 



r 



Also, the STARTLN macro in the QTAM messaqe processinq proqram can 
activate this routine. 

352 



Functions; This routine processes operator control commands that 
request startinq a line or line qrcup. 

The Start Line routine examines the common input block, located in 
the Operator Control AVT, the address of which is in reqister 1, to 
determine the input ccmmand format. If the input is a DCB address, 
the routine qets the address of the DEB from the DCBDEBAD field and 
beqins processinq the DCB. If the input is a terminal name, the 
routine serially searches the Termname Table for an entry that matches 
the one specified in the input command. If the end of. the table is 
reached before a match is found, the routine sets a X'04 1 return code 
in reqister 15 and returns control to the Operator Control control 
module. When a matchinq entry is found, the routine locates the QCE 
(from the TBMDESTC field of the terminal entry) , which provides the 
addresses of the DCB and DEB, and beqins prccessinq the DCB. 

If the input command format is DDNAWE/BLN and the relative line 
number is not AIL or is not already in hexadecimal, the Start Line 
routine converts the line number to hexadecimal and determines whether 
it is zero or qreater than 255. If the relative line number is 
either, the routine reiects the coirmand, prepares an error messaqe 
(IED018T) , and returns control to the control module. 

If the relative line number is valid, the routine qets from the 
TCB the address of the TIOT and serially searches it for an entry that 
matches the specified DDNAME. If the end of the TICT is reached and 
no matchinq ddname is found, the routine prepares an error messaqe 

(IED017I) and returns control to the control module. If a matchinq 
ddname is found, the routine saves its offset into the TIOT. Then the 
routine qets the DEB chain and determines whether each DCE is a TCAM 
line DCB (DSOKG field contains X'40M and has the same TIOT offset 

(DCBTIOT) as the one -just saved. If no DCB is found in the DEE chain, 
the Start Line routine prepares an error messaqe (IED017I) and exits 
to the control module. Otherwise, when the correct DCE is found, the 
routine beqins prccessinq the DCB. 

If a line address is specified in the input command, the Start 
Line routine locates the DEB chain and checks each UCB associated with 
a DEB to determine whether the UCB has an ID matchinq the specified 
address. If no matchinq ID is found, the routine prepares an error 
messaqe (IED017I) and returns control to the control module. 

Now the Start Line routine is ready to process the DEB (for all 
input formats) . First, the routine checks the DCB open status, and if 
it is not open, prepares an error messaqe (IED017I) and returns 
control to the control module. 

If the DCB is open and a sinqle line is to be started, the routine 
compares its relative line number to the number of lines in the line 
qroup. If the line number is larqer than the number of lines, the 
routine prepares an error messaqe (IED017I) and returns control to the 
control module. Otherwise, the routine determines whether the line is 
an open DD DUMMY, and if so, the routine prepares an error messaqe 
(IED017I) and returns control to the control module. If a line qroup 
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is to be started and a line is a CD DUMMY, the routine prepares the 
same error messaqe and then checks the next line in the group. If all 
lines in the qrcup are open DD DUMMY, the routine prepares the error 
messaqe (IED017I) and returns control to the control module. 

From the DCE in the DCBIOEAD, the Start Line routine gets the LCB 
address and determines whether the activity of the line associated 
with it has been stopped. If line activity has not stopped and the 
input command request is from the Telecommunications On-line Test 
Executor (TOTE) , the routine tposts the line LCB to itself via SVC 102 
(TGC102) in order to return the line from TCTE to TCAM, The routine 
returns control to the control module. If the input command request 
is not from TOTE, the routine qets the next LCB to be processed. When 
all LCBs have been processed, if any lines associated with them have 
been made active, the routine prepares a response messaqe (IED020I) 
and returns control to the control module. Otherwise, the routine 
prepares another response message (IED019I) and exits to the control 
module. 

If the line is not active, the Start line routine turns the 
receive bit en in the associated LCB. The routine prepares a NOP 
command for a switched line, an Enable command for a nonswitched line, 
and a SAD command for a line attached to a 2702 control unit, which 
complets the channel proqram. Now the routine issues an EXCP (SVC 0) 
command to start the line activity and turns en the line-started bit 
in the LCB for the line. The Start line routine continues qettinq 
LCBs and processinq them until all lines in the system have been 
processed. 

External Routines: 

• IGC102 - ACCTI SVC 102 routine - to return a line from TOTE to 
TCAM 

• OS EXCP routine (SVC 0) - to start a line. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response and space for insertion of variable data, LCB, AVT, Operator 
Control AVT, 0CE, DEB, DCB, Termname Table, Terminal entry. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem prcqram mode. 



Stop Line Routine (Chart CV) 

Module Name: IEDCCV 

Entry Point: IEDQCV - loaded by the Operator Control control module 
to process STCPLN, VARY OFFTP (C) , VARY OFFTP, and VARY OFFTP (I) 
commands. The command that caused this routine to be activated is as 
follows: 
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r control chars IJVARY (uddname, rln)/ ,OFFTP, 

V \\ ddname 
address 

Also, the STOPLU macro in the QTAM message processing program, the 
TCHNG macro in the TCAM application program, and the CLOSEMC or 
MCPCLOSE macros can activate this routine. 

^unctions: This routine processes operator control commands that 
reguest stopping activity on a line either immediately or at the 
completion of the current operation. 

The Stop Line routine first checks the closedown bit in the AVT 
(AVTCLOSN in AVTETT1 field) . If it is en, indicating that all lines 
in the system are to be made inactive, the routine sets a flaq in the 
stop line reguest element. 

At this point the Stop line routine examines the common input 
block located at the OPCCKELE entry point in the Operator Control AVT, 
the address of which, is in register 1 , to determine the format of the 
input command. The routine uses the following fields of this block. 

Offset Field Name Field Description 

+ <+ OPCIFN X«00' for STOPIINE All. 

X'UO* for relative line number in 

hexadecimal. 
X'SO 1 for no relative line number, 
bits 1-3 contain the relative line 
number, if present. 
+5 OPCBLN Pelative line number 

+8 OPCTNME DCB address, terminal name, or 

line address. 
+18 OPCFIG X«80' for VAPY (I) 

X'40 f for VAPY (C) 

If the input command format contains a DCB address, the routine gets 
the DEB address from the DCE (DCEDEEAD) and branches to process the 
DCB. If it contains a terminal name, the routine serially searches 
the Termname Table for a matching entry. If no match is found, the 
routine sets a return code of X'04* in register 15 and returns control 
to the control module. Otherwise, when the entry is found, the 
routine gets the associated QCB (from TEMDESTQ) , the DCB from the QCB 
(OCBDCBAD) and the DEB from the DCB (DCBDIBAD) . Now the routine is 
ready to branch to process the DCB. 

If the input command format is DDNAKE/FLN and the PIN is still in 
character representation, the Stop line routine converts it to 
hexadecimal and checks to determine whether the result is zero or 
greater than 255. If the relative line number is either, which is 
invalid, the routine prepares an error message (IED018I) , sets a 
return code of X'0'4* in register 15, and returns control to the 
control module. When the relative line number is valid, the routine 
finds the TIOT through the TCB (AVTTCB) and serially searches the TIOT 



Program Organization 355 



for a ddname that matches the one in the input command. If no 
matching entry is found, the routine prepares an error message 
(IED017I) , sets a return code of X'04 1 in register 15, and exits to 
the control module. For a matching ddname, the routine gets the DEB 
chain from the TCE and checks each DCB associated with a DEB to 
determine whether it is a TCAM line DCB (ESOBG is X'^O 1 ) and whether 
the TTOT offset matches that found while searching the TIOT. If no 
matching offset is found in the DEB chain, the routine prepares an 
error message (IED017I) , sets a return code of X'OU 1 in register 15 r 
and exits to the control module. When the correct DCB is found in the 
DEB chain, the routine branches tc process the DCB. 

Tf the input command specifies the line address format, the Stop 
Line routine gets the DEE chain and checks each UCB associated with a 
DEB in the chain for an ID to match the cne specified in the input. 
Tf no matching ID is found in the DEB chain, the routine prepares an 
error messaae (IED017I) , sets a return code of X'04 1 in register 15, 
and returns control to the control module. 

At this point, no matter which input command format was specified, 
an appropriate DCE is ready to be processed. The Stop Line routine 
determines whether STOPLINE ALL was specified on the input command, 
and if so, performs the following operations* The routine places the 
DEB and DCB addresses in the stop line reguest element, tposts the 
element complete, and issues a WAIT instruction (SVC 1) to wait for at 
least one line to be stopped. When the WATT has been completed, the 
routine prepares a response message (TED026I) and returns control to 
the control module. 

Tf only one line is to be stopped, the Stop Line routine compares 
the relative line number to the number of lines in the group. Tf the 
line number is greater, the routine prepares an error message 
(IED017T) , sets a X'04 1 return code in register 15, and gives control 
to the control module. When the relative line number is valid, the 
routine checks for an open idle condition (OPEN DD DUMMY) . Tf this 
condition has occurred, the routine prepares an error message 
(TED017I) , sets a X'04 1 return code, and gives control to the control 
module. Otherwise, the routine gets the address of the line LCB from 
the DCB (DCBIOBAD) and determines whether the line has already been 
stopced. If it has been stepped, the routine prepares a response 
message (IED025I) , sets a X'OO* return code in register 15, and exits 
to the control module. If the line is still active, the routine 
places the DEB and DCB addresses in the step line reguest element, 
tposts the element complete, and issues a WAIT (SVC 1) instruction to 
wait for the line to be stopped. When the WAIT has been completed, 
this routine checks an indicator to determine whether there are more 
lines to stop. If not, the Stop Line routine prepares a response 
message (IED026I) , sets in register 15 a X'OO* return code for single 
or all lines or a X'14' return code if closedown is specified, and 
returns control tc the Operator Ccntrol ccntrol module. Otherwise, 
this routine gets the next LCB and proceeds as previously described. 
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External Routines; 

• IGC102 - AQCTL SVC 102 routine - to ttcst the STOPLINE request. 

• OS Wait routine (SVC 1) - to wait for completion of the STOPLINE 
request. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response and space for insertion of variable data, QCE r ICE, AVT, CIB, 
Operator Contrcl AVT, DCE, DEB, Termname Table, terminal entry. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem prcqram mcde. 



Modify Poll Routine (Chart CW) 

Module Name: IFDCCW 

Entry Point: IEDOCW - called by the Operater Control control module 
to process MODIFY ADTOP01L commands. The command that caused this 
routine to be activated is as follows: 

T control chars! [ MODIFY Jident , AUTOPOLI={ ddname, rln J ,(ON 

F I (address ) (OFF 

functions: The Modify Poll routine processes operator control 
commands that request that autopollinq be started or stopped for a 
specified line. 

The Modify Poll routine tests the common input block to determine 
whether the DENAME/ELN or the hardware address format was used. If 
the ddname was used, the routine checks the relative line number for 
ALL. If it is All, the routine builds an invalid command messaqe 
(TED018I) and returns contrcl to the Operator Control control module 
(IEDOCA) . If the relative line number is net ALL, the Modify Poll 
routine converts it to a hexadecimal value and determines whether it 
is zero or qreater than 255. Either of these is invalid; therefore, 
the routine rejects the command (IED018I) and returns to the control 
module. 

Tf the relative line number is valid, the Modify Poll routine 
obtains the address of the TCB from the AVT and then serially searches 
the TIOT (at TCB+12) for the related ddname. If it finds no match, 
the routine builds an error messaqe (IED017I) and returns control to 
the control module. If the routine finds a matchinq entry, it saves 
the offset into the TIOT. 

For both input formats, the start of the DEB chain is at TCB+8. 
The Modify Poll routine tests the associated DCE (DEBECBAD) for a TCAM 
line DCB (DSOEG of X»40»). If the DCE is not a TCAM line DCB, the 
routine obtains the next DCB and processes the DEB chain. If it finds 
no TCAM line DCBs, the routine builds an error messaqe (IED017I) and 
returns contrcl to the control module. 
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For a DDNAME input format, the Modify Poll routine compares the 
TCAM line DCB's TIOT offset to that offset computed above. If the 
offsets do net match, the routine conintues to search through the DEE 
chain. When it finds the proper DCB, the routine tests its UCB (at 
DEBUCBAD) for zero, which implies an OPEN DD DUMMY. If the UCB is 
zero, the Modify Poll routine builds an error messaqe (IED017I) and 
returns control tc the control module. 

For a line address format, the Modify Pell routine tests each UCE 
associated with the DEB for a match on the address. It continues to 
search throuqh the DEB chain until it finds the matching UCE. 

Once it obtains the proper DCP for either format, the Modify Poll 
routine tests it for open status. If the DCB is not open, the routine 
builds an error message (IED017I) and returns control to the control 
module. If the relative line number is greater than the number of 
lines in the line group, the routine builds an error message (IED017I) 
and exits to the control module. If the UCE is not a communications 
UCB or is not capable of autopcll, the Modify Poll routine builds a 
message (IFD057I) and returns to the control module. 

The routine obtains the address of the invitation list from the 
DCBINVLI field cf the DCE and tests the input block to see if autopoll 
is to be started or stopped. If autopcll is to be started and is 
already started or is to be stopped and is already stopped, the Modify 
Poll routine builds an appropriate response (IED022I or IED028I) and 
returns control to the control module. Otherwise, the routine turns 
on or off the appropriate bit in the invitation list indicating that 
autopoll is started or stopped. It then turns on the checkpoint 
flags, builds the appropriate response message (IED021I cr IED027I) , 
and returns control to the control module. 

External Routines: None. 

Tables/Work Areas: Work areas that contain the fixed portion of each 
message and space for insertion of the variable data, AVT, CIB, DCB, 
DEB, and the Cperator Control AVT. 

Attributes; Serially reusable, refreshable, enabled, transient, 
problem program mede. 



Modify Intense floutine (Chart CX) 

Module Name: IEDQCX 

Entry Point: IEDQCX - leaded by the Operator Control control module 
to process MODIFY INTENSE commands. The command that caused this 
routine to be activated is as follows: 

T control charsl (MODIFY^ ident,INTENSE= fTEFM ,termname \ , sense, count 

I F J {LINE, fddname,rln| 

I (address J 
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Functions; This routine processes operator control commands that 
request modification of the sense infomaticn for intensive recording. 

The Modify Intense routine tests the common input block to 
determine whether modification is for a terminal or for a line. If 
the modificaticn is f or ; a terminal, the routine serially searches the 
^ermname Table for an entry matching that specified in the input. If 
the routine reaches the end of the table before it finds a match, it 
builds an error message (TED016I), sets a X'OU* return code in 
reqister 15, and returns ccntrol to the Operator Control control 
module (IEDOCA) . When a matching entry is found in the Termname 
Table, the Modify Intense routine saves its address. 

If the modificaticn is for a line, the routine tests the input for 
the DDNAME/FLN cr the hardware address format. If it is the ddname 
format, the routine tests the relative line number for ALL. If it is 
ALL, the routine builds an error messaqe (IED018I) , sets a X'04 1 
return code in reqister 15, and returns centre! to the control module. 
Otherwise the Modify Intense routine converts the relative line number 
to hexadecimal and tests the result fcr obvious errors - zero or 
qreater than 255. If the relative line number hexadecimal value is 
either zerc cr qreater than 255, the routine builds an error messaqe 
(TED018I) , sets the X'OU 1 return code, and returns to the control 
module. 

The Modify Intense routine qets the address of the TICT from the 
TCB (at TCB+12) and serially searches the TIOT for an entry matching 
that specified in the input. If it finds nc match, the routine builds 
an error messaqe (IED017I) and returns to the control module with a 
X'OU 1 return code in reqister 15. When it finds in the TIOT an entry 
that matches the input, the routine saves its offset into the TIOT. 

For both the DDNAME/BLN or hardware line address format for line 
modification, the Modify Intense routine finds the start of the DEE 
chain at TCB+8 and then tests the DCE associated with each DEB for 
TCAM line status (DSORG of X^OM. If it finds no TCAM line before 
the end of the DEB chain, the routine builds an error messaqe 
(TED017T) , sets a X'O** 1 return code, and returns control to the 
control module. 

^or the ddname/rln input format, the Modify Intense routine 
compares the hexadecimal relative line number equivalent to the 
DCBTIOT field. If they do not match, the routine finds the next DEB 
and continues to process the DEB chain. When it finds the proper DCB, 
the Modify Intense routine compares the relative line number to the 
number of lines in the line qroup (DEBNMEXT) and if the relative line 
number is hiqh, the routine builds an errcr message (IED017I) and 
returns control to the control module with the X^U* return code. The 
routine then tests the line for CFEN DD DDMMY (DEEUCEAD of zero) and 
if the line is CPEN DD DUMMY the routine builds an error message 
(IED017I) , sets a X'Otp return code in register 15, and returns to the 
ccntrol module. 
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For the address format, the Modify Intense routine checks each UCB 
associated with a DEB for a match in the specified line address. The 
routine searches the DEB Chain until it finds a match. 
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External Poutines: None. 

Tables/Work Areas; Work areas that contain the fixed portion of each 
message and space for insertion of the variable data, AVT, DCB, DEB, 
terminal Table, Termname Table, LCB, Operator Control AVT. 



Attributes: Serially reusable, 
problem program mode. 



refreshable, enabled, transient, 



Change Interval Type Foutine (Chart CZ) 

Module Name: IFDCCZ 

Entry Point: IEDQCZ - loaded by the Operator Control control module 
to process MODIFY INTFPVAL SYSTEM/POIL commands that have no further 
operands. The command that caused this routine to be activated is as 
follows: 



f control chars! 



MODIFY! i dent, TNTFFVAL= 



SYST 
POII 



FMCdata] V 
,statname, data] 



Functions: This routine processes operator control commands that 
reguest activation of the system or poll delay interval. 

The Change Interval Type routine gets the common input block from 
the location OPCCKELE in the Operator Ccntrcl AVT, the address of 
which is in register 1, and checks to determine the type of interval 
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requested in the input command, 
in the common input block. 



The routine uses the following fields 



Offset 


Field Name 


+ 8 


OPCTNME 


+ 18 


OPCFLG 



Field Description 

Terminal name for the poll interval 

X^O 1 - system interval 

X'40» - poll interval 

X'20 1 - a value to be chanqed. 

Tf the interval is a pell interval, but nc value is specified to 
be chanqed r the Chanqe Interval Type routine prepares an error message 
(TED018I1, sets a X'OU 1 return code in register 15, and returns 
control to the Operator Control ccntrcl module. If the interval to be 
changed is the system interval, the routine places the interval 
specified in a response message (IED047I) and then deter irires whether 
the numeric characters are valid. If all of the characters are not 
valid, the routine prepares an error message (IFD018I), sets a X'04 1 
return code in register 15, and returns to the control module. 

Now the Change Interval Type routine converts the valid system 
interval value to hexadecimal and determines whether the result is 
zero or areater than the allowable maximum of 65,535. If the interval 
is either, the routine prepares an error message (IFD018I), sets a 
X'OtP return code in register 15, and exits to the control module. 
The routine checks the AVTHI field in the AVT for zero, which 
indicates that the system interval function is not supported. If the 
field is zero, the routine prepares an error message (IED011I), sets 
a X'04 1 return code in register 15, and branches back to the control 
module. For a positive field, the routine places the new system 
interval value in the AVTINTLV field of the AVT, sets the checkpoint 
bit, prepares a response message (IED047T) , sets a X'OO' return code 
in register 15, and exits to the control module. 

For a poll interval that is to be changed, the Change Interval 
Type routine serially searches the Termnaire Table for an entry that 
matches the one specified in the common input block. If no matching 
entry is found, the routine prepares an error messaqe (IED016I) , sets 
a X'OU 1 return code in register 15, and branches to the control 
module. If an entry is found, the routine places the specified 
interval in a response message (IED048T) and then checks to ensure 
that each character is a valid numeric. If the characters are not 
valid, the routine prepares an error message (IED018I), sets a return 
code of X'OU', and returns control to the control module. For a valid 
polling interval, the routine converts the interval to hexadecimal and 
determines whether it is egual to zero or greater than 255. If the 
interval is either, the routine prepares an error messaqe (IED018I) , 
sets a X'OU 1 return code, and gives ccntrcl to the control module. 
Next, the routine uses the QCE associated with the terminal entry 
(TTRMDESTO) to get the DCE (OCBDCBAE) , which is tested for open status. 
If the line is not open, the Change Interval Type routine prepares an 
error message (TED061I), sets a X'04 1 return code in register 15, and 
returns control to the ccntrcl module. For an open line, the routine 
uses the DCB to locate an LCB for the line and determines whether the 
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line is dial (ICBEIAL switch on in the LCESTAT2 field). If the line 
is a dial line, the routine prepares an error messaqe (IED061I) , 
places a X'O^' return code in register 15, and exits to the control 
module. For a nonswitched line, the routine places the polling 
interval in the DCB (DCBINTLV) , sets the checkpoint bit, prepares a 
response messaqe (IED048T) , sets a X f 04 f return code in reqister 15, 
and returns to the control module. 

Tf the system interval is to be activated, the Change Interval 
Type routine checks the AVTHI field in the AVT, and if it is zero, 
prepares an error message (TED011I), sets a X*04* return code, and 
branches to the control module. If the interval value in the AVTINTLV 
field is zero, the routine performs the same error exit functions. 

Tf the AVTDLAYN bit in the AVTBIT1 field is on, the routine 
prepares a response message (IED045T) , sets a X'OO' return code, turns 
on the checkpoint bit, and returns control to the control module. 
When both of these fields are net zero, the routine builds a cross- 
partition tpost parameter list to activate the System Delay subtask 
(TEDOHI) and the Interval Control module, and issues an AQCTL macro 
instruction (SVC 102) via the AQCTI SVC 102 routine (IGC102) to post 
the interval processor. Then the routine prepares a response message 
(TED093I) , sets the checkpoint bit, places a X'00 1 return code in 
register 15, and returns control to the Operator Control control 
module. 

External Routine: IGC102 - AQCTL SVC 102 routine - to activate the 
system interval. 

Tables/Work Areas; Fork areas that contain the fixed portion of each 
response and space for insertion of variable data, AVT, Operator 
Control AVT. 

Attribute : Serially reusable, refreshable, enabled, transient, 
problem program mode. 



MCP Closedown Processing Routine (Chart CO) 

This routine is discussed in the Termination Routines section of 
the Program Organization part of this publication. 



TCHNG Processing Routine (Chart C1) 

Module Name: IIECC1 

Entry Point: TFDQC1 - activated by the Operator Control control 
module (TEDQCA) when an ICHNG macro has been issued in an application 
program, the stop line function has been completed, and the LCB has 
been tposted to the Operator Control QCB by the Stop Line I/O subtask 
(IEDOHK). 
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Functions: This module chanqes a specified invitation list entry when 
an TCHNG macro is issued in an application proqram. When an ICHNG 
macro is issued in an application proqram, the Operator 
Control/Applicaticn Proqram Interface routine (IEDQET) builds and 
tposts a CIB tc the Operator Control QCE. This causes the TCAM 
Dispatcher to relinquish control to the Operator Control control 
module, which reccqnizes the CIB and tranches to the Stop line routine 
(IEDQCV) . The Step Line routine tposts a request to stop the line 
activity on the associated line to the Step Line I/O subtask (IEDQHK) . 
The Stop line I/O subtask performs its functions tc step the line 
activity and, once this is done, tposts the LCB to the operator 
control queue. The Stop Line routine reqains control and then 
branches back tc the Operator Control ccntrcl module, which checks the 
common input block to determine which routine is to receive control. 
Tf the 0PCVBCE2 field is equal to 1, the Operator Control control 
module qives control to the ICHNG Processinq routine. 

The ICHNG Processinq routine qets the address of the ECE from the 
LCB (LCBDCBAE) and then finds the invitation list address from them 
both. The routine uses the common input block, located at OPCCKELE in 
the Operator Ccntrol AVT, the address of which is in reqister 1, to 
determine the type of ICHNG function to be performed. If the command 
is ICHNG MOVE, the routine calculates invitation list size and moves 
the data at the move work area to overlay the list. Then the routine 
removes the LCE from the operator control queue and tposts the LCB to 
itself in order to start the line via the AQCTL SVC 102 routine 
(IGC102) . The routine sets a X'00* return code in reqister 15 and 
returns ccntrcl tc the Operator Ccntrcl ccntrol module. 

If the command is ICHNG DEACT and all invitation list entries are 
already inactive, the ICHNG Processinq routine dequeues the LCB and 
starts line activity by tpostinq the LCB to itself via the AQCTL SVC 
102 routine. Per active entries, the routine sets up a count of the 
number of active invitation list entries. The routine swaps each 
active entry frcm the active to the inactive side of the invitation 
list and decrements the active count until it is zero. When all 
entries are inactive, the routine sets the number of active entries to 
zero, deaueues the LCB, and starts the line activity by tpostinq the 
LCB to itself via the AQCTL SVC 102 routine. 

Tf the command is ICHNG ACT and all entries are already active, 
the TCHNG Processinq routine dequeues the LCB and starts line activity 
by usinq the AQCTL SVC 102 routine as dene above. Ecr inactive 
entries, the routine sets up the count cf the number of entries, swaps 
each entry frcm the inactive to the active side of the invitation 
list, and then swaps each one with other active entries until each is 
in its correct place in the list. The routine decrements the inactive 
count until it is zero. When all entries have been made active, the 
routine sets the number of active entries tc equal the total entry 
count. The rcutine dequeues the LCB, tpests it to itself, and starts 
the line activity via the AQCTL SVC 102 routine. 

External Eoutine: IGC1C2 - AQCTL SVC 102 routine - tc tpost the LCB 
to itself in order to start line activity. 
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^ables/Work Areas: DCE, LCE, AVT, Operator Control AVT. 

Attributes: Serially reusable, refreshable, enabled, transient, 
problem program mode. 



On-line Test Interface Pcutine (Chart C2) 

Module Name: IIDQC2 

Entry Point : TETQC2 - loaded by the Operator Control control module 
(TEDOCA) to process MODIFY OLT commands. The command that caused this 
routine to be activated is as follows: 

f control characters! ( MODI^Ylident ,OLT=data. 



tersl JMODI^YJident,! 



"Functions: This module processes operator control commands that 
request Teleprocessing On-Line Test Executive (TOTE) processing. The 
On-line ^est Interface routine prepares a buffer for the TOTE task and 
uses the AQCTL SVC 102 routine to tpost the buffer to the TOTE QCB and 
place it on the ready queue in the MCP. 

If, when the On-Line Test Interface routine gains ccntrol, the 
TOTE task is not active in the system, the routine rejects the command 
by returning to the control module with a X'04' return code and with 
the address of an error message. When the TOTE task is active, the 
On-Line Test Interface routine examines the message (the input 
command) to determine whether it is already canceled by having the 
operator control characters repeated in the message buffer. If this 
is the case, the routine returns to the control module with a X'08' 
return code in register 15. When TOTE is active and the command is 
not canceled, this interface routine continues by gueuing the buffer 
for processing by the TOTE task. 

The On-Line Test Interface routine places X'OC in the key field 
of the buffer prefix, places the address of the TOTE QCE in the buffer 
prefix, and sets the scan pointer to refer to "OLT=" in the buffer if 
the command is from a terminal. Otherwise, the command is from the 
system console, and this routine must obtain a buffer in which to pass 
the operator control command to the TOTE task. 

When the operator ccntrol command is from the system console, the 
On-Line Test Interface routine first builds an EPB in the operator 
control work area and then uses the AQCTI SVC 102 routine to tpost the 
EPB to the Buffer Peguest QCE in the MCP. The EPB contains the 
address of the QCE for this interface routine, so that when the buffer 
reguest is satisfied, the buffer units are returned to this operator 
control routine. The On-Line Test Interface routine calculates the 
number of buffer units that are necessary by comparing the length of 
the data portion cf the operator ccntrol command with the unit length 
in AVTKEYLE. This number is placed in the EPE unit count field. 
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Since operator control has a lower priority than th€ MCP, the ERE 
with its buffer is on the element chain cf the Operator Control QCB 
when SVC 102 returns control after the tpost. The interface routine 
locates the appropriate element on the element chain cf the Operator 
Control OCB by scanning the chain for an element that has a X'EU 1 
priority. If, however, the interface routine does not find an element 
with X'EU 1 in its priority field, there was not a buffer available in 
the MCP. In this case, the interface routine issues a WAIT on the 
Operator Control ECB in the AVT, When the ECB is posted complete, the 
On-line Test routine once aqain scans the Cperator Control QCE element 
chain for an element with a X'ElP priority. This scan-WAIT loop 
continues until the element is present on the chain. When the On-Line 
Test Interface routine finds a buffer, the routine puts the operand 
portion of the operator control command in the buffer. Then the 
routine puts X'10' in the buffer prefix key field and sets the scan 
pointer to point to "OLT=". 

After the On-Line Test Interface routine has prepared the buffer 
for TOTE, the routine uses the AQCTL SVC 102 routine to tpost the 
buffer to the TOTE QCB. The interface routine then sets the 
successful return code XM4 1 in reqister 15 and returns to the control 
module. 

External Routines: 

• IGC102 - ACCTL SVC 102 routine - to tpost elements to the ready 
queue in the MCP. 

• OS Wait routine (SVC 1) - to wait for the Operator Control ECB to 
be posted complete. 

Tables/Work Areas: AVT, CIB, buffer prefix, ICE, Operator Control 
AVT. 

Attributes: Reentrant, transient. 



Copy Invitation list Status Routine (Chart C3) 

Module Name: IEDCC3 

Entry Point: IEDQC3 - loaded by the Operator Control control module 
to process DISPLAY LIST commands. The command that caused this 
routine to be activated is as follows: 

T control chars! (DISPLAY) TP, LIST, fddname,rln 



JDISPLAY)TP,LTST, jddname,rln) 
ID J (address j 



Functions: This routine processes operator control commands that 
request display of the status field cf an invitation list for a 
specified line. 
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The Copy Invitation List Status routine first qets the common 
input block from the CPCCKELE location in the Operator Control AVT , 
the address of which is in reqister 1. Now the routine determines 
from the common input block the line format, either the DDNAME/F.LN or 
hardware address format, that is specified in the input command. If 
DDNAWE/"RLN is specified, the routine determines whether the relative 
line is specified AIL, and if so, reiects the command because status 
information for a sinqle line only may be displayed. The routine 
prepares an error messaqe (IED018I), sets a X'04 1 return code in 
reqister 15, and returns control to the Operator Control control 
module. Otherwise, the routine converts the relative line number to 
hexadecimal and determines whether the result is zero or qreater than 
255. For either, the routine rejects the input command, prepares an 
error messaqe (IED018I), sets a X'04' return code in reqister 15, and 
exits to the control module. 

If the relative line number is valid, the Copy Invitation List 
Status routine qets the TCE address from the AVT (AVTTCE) and serially 
searches the TICT (at TCE +12) for a ddname that matches the one 
specified on the input command. If no matchinq entry is found, the 
routine prepares an error messaqe (IED017I) , sets^a X'04 1 return code, 
and branches to the control module. When a matchinq entry is found, 
the routine saves the entry offset into the TIOT. 

"*or either EDNAME/FLN or address format, the Copy Invitation List 
Status routine qets the address of the beqinninq of the DEE chain from 
the TCB (TCB+8) and checks each associated ECE (DEEECEAE) to determine 
whether it is for a TCAM line (DSOF.G is X'^OM- If the routine does 
not find an associated DCB in the DEB chain, the routine prepares an 
error messaqe (IED017I) , sets a X'O^' return code, and returns control 
to the control module. 

For the EDNAME/FLN command format, once the ECE has been located, 
the Copy Invitation List status routine compares the ECB offset into 
the TTOT (DCETIOT) to the offset calculated from the TCE mentioned 
above, and if the offsets do not match, the routine locates the next 
DEB and continues to search as lust described. When the correct DCB 
is found, the routine checks the UCB for an OPEN DD DUMMY condition. 
If this condition has occurred, the routine prepares an error messaqe 
(TED017I) , sets a return code of X'04' in reqister 15, and exits to 
the control module. 

For the address forirat, the Copy Invitation List Status routine 
tests each UCE associated with the DEB to find a match for the one 
specified in the input command. The routine searches the DEB chain 
until a matchinq entry is fcund. 

At this point, now that the ECB has been found, the Copy 
Invitation List Status routine compares the relative line number, the 
one provided in the DDNAME/FLN format or the one calculated for the 
address format, to the number of lines in the line qroup. If the 
relative line number is qreater, the routine prepares an error messaqe 
(IED017T), places a X'O^ 1 return code in reqister 15, and branches to 
the control module. Next the routine determines whether the line is 
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open, and if not, prepares the same error messaqe and return code and 
exits to the control module. If the line is open, the routine qets 
address of the invitation list for the line from the DCB (DCBINVLI) , 
converts the status byte values to printable characters and places 
them in a response messaqe (IED059I) . The routine now sets a X'OO 1 
return code in reqister 15 and returns contrcl to the Operator Control 
control module. 



External Routines: Here . 

Tables/Work Areas: Work areas that contain the fixed portion of each 
response messaqe and space for insertion of variable data* AVT, DEB, 
DCB, Operator Control AVI. 



Attributes: 



Serially reusable, refreshable, enabled, transient, 



problem proqram mede. 

operator Contrcl Work Area CSECT (No Flowchart) 

Module Name: IEEQC5 

Entry Point: Net applicable. 

^unctions: The Operator Control work area is a non-executable work 
area used by the Operator Control control module to prepare lonq 
messaqes and by the Modify Options routine (IEDQCF) , the Copy Held 
Terminals routine (IEDQCK) , and the Copy Operator Control Terminal 
routine (IEDOCM) as a conversion area for the MODIFY and DISPLAY 
option functions. 

External Poutines: None. 

^ables/Work Areas: None. 

Attributes: Non-executable, refreshable, , transient, problem proqram 

mode. 



DEBUG Service Aid Pouter (Chart C6-1 

Module Name: T1DQC6 

Entry Point: IEEQC6 - activated by the Operator Control control 
module (IGC0110D) to process operator control commands that request 
loadinq or deletinq a service aid. The command that caused this 
routine +o be activated is as follows: 

r control chars! JMODIFYj ident ,DEBUG=data 

I 1 
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^unctions: This module processes operator control commands that 
request the leading or deletinq of service aid modules. If the 
operator control command is valid r the DEEUG Service Aid Router 
returns a response messaqe after executinq the service aid routine 
that either was leaded or is to be deleted. 

The DEBUG Service Aid Router determines whether the COMWRITE 
routine is present in the system. If COMWRITE is not in the system or 
if a restart is in proqress, the Router qenerates a messaqe (IED107I) 
and returns control to the callinq routine. If COMWRITE is in the 
system and a restart is not in proqress, the Router passes control to 
the scan function (IEDOCA02) of the Resident Operator Control module 
to qet the first EEEUG operand. If the operand is not a load or a 
delete request, the Router qenerates a messaqe (IED107I) and returns 
to the callinq routine. If the operand is a load or a delete request, 
the Router aqain uses the scan function cf the Resident Operator 
Control module, this time to obtain the second DEBUG operand. If this 
operand is a valid name, the Router executes the requested function; 
otherwise the Router qenerates a messaqe (IED107T) and returns to the 
callinq routine. 

The DEBUG Service Aid Router finds the address of the service aid 
routine by issuinq a BLDL macro. This routine uses the resultinq BLDL 
list to determine whether the requested service aid routine exists in 
either SYS1. IIUKLIB or JOB/STEPLIE. If the service aid routine does 
not exist, the Router prepares the IED102I error messaqe and returns 
to its callinq routine. 

When the operator control command requests that a service aid 
routine be loaded, the DEBUG Service Aid Router checks the load list 
to determine the current status of the service aid routine; that is, 
whether the routine is active or inactive in the system. If the 
routine is already active, the DEBUG Service Aid Router returns 
control to the callinq routine with a response messaqe (IED103I) . If 
the service aid routine is not currently active, the EEEUG Service Aid 
"outer issues a conditional GETMAIN, tased on the module lenqth 
specified in the BLDL list, to determine whether there is enouqh main 
storaqe available to load the routine. If main storaqe is not 
available, the Router tests to determine how much mere storaqe is 
needed to load the service aid and prepares a messaqe to inform the 
operator of the problem. If main storaqe is available, the Router 
loads and qives ccntrcl to the service aid routine. Upon return from 
the service aid routine, the DEBUG Service Aid Router checks the 
return code. If the return code indicates successful initialization 
of the service aid, the Pouter returns control to the callinq routine 
with an appropriate response messaqe (IErC99T) . If the return code 
indicates an unsuccessful load, the DEBUG Service Aid Router prepares 
a messaqe (IEE1C5I or IED106I) , deletes the service aid, and passes 
control to the callinq routine. 

When the operator ccntrcl command requests the deletion of a 
service aid routine, aqain the DEBUG Service Aid Router checks the 



368 



load list for the status of the service aid. If that routine is 
active in the system, the DEBUG Service Aid Router passes ccntrol to 
the service aid routine. Upon return, the DEBUG Service Aid Router 
checks the return code; if the code is qood, the Router prepares a 
deactivation messaqe (IED100T) , deletes the service aid routine, and 
passes control to the callinq routine. If the load list shows that 
the service aid routine is not active, the DEBUG Service Aid "Router 
prepares a messaqe (IED104I) and returns control to the callinq 
routine. 

External Routines: 

• TEDOCA - Resident Operator Control module - the Operator Control 
Scan subroutine (IEDQCA02) , to serially search the input command 
for the service aid name. 

• EE Service Aid routine - to cause activation or deactivation of 
the service aid functions. 

Tables/Work Areas: AVT, Operator Control AVT, work areas that contain 
the fixed portion of each response messaqe and space for insertion of 
the variable data. 

Attributes: Problem proqram mode. 

CHECKPOINT ROUTINES 

Checkpoint Executor (Chart NE) 

Module Name: IIDCNE 

Entry Point: IEDQNE - qains control when the Checkpoint task is 
activated, or when a checkpoint routine completes its activity. 

Eunctions: This routine determines whether there is anythinq that 
needs to be dene by the Checkpoint task and which module should be 
loaded to perform the required function, if any. 

If the disk IOB is marked complete, the Checkpoint Executor loads 
and qives control to the Checkpoint Notification and Eispcsition 
routine. If no I/O is in proqress and there is a record on the 
Checkpoint Disk I/O queue, the Checkpoint Executor loads and qives 
control to the Checkpoint Disk I/C routine. 

If there is a request element on the Checkpoint QCB, the 
Checkpoint Executor loads and qives control to the routine to build 
the appropriate checkpoint record. 

If there is no checkpoint function to be performed, this module 
waits on the ECE in its QCB and its I/O ECB, unless the closedown 
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completion bit in the environment checkpoint request element is on. 
In this case, the Checkpoint Executor returns to OS, thus terminating 
the attached Checkpoint task. 

Tf the Checkpoint Ixecutor is activated ty the return of another 
checkpoint routine, it can perform the additional function of 
immediately activatinq a routine as requested by the returninq 
routine. If the returninq routine tranches to the address in reqister 
14, the Checkpoint Executor deletes the returninq routine and 
immediately leads the one with the offset in reqister 15. If the 
returninq routine branches to the address in reqister 14+4, tfce 
Checkpoint Executor deletes the returninq module and immediately 
beqins performinq its reqular functions. If the returninq routine 
branches to the address in reqister 14+8, the Checkpoint Executor 
deletes the returninq module and waits for the I/O to complete before 
resuminq activity. 

External Routines: 



IEDONG - Incident Checkpoint for MH routine *- to build an incident 
checkpoint record when a CHECKPT macro is issued in an MH. 

IEDONH - Incident Checkpoint for TCHNG routine -■ to build an 
incident checkpoint record for a TCHNG macro. 

TEDONJ - Incident Checkpoint for Operator Control routine - to 
build an incident checkpoint record for an operator control 

command. 

IEDONK - Environment Checkpoint routine - to build an environment 
checkpoint record. 

TEDQNM - Euild COEQ Disk Record routine - to build a CKEEQ 
checkpoint record. 

IEDONO - Checkpoint Queue Manaqer - to manaqe the Checkpoint I/O 
queue. 

TEDQNP - Checkpoint Disk I/O routine - to write checkpoint records 
on disk. 

TEDQNO - Checkpoint Notification and Disposition routine - to 
issue FPEEMaiN macros and notify completion of a checkpoint. 

IEDQNB - No Available Core routine - to handle an insufficient 
main storaqe situation. 

IEDONS - No Incident Records routine - to handle an incident 
record overflew situation. 

OS Wait routine (SVC 1) - to wait for an ECB to be posted 
complete. 

OS Load routine (SVC 8) - to load a module into main storage 
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• OS Delete routine (SVC 9) - to remove a module from main storage. 
Tables/Work Areas: CVT, AVT, checkpoint work area. 
Attributes: Eeentrant, resident. 

Environment Checkpoint Foutine (Chart NK) 

Module Name: IEDCNK 

Entry Point: IEDONK - loaded by the Checkpoint Executor to build an 
environment checkpoint record. 

functions: This module builds environment checkpoint reccrd segments 
for disk. The Environment Checkpoint routine examines the current 
EXCP field (CKPEXCP) in the checkpoint work area to determine whether 
to build the first segment or a subseguent segment of an environment 
checkpoint. If the key field of the record pointed to by CKPEXCP 
contains the value X^O 1 , a subseguent segment is to be built. In 
this case, the Environment Checkpoint routine picks up its register 
values from CKPSAVE1 and builds the next checkpoint segment in the 
GETMAIN area pointed to by CKPEXCP. Otherwise, the Environment 
Checkpoint routine issues a GETMAIN macro for an area in which to 
build a new segment and places the address of the area in the "last 
record built" field (CKPLDKB) in the checkpoint work area. For a 
first (or only) segment, this routine also turns off all request bits 
and turns on the "checkpoint in progress" flag in the Environment 
Checkpoint Beguest element (AVTCKELE) . 

Before moving a group of data from the MCP tables into a disk 
record, the Envircnment Checkpoint routine determines whether there is 
room for all the data in this segment. If not, the routine puts X^O* 
in the key field, saves registers in CKPSAVE1, moves as much data as 
possible into the segment, and returns to the Checkpoint Executor. If 
the routine reaches the end of the data in the MCP tables before 
filling the reccrd segment, it places XMC in the key field and 
returns to the Checkpoint Executor without saving registers. 

If the Environment Checkpoint routine has just built the first (or 
only) segment of an environment checkpoint, it returns to the 
Checkpoint Executor with the offset of the Checkpoint Queue Manager in 
register 15. If the routine has -just built a subseguent segment, it 
returns to the Checkpoint Executor with the offset of the Checkpoint 
Disk I/O routine in register 15. This is because only the first 
segment of an environment checkpoint is placed on the Checkpoint Disk 
I/O gueue . 

The only error condition that applies to this routine occurs if 
the GETMAIN reguest for space in which to build a segment cannot be 
satisfied. In this case, the Envircnment Checkpoint routine returns 
to the Checkpoint Executor with the offset of the No Available Core 
routine in register 15. 
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External Routings: None. 

Tables/Work Areas: AVT, checkpoint work area, Option Table, Termname 
Table, Terminal Table, OCE, invitation list. 

Attributes: Reentrant, transient. 



Checkpoint Queue Manager (Chart NC) 

Module Name: IEDCNC 

Entry Point: IIDQNO - loaded by tie Checkpoint Executor to manage the 
checkpoint I/C queue. 

Eunctions: This routine puts disk records en the checkpoint I/O queue 
and updates the last request element for which a disk record was 
built. When it enqueues an environment reccrd segment, the Checkpoint 
Queue Manager dequeues all incident records and issues a FREEMAIN for 
each one. As a result, they are not written on the disk. An 
"incident overflow" bit in the incident request element is turned on 
to indicate that the request will be satisfied when the new 
environment record (s) is written. 

The Checkpoint Queue Manaqer returns to the Checkpoint Executor at 
the reqister 14 + 4 entry pcint. 

External Routines: None. 

Tables/Work Areas: AVT, checkpoint work area. 

Attributes: Reentrant, transient. 



Checkpoint Disk I/O Routine (Chart NP) 

Module Name: IEDCNP 

Entry Point : IEDONP - loaded by the Checkpoint Executor to write 
checkpoint records on disk. 

^unctions: This routine locates the next disk record to be written, 
determines the proper TTR for the record, and issues an EXCP to write 
the record. 

If there is a record in the current EXCP field (CKPEXCP) of the 
checkpoint wcrk area, it is the reccrd written and it is a 
continuation of a checkpoint that requires more than one segment. If 
CKPEXCP is egual to zero, the first record on the Checkpoint Disk I/O 
gueue (CKPIOOF) is the one iust written. The Checkpoint Disk I/O 
routine removes this record from the Checkpoint Disk I/O gueue and 
places it in CKPEXCP. Tf the record is an environment or incident 
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record, the routine uses the TIME macro to put the date and time into 
the record. If the record is an environment record, this routine 
moves the TTB of the last incident record used from the ccntrcl record 
to the environment record. 

The method used to determine the corr€ct TTB depends on the type 
of record to be written: 

» First seament of an environment checkpoint - the control record 
has the TIE of all first seqments and an index to the latest one 
used. This routine picks up the TTB that sequentially follows the 
latest one, and chanqes the index tc point to the new first 
seqment. 

• Any environment seqment other than the first - the checkpoint work 
area contains the TTB of the last seqment written. This module 
determines the TTB of the next sequential record on disk. 

• Incident record - the checkpoint work area contains the TTB of the 
last incident record written. This module determines the TTB of 
the next sequential record on disk. 

• CKBEO record - the checkpoint work area contains a CKBEQ-TTB table 
that associates a terminal name offset with a particular TTR. 
This module uses the terminal name offset in the disk record to 
locate the proper TTB in the table. 

If there is no TTB available for environment seqments or CKBEQ 
records because all the records have disk I/O errors, this routine 
issues an error messaqe via WTO. 

The Checkpoint Disk I/O routine returns to the Checkpoint Executor 
at the reqister 14 + 4 entry point. 

External Boutine: IECPCNVT - an OS routine tc convert the relative 
TTB to an absolute disk address. 

Tables/Work Areas: AVT, checkpoint work area, Termname Table, DCB, 
DEB, CVT. 

Attributes: Beentrant, transient. 



Checkpoint Notification and Disposition Boutine (Chart NQ) 

Module Name: TEDCNQ 

Entry Point: IEDQNO - loaded by the Checkpoint Executor to issue 
"^EEMAIN macros and to notify completion of a checkpoint. 

"Functions: This routine qets control after a disk write operation 
completes or after a checkpoint could not be satisfied. It removes 
the checkpoint request element (s) from the QCB chain and tposts the 
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element (if from an MH macro) or posts an ECB (if from Operator 
Control or an application proqram) . The request element is not 
removed if the request has not been completely satisfied cr if a disk 
error occurred durinq the write operation. 

If the last seqment of an environment checkpoint was just written 
with an incident overflew condition (indicated in the environment 
request element) , several incident request elements may be removed 
from the QCB chain. The "incident overflow" bit in each incident 
request element (bit of the key) and in the environment request 
element is turned off. 

If the last seqment of a checkpoint was just written, this routine 
issues a FREEMAIN macro for the record. 

Tf the last seqment of an environment checkpoint was lust written, 
this routine turns on a bit in each PCB (bit 2 of PCBOEIG) to indicate 
to the application proqram (s) that the checkpoint was taken, and 
tposts an element to the ready queue. If the request was from an 
MCPCLOSE macro, the element is the closedown completion element; 
otherwise, it is the environment checkpoint reguest element to be 
placed on the time delay queue. 

If this routine recoqnizes a record with a disk error, it issues 
an error messaqe via WTO. If the record with the disk error is a 
CKREO or environment record, the routine flaqs the record in the 
checkpoint work area, and branches to the address in reqister 14 with 
the offset of the Checkpoint Disk I/O routine in reqister 15. In this 
way the same record can be written at another location on the disk. 

If a checkpoint request was not completely satisfied, this routine 
Dlaces the offset for the module that builds the particular checkpoint 
in proqress in reqister 15 and returns to the Checkpoint Executor at 
the reqister 14 entry point. 

If the checkpoint request was completely satisfied, this routine 
returns to the address in reqister 14+4. 

External Routine: IGC102 - AQCTL SVC 102 routine - to tpost elements 
to the ready queue and to post ECBs for the application proqrams. 

Tables/Work Areas: AVT, checkpoint work area. 

Attributes: Reentrant, transient. 



Checkpoint Disk End Appendage (Chart RA) 

Module Name: IGG019RA - activated by IOS at the end of a checkpoint 
disk operation. 
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Functions: This routine writes the checkpoint control record after 
the last segment of an environment checkpoint record is written on the 
disk. 

When this module writes a control record, it tranches to the 
address in reqister 14+8. It writes the control record usinq retry. 

When this module is not writinq a control record, it branches to 
the address in reqister 14. 

External Routines: None. 

Tables/Work Areas: DEE, checkpoint work area. 

Attributes: Reentrant, resident, supervisor mode. 



Build Incident Record for MB. Routine (Chart NG) 

Module Name: IEDCNG 

Entry Point: TEDQNG - loaded by the Checkpoint Executor to write an 
incident checkpoint record for a CBECKPT macro in an MH. 

Functions: This routine builds an incident disk record when the 
request element on the Checkpoint CCB is an LCE from an MH macro. 

This routine returns to the address in reqister 14 with the offset 
for either the Checkpoint Queue Manaqer, the No Incident Records 
routine, or the No Available Core routine in reqister 15. 

External Routine: IEDQTNT - Termname Table code - to obtain the 
Terminal fable entry address. 

Tables/Work Areas: AVT, checkpoint work area, Termname Table, 
Terminal Table, Option Table. 

Attributes: Reentrant, transient. 



Application Program/Checkpoint Interface Routine (Chart NB) 

Module Name: TEDCNB 

Entry Points: This routine is called when an application proqram 
issues a TCAM macro that chanqes the TCAM environment. The entry 
point to the routine depends on which macro causes the routine to be 
activated : 

• IEDQNB - CKREC macro. 
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• TEDQNB02 - TCHNG macro. 

• IEDONB05 - CPEN or CLOSE macro. 

^unctions: The purpose of this routine is to build a checkpoint 
request element and tpost it to the MCP ready queue when an 
application prcqram issues a TCAM macrc that changes the MCP 
environment. After tpostinq the request element, the Application 
Proqram/Checkpoint Interface routine issues a WAIT command to allow 
the Checkpoint task to qain ccntrol tc process the element. The 
request element built bv this routine indicates which macro issued the 
request. 
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The Application Proqram/Checkpoint Interface routine builds its 
checkpoint request element in the Process Ccntrol Block (PCB) . The 
formats of this element are indicated below according to entry point: 



IEDQNB - request by a CKFEQ macro 



Offset 


+4 

+8 

+12 



+1 



Key 
X '60' 


Address of Checkpoint QCB 


Priority 


Link Address 


Address of Application 
Program ECB 


Address of Application 
Program DEB chain 
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IEDQNB02 - request fry a TCHNG macro 



Offset 


+4 

+8 

+12 



Key 
X'lO' 


Address of Checkpoint QCB 


Priority 


Link Address 


Address of Application 
Program ECB 


Offset to Termname 
Table Entry 


Reserved 



• TEDONB05 - request by OPEN or CLOSE macrc - inverts the first bit 
of the CKEEC-TTR Table entry: 



Offset 



+4 



b; b 
i i i 

T ! T 
o I 1 



TTR of Disk Record 



Offset to Termname 
Table Entry 



Reserved 



Byte 0, bit 0: ON- Entry is Active 

OFF- Entry is Inactive 
Byte 0, bit 1: ON- Entry has a Disk Error 

External Routines : 

• IEDQTNT - Termname Table code - to determine the terminal entry 
address . 

• IGC102 - ACCTL SVC 102 routine - to tpcst the checkpoint request 
element to the MCP ready queue and to invert the status bit in the 
CKFEO-TTR Table. 

Tables/Fork Areas: AVT r checkpoint work area, rcE, PCB, application 
proqram DEE r LCE, access method work area, Termname Table, Terminal 
Table. 

Attributes: Reentrant, transient. 

Build Incident Pecord for TCHNG Routine (Chart NH) 

Module Name: IEDCNH 

Entry Point: IEDQNH - called by the Checkpoint Executor when the 
request element on the Checkpoint QCB is from a TCHNG macro in an 
application prcqram. 
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Functions: This routine builds an incident checkpoint disk record 
when the request element on the Checkpoint QCE is from a TCHNG macro 
in an application prcqram. The format of the checkpoint request 
element is shown under IEDQNB02 in the Application Proqram/Checkpoint 
Interface routine discussion. 

This routine builds the incident checkpoint record in a GETMAIN 
area and stores its address in the CKPLDRB field of the checkpoint 
work area. 

The Euild Incident Record for TCHNG routine returns the address in 
reqister 14 with the offset for the Checkpoint Queue Manager, the No 
Incident Records routine, or the No Available Cere routine in reqister 
15. 

External Routine: IEDQTNT - Termname Table code - to determine the 
Terminal Table entry address. 

Tables/Work Areas: AVT, checkpoint work area, Termname Table, 
Terminal Table, Option Table. 

Attributes: Reentrant, transient. 



Incident Checkpoint for Operator Control Routine (Chart NJ) 

Module Name: IEDCNJ 

Entry Point: IEECNJ - called by the Checkpoint Executor when the 
request elemert on the Checkpoint QCE is from an operator control 
command. 

^unctions: This routine builds an incident checkpoint disk record 
when the request element on the Checkpoint QCE is from an operator 
control command. The request element is pointed to by reqister 3. 
The AVT contains the address of the operator control work area, which 
contains the operator ccntrcl command block. 

when the operator control command is for Stop or Start Line, the 
routine ensures that the DDNAME is present in the data and converts 
all the unit addresses to DDNAME and relative line number. 

This routine builds the incident checkpoint record in a GETMAIN 
area and stores its address in the CKPIDRB field of the checkpoint 
work area. The record is a form of the operator control command 
itself, rather than the tables that are chanqed as a result of the 
command. 
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The Incident Checkpoint for Operator Control routine exits to the 
address in reqister 14, with the offset for the Checkpoint Queue 
Manaqer, the No Incident Records routine, or the No Available Core 
routine in reqister 15. 

External Routines: None. 

Tables/Work Areas: Checkpoint work area, AVT, Operator Control work 
area. 

Attributes: Reentrant, transient. 

Build CKBEQ Disk Record Routine (Chart NM) 

Module Name: IEDCNM 

Entry Point: IEDQNM - leaded by the Checkpoint Executor when the 
request element on the Checkpoint QCE is from a CKREQ macro in an 
application prcqram. 

^unction: This routine builds a CKREQ checkpoint disk record for each 
of the opened Destination OCBs in the MCP that are associated with the 
application prcqram issuinq the CKREQ macro. The format of the 
request element is shown under TEECNB in the Application 
Proqram/Checkpcint Interface routine discussion. 

This routine builds the CKREQ record in a GETMAIN area. If the 
record is the first one built for a particular request, the routine 
places its address in the CKPLDRB field in the checkpoint work area; 
otherwise, the address is stored in the CKFEXCP field in the 
checkpoint work area. One CKREQ macro may result in more than one 
CKREO record, but each entry into this routine results in only one 
record. 

The Build CKREQ Disk Record exits to the address in reqister 14, 
with the offset for the Checkpoint Queue Kanaqer or the No Available 
Core routine in reqister 15. 

External Routine: TEDQTNT - Termname Table code - to determine the 
Terminal Table entry address. 

Tables/Work Areas: AVT, checkpoint work area, DEB, Termname Table, 
Terminal Table, QCE, Option Table. 

Attributes: Reentrant, transient. 



Checkpoint - No Available Core Routine (Chart NR) 
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Module Name: IEECNF 

Entry Point: IEDCNR - loaded by the Checkpoint Executor when a 
conditional GETMAIN for an area in which tc build a checkpoint record 
cannot be satisfied. 

Functions: This routine handles the situation in which a conditional 
GETMAIN for a checkpoint record cannot be satisfied. The No Available 
Core routine first checks for other GETMAIN records on the Checkpoint 
Disk I/O queue. If there are GETMAIN records there, this routine 
exits to the Checkpoint Executor (reqister 14+8) to allow time for 
these records tc be processed and freed. 

If there are no outstandinq GETMAIN records, the No Available Core 
routine converts the lenqth of the GETMAIN request, builds an error 
message to be issued via WTO, and indicates that no disk record was 
built for this request element. It then exits to the address in 
reqister 14 with the offset for the Notification and Eisposition 
routine in reqister 15. 

External Routines: None. 

Tables/Work Areas: AVT, checkpoint work area, Termname Table. 

Attributes: Reentrant, transient. 



Checkpoint - No Incident Records Routine (Chart NS) 

Module Name: IEDCNS 

Entry Points: IEECNS - loaded by the Checkpoint Executor when all the 
incident disk records on the checkpoint data set have been used. 

^unctions: This routine causes an environment checkpoint to be taken 
when all the incident disk records on the checkpoint data set have 
been used. 

The No Incident Records routine removes the environment checkpoint 
request element from its queue (either the time delay queue or the 
Checkpoint OCE) . It then examines the Checkpoint QCE to locate the 
last request element for which a disk record was built and inserts the 
environment checkpoint request element into the next position in the 
element chain of the Checkpoint QCE. This causes the environment 
request element tc be the next one processed, so the incident records 
on disk can be overlaid. 

The No Incident Records routine exits to the Checkpoint Executor 
(the address in reqister 14 +4) . 
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External Routines: 

• IEDQHG03 - Time Delay routine - tc remove the environment 
checkpoint request element from the time delay queue. 

• IGC102 - A0CT1 SVC 102 routine - to tpost an element tc the MCP 
ready queue tc activate IEDOHG03. 

Tables/work Areas: AVT, checkpoint work area. 

Attributes: Beentrant, transient. 



EREOB BECOVERY PBCCEDUEE BOUTINES 

Start-Stop EBP Control Module (Chart JC) 

Module Name: IGE0004G 

Entry Point: IGEC004G - activated by the I/O Supervisor (ICS) when an 
error is detected on a start-stop line, when an interrupt cccurs on 
I/O that was initiated by an EBP module, and when end of day recordinq 
is requested. 

Functions: This module transfers control tc the appropriate ERP 
module to process the specific error condition that occurred on a 
particular CCW. The Start-Stop EBP Contrcl module receives control 
from IOS when the Line End Appendaqe returns to IOS with a line error 
condition, when an interrupt occurs on an I/O operation that was 
initiated by an EBP module, and when end of day recordinq is 
requested. This control module transfers control to one of the 
followinq modules accordinq to the ccnditicn by which the control 
module was activated: 

• Head/Write Unit Check and Unit Exception EBP module (IGE0104G) 
activated by the ccntrol module tc process a unit exception on a 
write or write break CCW and to process a unit check (equipment 
check, lest data, time-out, bus-cut check, or intervention 
required) en a read CCW. 

• Non-operational Control Unit EF.P module (IGE0204G) - activated by 
the ccntrol module when a ccntrcl unit is not operational. This 
is indicated by the condition code 3 after a Start I/O command. 

• Unit Check for Non-read, Non-write, and Non-poll CCWs module 

(TGE0304G) - activated by the contrcl module when a unit check or 
a unit exception error occurs on a CCW that is not a read, a 
write, or a pell operation. 

• Auto Poll and Bead Besponse to Poll Unit Check and Unit Exception 
EBP module (IGE0404G) - activated by the control module to process 
a unit exception or a unit check en a pell cr read response to 
poll CCW. 
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Error Post and Second Level CCW Return module (IGE0504G) 
activated by the control module under five different situations: 

1. An interrupt on an I/O operation that was initiated by an ERP 
module. 

2. An attention, status modifier, ccntrol unit end, or busy 
conditio! indicated by the ccntrcl unit. In this case, the 
control module sets an error flag in the LCB before activating 
the ERP processing routine. 

3. A program check, protection check, or chaining check error on 
the line. In this situation, the control module sets an error 
flag in the LCB before activating IGE0504G. 

4. Any unit exception that is not handled by the Autc Poll and 
Read Response to Poll Unit Check and Unit Exeception ERP 
module, the Read/Write Unit Check and Unit Exception ERP 
module, the Unit Check and Unit Exception on Read/Write CCWs 
for Audio and 226C Local Devices ERP module, and the Unit Check 
Module for Non-read, Non-write, and Non-poll CCWs ERP module; 
and is net an overrun or data check error 'on read and write 
text CCW. 

5. Any retriatle errors on which the retry count is exhausted 
without successful recovery. 

Unit Check and Unit Exception on Read/Write CCWs for Audio and 
2260 Local Devices ERP module (TGE0604G) - activated by the 
control module to process errors detected on audio and local 
devices. 

Start-Stop Channel Check ERP module (IGE0804G) - activated by the 
control module to process channel ccntrol check ending status, 
interface ccntrol check ending status, and channel data check 
ending status . 

Closedown Terminal Statistics Recording module (IGE0904G) 
activated by the control module wh€n end of day recording is 
reguested . 

OS OBR/SDR module (TGE0025F) - activated by the ccntrol module 
when recovery from an error has been successful and one of the 
following conditions exist: 

1. The SIO or error counter is about to overflow, or 

2. The user has reguested logging of teirperary errors. 

Line End Appendage (IGGC19R0) - activated by the control module 
under the two fcllcwinq conditions: 

1. When error recovery was successful and updating of terminal 
statistics is not reguired. 
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2. When overrun or data check errors occur on read or write text 
CCWs. These errors are net retried by an FPP module, but may 
be retried in the MCP. 

External Poutine: IEDQTflT - Termnaroe Table code - to obtain a 
terminal entry address. 

Tables/Work Areas; ICE, CCW, SCE, AVT r ECP, Terminal Table entry. 

Attributes: Supervisor mode, disabled, transient. 



^ead/Write Unit Check and Unit Exception EPP Module (Chart JD) 

Module Name: TGE0104G 

Entry Point: TGE0104G - activated by the Start-Stop EPP Control 
module (TGE00C4G) to process read/write unit check and unit exception 
error conditions. 

^unctions: This module processes read/write unit check and unit 
exception errcr conditions that occur on start-stop lines. 

If a unit exception occurs, the action that this EBP module takes 
depends on the device on which the error occurs: 

• Teletype adapter - the EPP module executes a Write Break CCW. 

• 2*701 - the EPP module executes a Pead Skip CCW. 

• All other start-step adapters - the EPP re-executes the CCW on 
which the unit exception occurred until the retry count is 
exhausted. At this point, a permanent error exists and this 
module transfers control to the Error Post and Second level CCW 
Return module (IGE05CUG) . 

If the Pead/Write Unit Check and Unit Exception module receives 
control after a unit check occurs, this EPP module analy2es the sense 
data in the TCB. If the error is eliaible for retry, this EPP module 
restarts the channel proqram; otherwise, the error is permanent. This 
EPP module considers as permanent errors any control unit errors, such 
as equipment checks, and any non-text errors with exhausted retry 
counts. This EPP module floes not process text errors, but returns 
them to the Line End Appendaqe for possible retry in the MCP. 

External Poutines: None. 

Tables/Work Areas: CCW, IOE, LCB, SCE, AVT, UCE. 

Attributes: Supervisor mode, disabled, transient. 
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Non-operational Control Unit EPP Module (Chart JE) 

Module Name : IGE0204G 

Entry Point: IGE0204G - activated ty the Start-Stop ERP Control 
module (TGE0004G) when a control unit is not operational. 

Functions : This module informs the system operator that a specific 
control unit is not operational. This module issues a Write to 
Operator (WTO) macro, which writes the messaqe, IED064I LINE addr 
CONTROL UNIT NCT OPERATIONAL. The module indicates a permanent error 
condition by setting a flaq in the LCB. The module then exits to Line 
End ApDendaqe. 

External Poutine: OS Write to Operator routine - to write a messaqe 
on the system console. 

Table/Work Areas: LCE. 

Attributes: Supervisor mode, disabled, transient. 



Unit Check for Non-read, Non-write, and Non-poll CCWs EPP Module 
(Chart JF) 

Module Name: IGEC304G 

Fntry Point: IGE0304G - activated by the Start-Stop EBP Control 
module to process errors from non-read, non-write, and non-poll CCWs. 

^unctions: This module processes unit checks for failinq CCWs that 
are not a read, a write, or a pell operation. This EPP module uses 
the sense data that is stored in the ICE to determine the acticn to be 
taken: 

• Retries the CCW twice for lost data and for a bus-cut check on a 
dial command. If retry is unsuccessful, the error is permanent; 
therefore, this EPP module transfers ccntrcl to the Errcr Post and 
Second Level CCW Return module. 

• Retries the CCW twice for a time-cut en a dial, a disable, an 
enable,, or a prepare command. If retry is unsuccessful, the error 
is permanent; therefore, this EPP module transfers control to the 
Error Post and Second Level CCW Return module. 

• Retries the CCW twice for an intervention required on a dial or a 
prepare command. If retry is unsuccessful, the error is 
permanent; therefore, this EPP module transfers control to the 
Error Post and Second Level CCW Return module. 

• Transfers control to the Error Post and Second Level CCW Return 
module (IGE0504G) to handle all the ether errors, which either 
loqically should not have occurred or are permanent errors. 
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External Routines: Kone. 

Tables/Work Areas: CCW, TOE r LCB , SCB. 

Attributes: Supervisor mode, disabled, transient. 



Auto Poll and Bead Response to Poll Unit Check and Unit Exception ERP 
Module (Chart JG) 

Module flame: IGE0404G 

Entry Point: IGE0404G - activated by the Start-Stop ERP Control 
module (TGE000UG) or the BSC ERP Control Module (IGE0004H) when an 
error is detected on a pell or a read response to a poll command. 

Eunctions: This module processes unit checks and unit exceptions for 
poll CCWs and read response to poll CCWs. 

If a unit exception occurs on a poll CCW, this ERP module re- 
executes the CCW. If a unit check occurs en a poll CCW and the error 
is a time-out, data check, or intervention required, this EBP module 
updates the poll pointer and retries the channel proqram. When the 
retry count is exhausted, the error is assumed to be permanent. All 
other unit check error conditions en a poll CCW are considered 
permanent. 

If a unit check occurs on a read response to poll CCW and the 
error is a time-out, data check, or intervention required, this ERP 
module updates the poll pointer and restarts the channel proqram. 
When the retry count is exhausted, the error is assumed to be 
permanent. The module retries overrun and lest data errors by 
restartinq the channel proqram at the read response command. All 
other unit checks on a read response to pell CCW are permanent. 

A unit exception on a read response to pell CCW is handled by the 
Line End Appendaqe. 

When a permanent error condition is detected, this EBP module 
transfers control to the Error Post and Second level CCW Return module 
(IGE050UG) . 

External Routines: None. 

Tables/Work Areas: CCW, ICE. 

Attributes: Supervisor mode, disabled, transient. 



Error Post and Second Level CCW Return Module (Chart JH) 
Module Name: IGE0504G 
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Entry point: TGE0504G - activated by either the Start-Stop EBP 
Control module or other EPP processing modules. 

functions; This module attempts to retry channel programs and handles 
permanent error situations. 

The Error Pest and Second Level CCW Peturn module receives control 
from the Start-Stop ERP Control module when a special return indicator 
is set and an interrupt occurs on a Read Skip or Write Break CCW that 
was issued by an EPP module. In this situation, the Error Post and 
Second Level CCW Return module attempts to retry the user's channel 
program. 

The Error Pest and Second Level CCW Peturn module receives control 
from other EPP processing modules when a permanent errcr is detected. 
The EPP processing modules pass to this module both permanent errors 
that are not retried and errors that are considered permanent only 
after the retry count is exhausted. When a permanent error condition 
is passed to the Error Post and Second Level CCW Peturn module, it 
passes control to either the OS Messaqe Writer, the line End 
Appendage, or the OS OER/SDP module. 

If OBP recording is required and the system console is not the 
primary operator control terminal, control passes to the OBP/SDR 
module. If OBP recording is not reguired and the system console is 
not the primary operator control terminal, control passes to the Line 
End Appendage. If the system console is to primary operator control 
terminal, the Error Post and Second Level CCW Return module exits to 
the OS Message Writer, which either writes an error message on the 
system console or routes an error message to an alternate operator 
control terminal by returning to Line End Appendage. If CBR recording 
is reguired, the Error Post and Second Level CCW Return module places 
X'01 f in LCBELAGS before exiting to the OS Message Writer. This flag 
indicates that the Message Writer should pass ccntrcl to the OBR/SDR 
module (IGE0025F) . 

External Routine: IEDCTNT - Termname Table cede - to obtain a 
terminal entry address. 

Tables/work Areas: CCW, LCB, AVT, Terminal Table entry, SCE. 

Attributes: supervisor mode, disabled, transient. 



Unit Check and Unit Exception on Read/Write CCWs for Audio and 2260 
Local Devices EPP Module (Chart JI) 

Module Name: IGEC604G 

Entry Point: IGE0604G - activated by the Start/Stop ERP Control 
module (IGE0004G) to process errors on audio and local devices. 
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Functions: This module adiusts the retry count and retries the 
failinq CCW sequence when IOS detects an error en an audio or local 
device. If the error is undefined or if th€ retry count is exhausted, 
this ERP module exits to the Error Post and Second Level CCW Return 
module, which records the error. 

External Routines: None. 

Tables/Work Areas: ICE, SCE, CCW. 

Attributes: Supervisor mode, disabled, transient. 



Start-Stop Channel Check ERP Module (Chart JJ) 

Module Name: IGE0804G 

Entry Point: IGE0804G - activated by the Start-Stop ERP Control 
module (TGE0004G) to process channel control check endinq status, 
interface control check endinq status, and channel data check endinq 
status. 

Functions: This module processes channel endinq status errors that 
are detected by ICS. 

The Channel Check Handler is an optional extension of IOS for 
conf iqurations that use the 2860/2870 channels. The Channel Check 
Handler determines whether a channel control check or an interface 
control check is recoverable. If so, this handler builds an ERP 
interface byte (ERPIB) to provide the Start-Stop Channel Check ERP 
module the information for a possible retry. 

When the Start-Stop Channel Check ERP module qains control after 
a channel control check or an interface control check, it searches a 
list of ERPIBs to determine whether IOS has supplied preliminary 
parameters for retry. If the module does not find an ERPIE for the 
failinq device, the module considers the error to be permanent and 
passes control to the Error Post and Second Level CCW Return module 
(TGE050UG) . If an ERPIB is found for the device, the Start-Stop 
Channel Check EFP module tests the retry flaq in the ERPIE. If this 
flaq is on, the module considers the error to be permanent and exits 
to the Error Post and Second Level CCW Return module. If the flaq is 
not on, the Start-Stop Channel Check ERP module saves the ERPIE data 
in a work area, clears the ERPIB to zero to make space for system 
sense information, and attempts a retry procedure that is based on the 
ERPIB data, the failinq CCW, and the retry count. The module 
continues the retry procedure until the either the retry is successful 
or the retry count is exhausted. If the retry count is exhausted, 
this module transfers control to the Error Post and Second Level CCW 
Return module. 

When the Start-Stop Channel Check ERP module gains control after 
a channel data check, the module attempts to retry the failinq CCW. 
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If retry is unsuccessful and the retry count is exhausted, this module 
considers the error to be permanent and transfers control to the Error 
°ost and Second Level CCW Return module. 

External Routines; None. 

Tables/Work Areas: ERPIE, CCW, ICE. 

Attributes: Supervisor mode, disabled, transient. 



Closedown Terminal Statistics Recording Module (Chart JK) 

Module Name: IGEC904G 

Entry Point: IGE0904G - activated by the Start-Stop ERP Control 
module (IGE0$04G) when end of day recording is requested. 

functions: This module provides for terminal statistics recording 
when end of day recording is specified. ihen the Closedown Terminal 
Statistics Recording module is activated, it sets up input records for 
the system OBR/SDR module and transfers control to it. The OBR/SDR 
module records the statistics for each terminal and then returns to 
the Closedown Teririnal Statistics Recording module to reset parameters 
for the next recording. After all recording has been performed, the 
Closedown Terminal Statistics Recording module passes control to the 
Line End Appendage. 

External Routines : IGE0025F - OS OER/SDR module - to record terminal 
statistics. 

Tables/Work Areas: LCB, Terminal Table entry. 

Attributes: Supervisor mode, disabled, transient. 



BSC EPP Control Module (Chart JL) 

Module Name: IGE0004H 

Entry Point,: IGEQ004H - activated by the I/C Supervisor (IOS) when 
the Line End Appendage (IGG019R0) detects a BSC error condition or 
when an interrupt occurs on I/O that was started by a ESC ERP module. 

Functions: This module transfers control to the appropriate ESC ERP 
module to process the specific error condition that occurred on a 
particular CCW. The BSC ERP Control module receives control from IOS 
when the Line End Appendage returns to ICS with a ESC line error 
condition and when an interrupt occurs on an I/O operation that was 
initiated by a ESC ERP modue. This control module transfers control 
to one of the following modules according to the condition by which 
the control module was activated. 
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• 



BSC Bead/Write Equipment Check, Lest Data, Intervention Required, 
and Unit Exception ERP module (IGE0104H) - activated by the 
control module to process a unit exception on a write CCW and to 
process a unit check (equipment check, lost data, intervention 
required, or bus-out check) on a write or read CCW. 

Non-operational Control Unit ERP module (IGE0204G) - activated by 
the control module when a control unit is not operational. This 
is indicated by the condition code 3 after a Start I/C command. 

• BSC Bead/Write Data Check, Overrun, and Command Reject ERP module 

(IGE020UH) - activated by the control module to process data 
checks, command rejects, and overruns on read or write CCWs. 

• Unit Check for Non-read, Non-write, and Non-poll CCWs ERP module 

(IGE0304G) - activated by the control module when a unit exception 
error occurs on a CCW that is not a read, a write, or a poll 
operation . 

• Auto Poll and Bead Response to Poll Unit Check and Unit Exception 
EBP module (IGE0404G) - activated by the control module to process 
a unit exception or a unit check en a poll or a read response to 
poll CCW. 

• BSC Second Level CCW Return Module (IGE040UH) - activated by the 
control module when the special return indicator is set and an 
interrupt occurs on I/O that was initiated by an ERP module. 



• 



BSC Error Post module (IGE0504H) - activated by the control module 
under four different conditions. 

1. An attention, status modifier, control unit end, or busy 
condition indicated by the ccntrcl unit. In this case, the 
control module sets an error flaq in the LCB before activatinq 
the EBP prccessinq module. 

2. A proqram check, protection check, or chaininq chain error on 
the line. In this situation, the ccntrcl module sets an error 
flaq in the LCB before activatinq IGE0504H. 

3. Any unit check on BSC devices that is not handled by the ESC 
Bead/Write Equipment Check, Lost Data, Intervention Required, 
and Unit Exception ERP module, the Unit Check for Non-read, 
Non-write, and Non-poll CCWs ERP module, the Auto Pell and Read 
Response to Poll Unit Check and Unit Exception ERP module, and 
is not a time-out on a read to addressinq, a read or write ENQ, 
a read response to ENQ, a read text CCW with no data received, 
a read response to text, cr an overrun or data check error on 
a text cr non-text read CCW. 

4. Any retriatle errors on which the retry count is exhausted 
without successful recovery. 
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• BSC Channel Check ERP module (IGE0804H) - activated by the control 
module to process channel errors such as channel control checks, 
channel data checks, and interface control checks. 

• Line End Appendaqe (IGG019R0) - activated by the control module 
under the fcllowinq conditions: 

1. When a read unit exception occurs and updatinq of terminal 
statistics is not required. 

2. When a time-out occurs on a read text and data is received. 

3. When overrun or data check errors cccur on read text CCWs. 
These errors are not retried by an EBP module, but may be 
retried in the MCP. 

If a time-out on a read to addressinq, a read ENQ, or a read 
response to ENQ occurs, the control module restarts the channel 
proqram. If a time-out en a read text CCW occurs and no data is 
received, the control module restarts the channel proqram at the read 
text CCW. If a time-out on a read response to text CCW occurs, the 
control module executes a write ENQ channel proqram. 

External Routine; IEDQTNT - Termname Table code - to obtain the 
terminal entry address. 

Tables/Work areas: 1CB, CCW, AVT, DCB, Terminal Table entry. 

Attributes : Supervisor mode, disabled, transient. 



BSC Read/Write Equipment Check, Lost Data, Intervention Required, and 
Unit Exception ERP Module (Chart JW) 

Module Name: IGE0104H 

Entry Point: TGE0104H - activated by the BSC ERP Control module 
(IGE0004H) to process unit check and unit exception error conditions 
that cccur on read and write CCWs. 

Functions: This module processes read/write unit check and unit 
exception error conditions that occur on BSC lines. 

If a unit exception occurs on a write CCW, the action taken by 
this module depends on the type of write CCK: 

• If the CCW is for a write ENQ (a line bid) , this module restarts 
I/O at the read response CCW. A unit exception at line bid time 
could indicate that a contention situation exists. 

• A unit exception on anv other write CCW implies that either the 
line is noisy or the other station is usinq bad line procedures. 
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For this situation, this module executes a Bead Skip channel 
proqram. 

If the BSC Unit Check and Unit Exception EBP module receives 
control after a unit check occurs, the module analyzes the IOE sense 
data to determine the course of action. The action taken depends on 
the type of error that occurred: 

• Equipment check - this module sets an error flag in the LCB and 
transfers ccntrcl to the ESC Error Post module (IGE0504H) - 

• Lost data on a write CCW - this module sets an error flaq in the 
LCB and transfers control to the BSC Error Post module (IGE0504H) . 

• Lost data en a read CCW - this module acts accordinq to the type 
of read on which the error occurred: 

1. Lost data on a read response tc ENC CCW - this module 
reexecutes the write ENO CCW. 

2. Lost data on a read ENQ CCW - this module reexecutes the read 
ENQ CCW. 

3. Lost data on a read response to text CCW - this module executes 
a write ENC, read response channel proqram. 

4. Lost data on a read text CCW - this module returns control to 
the Line End Appendaqe (IGG019B0) vhere a read ENQ r write NAK 
channel prcqram is executed. 

• Intervention required '- this module transfers control to the BSC 
Error Post module (IGE0504H) where this error is processed as a 
permanent errcr condition. 

• Bus-out check - if the error occurred or the command, not on the 
data, this module retries the CCW; if the error occurred on the 
transmitted data and the CCW is a write text, this module executes 
a read response CCW. 

External Routines: None. 

Tables/Work Areas: CCW. IOB, LCB, SCB, AyT, UCE. 

Attributes: Supervisor mode, disabled, transient. 



BSC Bead/Write Data Check, Overrun, and Ccmmand Beject EBP Module 
(Chart JN) 

module Name: IGE0204H 
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Entry Point: IGE0204H - activated by the BSC EBP Control module 
(TGE0004H) when a data check, a command reject, or an overrun occurs 
on a read or a write command. 

Functions: This module processes a data check, a command reject, or 
an overrun on a failing read or write CCW. This module examines the 
failinq CCW to determine the appropriate course of action, 

Tf this EBP module finds an undefined error or if the retry count 
is exhausted, the module transfers control to the BSC Error Post 
module (IGE0504H) where the error is recorded. If an intermediate CCW 
sequence is required, the BSC Bead/Write Data Check, Overrun, and 
Command Peject module builds the CCW sequence and sets a special 
return indicator for the BSC Second Level CCW Peturn module 
(IGE0404H) . The BSC Second Level CCW Peturn module services the next 
interrupt and controls subsequent recovery attempts for this error. 

In all ether situations, the BSC Bead/Write Data Check, Overrun, 
and Command Reject EPP module advances the retry counter and attempts 
a retry at the appropriate point in the failinq CCW sequence. 

External Poutines: None. 

Tables/Work Areas: CCW, IOE, LCB, SCB, AVT, UCB, 

Attributes: Supervisor mode, disabled, transient. 



BSC Second Level CCW Peturn Module (Chart JC) 

module Name: IGEC404H 

Entry Point: IGE0404H - activated by the BSC EPP Control module 
(TGE0004H) to process interrupts that occur on I/C that was initiated 
by an EPP module. 

^unctions: This module attempts to retry channel proqrams that were 
initiated by an EPP module. This module retries the channel proqram 
until either the retry is successful or the retry count is exhausted. 
When the retry count is exhausted, this module considers the error to 
be permanent and transfers control to the ESC Error Post module 
(TGE0504H). 

If the channel and unit status of the CSW indicate that the I/O 
was error free, the BSC Second Level CCW Peturn module either restarts 
the user channel proqram at the correct CCW or transfers control to 
the Line End Appendaqe (TGG019P0) where the received data is checked 
and the appropriate CCW is executed. 

External Poutines: None. 

Cables/Work Areas: CCW, LCE, SCB, AVT, Terminal Table entry. 
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Attributes; Supervisor mode, disabled, transient r 

BSC Error Post Module (Chart JP) 

Module Name; IGE0504H 

Entry Point; IGE0504H - activated by the BSC EBP Control module 
(IGE0004H) or by any of the ESC EBP processinq modules. 

Functions; This module handles permanent error situations. It 
receives both errors that are not retried and errors that are 
considered to be permanent only after the retry count is exhausted. 
This module builds the records necessary as input for OBE/SDB 
recordinq and then passes control to the OER/SDB module (IGE0025E) . 
The OBR/SDB module records the error and loqs an error messaqe on 
either the system console or the operator control terminal. 

External Routine; IEDQTNT - Termname Table code - to obtain the 
terminal entry address. 

Tables/Work Areas; CCW, ICE, SCB, AVT, Terminal Table entry. 

Attributes; Supervisor mode, disabled, transient. 

BSC Channel Check EBP Module (Chart JQ) 

Module Name ; IGE0804H 

Entry Point; IGE0804E - activated by the BSC EBP Control module 
(TGE0004H) to process channel control check endinq status, interface 
control check endinq status, and channel data check endinq status. 

Eunctions; This module processes channel endinq status errors that 
are detected by TOS. 

The Channel Check Handler is an optional extension of TOS for 
conf iqurations that use the 2860/2870 channels. The Channel Check 
Handler determines whether a channel control check or an interface 
control check is recoverable. If so, this handler builds an EBP 
interface byte (EBPIB) to provide the ESC Channel Check EBP module the 
information fcr a possible retry. 

When the ESC Channel Check EBP module qains ccntrcl after a 
channel control check or an interface control check, it searches a 
list of EBPIBs to determine whether IOS has supplied preliminary 
parameters for retry. If the module does not find an EBPIE for the 
f ailinq device, the module considers the error to be permanent and 
passes control to the BSC Error Post module (IGE0504H) . If an EBPIB 
is found for the device, the BSC module tests the retry flaq in the 
EBPIE. If this flaq is on, the module considers the error to be 
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permanent and exits to the BSC Errcr Post module. If the flaq is not 
on, the BSC Channel Check EPP module saves the EPPIE data in a work 
area, clears the EPPIB to zero to make space for system sense 
information, and attempts a retry procedure that is based on the ERPIE 
data, the failinq CCW, and the retry count. The module continues the 
retry procedure until either the retry is successful or the retry 
count is exhausted. If the retry count is exhausted, this module 
transfers contrcl to the ESC Error Post module. 

When the ESC Channel Check EFF module qains ccntrol after a 
channel data check, the mcdule attempts to retry the failinq CCW. If 
retry is unsuccessful and the retry count is exhausted, this module 
considers the error to be permanent and transfers ccntrcl to the ESC 
Error Post module. 

External Routines: None. 

Tables/Work Areas: EPPIE, CCW, LCE. 

Attributes: Supervisor mode, disabled, transient. 

TIME SHAPING OFTICN PCUTINES 

TSO Attention Pcutine (Chart YA) 
Module Name: IEDfiYA 

Entry Points: 

• IEDAYA (ENTPY1) - activated by Buffer Disposition (IEBQED) throuqh 
the TSO INMSG/ODTMSG Linker (IEDAYX) when it detects an attention 
interrupt (hardware or simulated) . 

• IEDAYA+12 (ENTRY2) - activated by Line End Appendaqe (IGG019B0) 
throuqh the TSO JOHALT routine (IEDAYF) or directly from IEDAYF 
when it receives an attention interrupt on a sinqle prepare CCW. 

^unctions: The TSO Attention routine provides the terminal user the 
ability to affect line deletion, CPU task interruption (qivinq control 
to the STAX Exit) or both. These functions can be accomplished either 
throuqh a hardware attention interrupt (an ATTENTION or REQUEST key on 
a terminal and an ATTEN macro instruction in the TCAM messaqe control 
proqram) or throuqh a software-simulated attention interrupt (a 
SIMATTN macro instruction in the TCAM messaqe ccntrol proqram) . 

An attention request from a terminal causes the 10 Supervisor to 
activate the TCAM Line End Appendaqe (IGG019R0) . This appendaqe 
identifies the request and sets an ^attention interrupt switch 
(SCBATTN) in the Station Contrcl Elcck for the terminal. When the 
TCAM messaqe handler for that terminal qains ccntrol, the ATTEN macro 
expansion in that messaqe handler tests the SCBATTN bit and if it is 
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on, activates the TSO IOHALT routine (IEEAYI) , which activates the TSO 
Attention routine. Upon detection of an attention, the TSO IOHALT 
routine may activate the TSO Attention routine directly by tpostinq 
the ICB to it. 

An attention request from the STMATTN macro in the prcqram causes 
the TSO Simulated Attention routine (IEDAYS) to set the "simulated- 
attention interrupt" switch (SCESATTN) in the Station Control Block. 
This switch causes the macro expansion tc activate the TSC Attention 
routine. 

The TSO Attention routine first branches and links to the Termname 
Table code (TEEQTNT) to qet the address cf the terminal entry, which 
contains the address of the Destination QCB. The routine then 
determines whether the terminal is handlinq a TSO session. If the 
terminal is net, the routine determines whether the line was sendinq 
or receivinq (the routine was entered at ENTBY1) or on a sinqle 
prepare CCV (the entry was at ENTBY2) and exits acccrdinqly - to 
DSPDTSP for ENTSY2 and tc DSPCHATN for ENTPY1. 

In the input mode, if the key has been specified fcr line delete 
and in fact at least one character has been entered, the TSO Attention 
routine determines if automatic line numterinq has been specified and 
if so, decrements the current line value. This is done so that the 
terminal may once aqain be prompted fcr the deleted line number. 
Before returninq to the messaqe handler code, the routine sets a flaq 
within the prefix of the input buffer. Also, the routine sets a flaq 
(SCBXPD) in the SCB to indicate to the TSO Messaqe Generation routine 
(IEDAYS) to write the messaqe (!D) to the terminal. (This indicates 
that the line is fceinq deleted) . 

If the key had not been specified fcr line delete, or if it had 
and nothinq had been entered on the input line prior to the Attention 
key beinq depressed, the TSO Attention Routine then processes the 
interrupt as a request for an attention exit. This is the case when 
the system is in the output mode, when the key is depressed and the 
terminal supports the Transmit/Interrupt feature. 

Once the TSC Attention routine determines that exit request 
handlinq is tc be performed, it determines if any exit levels are 
currently available. If not or if the user proqram does not specify 
any STAX macros, the routine drops input, and output buffers and sets 
a flaq (SCBXPI) in the SCB to indicate that the TSO Messaqe Generation 
routine is to write the messaqe (!I) to the terminal. (This indicates 
an attention iqnered) . The TSO Attention routine then issues a QTIP2 
to clear the queues and record that an attention was iqnored. 

If an exit le^/el is available, the routine decrements the ATTN 
count in the TCJB (TJBATTN) and drops the input and output queue. 

If the SCBATTN bit is on without either the SCBXPI bit or the 
SCBXPD bit, the TSO Messaqe Generation routine writes the messaqe (!) 
to the terminal. This indicates that an attention is accepted and an 
exit routine is scheduled. If the user is in main storaqe, the TSO 
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Attention routine issues a QTIPO to set the flag FCBFAT in the FCB, 
tposts the PCE, and returns to the message handling code. If the user 
is not in main storage, the routine sets an entry code of (4) , puts 
the TJIt) in register zero, and issues a CTTP1 to swap the user into 
main storage. 

When TCAM passes control to the TSC Attention routine, TCAM 
notifies the routine whether the line was sending, receiving, or on a 
single prepare CCW. The single prepare CCW is used to monitor the 
line attention interruptions when a keyboard is locked. If the 
attention interruption occurs while sending cr receiving, the TCAM 
Dispatcher, via a MSGGEN macro instruction, schedules the TSO Message 
Generation routine (IEDAYM) . If the interruption occurs en a prepare 
CCW, the TSO Attention routine tranches directly to the TSO Message 
Generation routine. 

External Foutines: 

» TFDOTNT - Termname Table code - to get the address of the terminal 
entrv. 

• OTIP SVC - TSO SVC - Entries 0,1, and 2 - to clear the input and 
output gueues, remove system and user LWAITs and QWAITs, set 
flags, and swap the user into main storage. 

Tables/Work Areas: AVT, CVT, ICB, QCB, FCB, SCE, STCE, TJE, terminal 
entry, TSB,Tiire Sharing CVT, TSI. 

Attributes: Feentrant, enabled, supervisor mode. 



TSO Carriage Subroutine (Chart YC) 

Module Name: TEPAYC 

Entry Point: IEDAYC - entered from the TCAM User Interface routine 
(TEDOUI) when a CAFFTAGE macro instruction is coded in an INEUF or 
OTJTBTJF subgroup of an MH. 

functions: The TSO carriage subroutine initially links to the 
Termname Table code (IEDCTNT) to get the terminal entry from which it 
extracts the address of the Destination QCB. The TSO Carriage 
subroutine maintains a count in the QCB of carriage positions for 
keyboard devices, so that when output is sent, idle characters can be 
inserted properly. If a translation error has occurred, or if the 
current buffer is a zero-length buffer, the TSO Carriage subroutine 
passes control to the MH via the Feturn Interface routine (IIDQLM) . 
Otherwise, the subroutine scans the buffer, character by character, 
for new line characters and backspace characters. When it finds a 
backspace character, the subroutine decrements the carriage position 
count by one, unless the backspace is the first character in the 
buffer. When it finds a new line character, the subroutine resets the 
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carriage position count to zero, and, for 2260 devices, updates the 
OCB simulated attention line count, unless the new line is the last 
character in the buffer. If it is the last character, the TSO 
Carriage subroutine sets the QCE retry count field to reflect this, so 
that, when this subroutine is entered tc scan the next buffer, 
scanninq will beqin at the first character in the buffer. The TSO 
Carriage subroutine also zeros out circle Ds from all devices except 
2741s and STX/Addressing character sequences from 2260s, if they 
appear in input buffers. The subroutine also counts output lines for 
simulated attention by line count, and turns on the "simulated 
attention" bit in the SCB when required. After it has scanned all 
units of the buffer, the TSO Carriaqe subroutine updates the carriage 
position count in the QCE, and returns control to the MH via the 
Return Interface routine (IEDQLM) . 

External Koutine: TEDQTNT - Termname Table cede - to get the terminal 
entry from which it extracts the address of the Destination QCE. 

Tables/Work Areas: CVT, Time Sharing CVT, AVT, TSE, LCE, SCB, DCB, 
OCE, buffer prefix, terminal entry. 

Attributes: Reentrant, enabled, resident, problem program mode. 



Time Sharing Destination Scheduler (Chart YE) 

Module Name: IEDflYD 

Entry Point: IEEAYD - receives control tc initiate a write break 
operation, if necessary, and to assign a buffer or QCB to its 
destination. The VCON fcr this module (instead of for IEDQHM) is 
assembled as the destination for every line that can be used by TSO. 

Eunctions: The Time Sharing Destination Scheduler gets control in 
place of the TCAM Destination Scheduler when TSO is in the system. If 
this routine is activated because a TCAM buffer was tposted to it, it 
loads the address of the TCAM Destination Scheduler STCE (IEDQHM) into 
register 3, and branches to the Dispatcher bypass function to 
immediately activate the STCE. 

If the Time Sharing Destination Scheduler is activated by the 
tposting of a Time Sharing Destination QCE to itself, it sets the 
tposted bit off in the QCB and checks to see if a simulated attention 
Pead was requested. If it was requested, the Time Sharing Destination 
Scheduler immediately passes control tc the Dispatcher dispatch 
function. If net, this routine checks to see if TPUT requested a 
Write Ereak. If not, the scheduler passes control to the dispatch 
function. Tf a Write Ereak was requested, this routine loads the LCE 
address into reqister 4 and branches to the Time Sharinq Scheduler 
(IEDAYZ) to determine whether a Write Break channel command can be 
issued. If it cannot be issued, the Time Sharing Scheduler returns 
control to the Time Sharing Destination Scheduler, which then passes 
control to the Dispatcher dispatch functicn. 
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External routines: IEDAYZ - Time Sharinq Scheduler - to determine 
whether the Write Break channel command requested by TPDT can be 
issued. 

Tables/Work Areas: AVT r ICE, QCB, CCE, STCE, and TSID. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mcde. 



TSO TIOC Edit Routine (Chart YE) 

Module Name: IIDAYE 

Entry Point: IEEAYE - called by the TSODTPUT routine (IEDAYC) to edit 
output buffers or by the TSO Messaqe Generation routine (IEDAYM) to 
edit MSGGEN messaqes. 

functions: The TSO TIOC Edit rcutine inspects and edits output 
messaqes contained in TSO buffers and MSGGEN messaqes in the SCB. The 
routine moves edited TSO messaqes to TCAM buffers to be sent. MSGGEN 
buffers remain in the SCB. The rcutine uses the line size, the 
receivinq buffer size, and the presence of New Line characters in the 
messaqes for the EDIT scan. The user specified the line size for a 
TSO messaqe in the Time Sharinq block (TSB) . For . MSGGEN messaqes, the 
line size defaults to 12C bytes. If the maximum line size is reached, 
the TSO TIOC Edit routine inserts a new-line character and the 
appropriate number of reserve characters into the buffer to avoid 
overprintinq the line at the terminal. On one entry to it, the TSO 
TIOC Edit routine may move no more printable data to the TCAM buffer 
than the physical line size. If the messaqe to be sent will exceed 
the line size, the routine inserts the appropriate character (s) (based 
on terminal type) at the end of the line and reverts to the TSOUTPUT 
routine, with a return code (X'OC) indicatinq that the whole messaqe 
was not edited. The presence of a new line character in the buffer 
siqnifies the end of a complete line. At the end of a line or 
messaqe, the TSC TIOC Edit routine checks tc see if a simulated 
attention by line count was requested. If it was, the routine links 
to the TSO Simulated Attention routine (IEEAYS) to update the QCB 
simulated attention line count, and tc request a simulated attention 
*ead if the threshold is reached. Next, the TSO TIOC Edit routine 
checks to see if the messaqe is a ccntrcl or "ASIS" messaqe. These 
messaqes cannot contain standard line and carriaqe control characters. 
For these messaqes, the routine replaces any invalid characters (EOT, 
New line, Tab, etc.) with a colon to avoid proqram-caused I/C errors. 
In addition tc insertinq New line and reserve characters, and 
replacinq invalid characters, the rcutine inserts any other line 
control characters (that is, STX and ETX) and carriaqe control 
characters (that is, line feed characters) required to edit the 
messaqe for output to a particular terminal. Whenever a TIOC buffer 
is emptied, a line is filled, or when a messaqe is completely edited, 
the TSO TIOC Edit routine issues the QTIP (SVC 101) to update the 
offset and lenqth fields in the TIOC buffer prefix. If the TCAM 
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buffer accommodated the entire TSO buffer, the TSC TIOC Edit routine 
marks the prefix edited-in-full. Otherwise, the QTIP/SVC sets the 
offset to indicate the point in the TSO buffer to start editing on the 
next entry to the routine, and sets the lenqth to indicate the lenqth 
of the data yet to be edited. On return to the calling rcutine, the 
TSC TIOC Edit routine sets a return code (X'OO '-successful completion; 
X 'OC '-partial line or partial messaqe moved; XMO 1 - end of line 
reached) to indicate the status of the edit request. 

Note; On a 2260, this routine inserts New line characters only at the 
end of a messaqe when the number of characters is less than the line 
size. 

External Routines: 

• IEDQTNT - Termname Table code - to qet the terminal entry from the 
LCB terminal index or line entry, or frcm the invitation list for 
the line. 

• IEDAYS - TSC Simulated Attention routine - to handle requests for 
simulated attention by line count. 

• OTTP SVC rcutine - SVC 101 - to update the TIOC buffer prefix. 

^ables/Work Areas: CVT, Time Sharinq CVT , AVT, TSE, CCB, TSIE, LCB, 
SCE, DCB, terminal entry, TCAM buffer prefix used for TSO, TICC buffer 
prefix. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mcde. 



TSO IOHALT Eoutine (Chart YE) 



Module Name: IEDAYE 



Entry Point: IEDAYE - receives control from the TCAM Dispatcher when 
an LCE or an EBE is tposted to it from Line End Appendage (IGG019RO) 

Eunctions: The TSO IOHALT routine qets ccntrol when either an LCB or 
an EEB is tposted from Line End Appendaqe (IGG019EO) . Eor an LCB, 
this routine monitors for an attention if' the LCB open check op code 
has been set and if a Prepare has been issued for the line. When an 
attention occurs, this routine issues an IOHALT SVC (SVC 33) on the 
Prepare. It then exits tc the Dispatcher dispatch function to 
dispatch the next subtask. 

An EFB is tposted when a hardware attentxon occurs or when a 2741 
hanqs up. This rcutine locates the LCB froir the EBE and turns off the 
prepare bit. Then, if the LCB is in the time delay queue, this 
routine links first to the Time Delay subtask (IEDQHG) to remove it, 
and then to the Dispatcher priority function to insert the Receive 
Scheduler STCE into the LCB STCB chain by priority. If the LCB 
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completion code indicates that I/O ended on the line because of an 
TOHALT, the routine sets line free priority, and sets the ICE to be 
tposted to itself. If the line is connected to a 2741, and a Prepare 
CCW was interrupted, this routine indicates in the LCE that a circle 
D was sent and checks to see if the 2741 has hung up. If it has, the 
routine sets the ICB to be tposted to the ISO Hangup routine. If a 
Prepare CCW was not interrupted, but a circle D was sent, the routine 
sets the ICB tc indicate circle D sent. For 2741s that have not hunq 
up, and for all ether devices, the TSO IOHALT routine turns on the SCB 
hardware attention bit (SCBATTN) , and sets the LCB to be tposted to 
the TSO Attention routine. In all cases except when I/O was ended by 
TOHALT, the routine sets PCI priority. Finally, this routine links 
all previous elements in the chain, puts the QCB address in the LCB, 
indicates that the LCB is the new first element in the chain, and 
exits to the Dispatcher chain function to tpost all the elements in 
the chain to the appropriate QCBs. 

External Routines: 

• OS TOHALT routine (SVC 33) - tc halt I/O on the line. 

• TEDQHG - Time Delay subtask - to remove an LCB from the time delay 
queue. 

• IGG019PB or IGG019PO - TCAM Dispatcher tSPPPIOP entry point - to 
insert the Peceive Scheduler STCB into the LCB STCB chain. 

Tables/Work Areas; AVT, DCB, LCB, SCB, DEB, TSID, TPRIOE, EBE. 

Attributes; Peentrant, enabled, resident, problem program mode. 
TSO Hangup Poutine (Chart YH) 
Module Name; TEDAYH 



Entry Points; 

• IEDAYH (ENTPY1) - entered from the ISO INMSG/OUTMSG Linker 
(IEDAYX) tc determine whether I/O errors have occurred and whether 
a HANGUP macro is to be processed. 

• IEDAYH+12 (FNTPY2) - entered from the Line End Appendage 

(IGG019P0) to determine whether a HANGUP macro is to be processed. 

Functions; This module ensures that line errors associated with TSO 
terminals are identified to the terminal user and cancels the message 
that is in errcr. 

The TCAM Euf fer Disposition subtask (IEDQED) activates the TSO 
INMSG/OUTMSG Linker, which activates the TSC Hangup routine, when the 
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messaqe handler has processed a complete message and a HANGUP macro is 
specified. 

The TSO Hanqup routine first determines whether an error that it 
can handle has occurred. If no error is found, the routine returns 
immediately tc the TCAM Dispatcher. When an error is found, the TSO 
Hanqup routine branches to the Termname Table code (IEDQTNT) to get 
the terminal entry address. On return, the routine uses the terminal 
entry and the 1CB index to find the QCB associated with the error and 
determines whether the QCB belonqs to a TSO user. If the QCB does not 
belonq to a TSO user, the routine returns immediately to the TCAM 
Dispatcher. If the QCB is for a TSO user, the TSO Hanqup routine 
determines whether the error is permanent. If so, the routine sets 
flaqs to disconnect this line and turns off the SCE error word bits, 
issues a QTIP request (SVC 101) to turn en the TJBHUNG bit, invokes 
the Time Sharinq Interface Proqram (TSIP) with an entry code of 36, 
and activates the System Initiated Loqoff (SIL) to begin TSO logoff 
procedures. 

When no permanent errors are found, the TSO Hangup routine 
determines whether the line is sendinq cr receiving and performs the 
necessary error handling for either situation. If the retry count in 
the QCB is set (initially to three), and the line is sending, the 
routine decrements the count by one each time a countable error 
occurs. When the count is zero, the routine sets flags to disconnect 
this line, turns off the SCE error word tits, and issues a QTIP 
reguest as when a permanent error occurs. If the count is not zero 
and the line is sending, the TSO Hangup routine returns immediately to 
the TCAM Dispatcher. 

If the retry count in the QCB is set and the line is receiving, 
the TSO Hangup routine prepares a message to inform the terminal user 
of his status and decrements the count by one. When the count is 
zero, the routine sets flags tc disconnect this line, turns off the 
SCB error word bits, and issues a QTIP reguest as described for a 
permanent error above. When the retry court is not zero and the line 
is receiving, the routine tests the SCBTMINN field. If this field is 
not on, the routine cancels the iressage -just prepared and returns to 
the TCAM Dispatcher. If the SCBTMINN field is on, the routine sends 
the status message to the user and then returns to the TCAM 
Dispatcher. 

External Poutines: 

• IEDQTNT - Termname Table code - tc ccrvert the Termname Table 
offset to the address of the Terminal Table entry. 

• QTIP SVC - TSC SVC - to set a bit in the TJE. 

Tables/Work Areas: AVT, CVT, LCB, buffer prefix, QCB, SCE, TJB, Time 
Sharing CVT, TSE, TCT. 

Attributes: Reusable, refreshable, enabled, problem program mode. 
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TSINPUT Routine (Chart YI) 

Module Name: IEDAYI 

Entry Point: TECAYI+2 - activated by the TCAM Dispatcher when either 
the PCI Appendage or the Line End Appendaqe routes a message from a 
TSO terminal to the messaqe ccntrcl prcgram message handler for that 
terminal, or when one of the TIOC routines tposts the TSINPUT 
Destination OCE to itself to remove a systeir LWAIT condition. 

Functions: The TSINPUT routine moves incoming data frcm a TCAM buffer 
into a TSO buffer and places the TSO buffer in the TSO input buffer 
queue for processing by TSO TGET reguests. 

When the TSINPUT routine gets control and finds a TCAM buffer 
being passed to it for processing, the routine determines whether the 
message is to be canceled (PRFCNCLN bit is en). If this bit is on, 
all TCAM and TSO buffers associated with this message are freed, and 
the TCAM buffers are returned to the TCAM Dispatcher, 

If the message is not to be canceled, TSINPUT manipulates the 
transfer of incoming data from TCAM to TSO buffers in the following 
manner. 

The routine scans the text in the TCAM buffer for CR, Line Delete, 
and EOT characters. If a Line Delete character is detected, or if 
Attention for Line Delete occurred, the routine deletes the portion of 
the line to the previous CR (or to the beginning of the message). 
Otherwise, the routine moves each physical line to a TSO buffer or 
buffers. 

After the complete TCAM message has been processed, this routine 
flags each TSO buffer that contains part cr all of a complete TSO 
message as complete in the buffer prefix. If the data in a TCAM 
buffer does net complete a physical line, the routine flags the TSO 
buffer as a fragment in the buffer prefix (turns the EUFFFRAG bit on) . 
When the TCAM buffer that completes the physical line is processed and 
the data is moved to TSO buffers to complete the line, the TSO buffers 
are flagged complete (BUFFFRAG bit in each buffer is turned off) . 
Each TSO buffer is placed on the TSB input buffer queue in FIFO order. 
TSO TGET reguests may retrieve only complete messages from this gueue. 

If the incoming message has filled the maximum number of TSO 
buffers alloted to this terminal for input, the TSINPUT routine places 
the terminal in an LWAIT condition. That is, it locks the terminal 
keyboard on completion of the current line. LWAIT is entered by 
turning on the TSELWAIT and QCBNOBUF bits to prevent TCAM from issuing 
further READ instructions to the terminal. (Additional TSO buffers 
are obtained, if possible, to complete the current line.) 

When no TSC buffers are available to* move data into, incoming TCAM 

buffers are held in a buffer wait gueue. Whenever TCAM buffers are 

placed in this queue, the OCEBUFQ bit in the associated QCE is turned 

on to indicate that TCAM buffers are being held for this terminal. In 
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this case, a system LWAIT condition is entered; that is, all terminals 
currently in input mode enter an LWAIT condition as TSINPUT handles 
incominq data. System LWAIT has no effect en output mode or control 
mode terminals until output is complete or input is required. 

After a TTCC routine has released ere cr more TSO buffers, a check 
is made to see if a system LWAIT condition exists- If this condition 
does exist, the TICC routine tposts the the TSINPUT Destination QCB to 
itself. When TSINPUT qets control, it finds that no TCAM buffer is 
beinq passed. TSINPUT then determines whether any TCAM buffers are in 
the buffer wait queue. If this is the case, ISO buffers are obtained 
to remove the TCAM buffers one at a time, in FIFO order, until all are 
removed or no mere TSO buffers are available. 

When all TCAM buffers have been removed from the buffer wait queue 
(or when none were held) , TSINPUT determines whether sufficient TSO 
buffers are available tc remove the system LWAIT condition. If 
sufficient buffers are available, waitinq TSBs are removed from the 
wait queue in FTFC order, the correspendinq QCBTSBQ and QCBNOBUF bits 
are turned off, and TCAM issues a BEAD to unlock the effected terminal 
keyboards to allow input as soon as possible. 

If a terminal is in both a system LWAIT and a maximuir-number-of- 
TSO-tuffers LWAIT, the appropriate TSB is removed from the wait queue 
when the system is removed from LWAIT, tut the QCBNOBUF bit is not 
turned off to unlock the keyboard. The keyboard can be unlocked only 
when the associated application proqram frees sufficient buffers, 
throuqh one of the TIOC routines, tc allow the user tc continue. 

If the terminal is in input mode and a TCLEAFC instruction is 
issued, the TSBIFLSH bit is turned on to indicate that an input queue 
flush is in proqress. TSINPUT then checks the inccminq TCAM buffer to 
determine whether it is a buffer of the TCAM messaqe, If this is the 
first buffer of the messaqe, the TSBIFLSH bit is turned off, and 
normal buffer processinq continues. If the buffer is not first and 
not last, the data is dropped and the buffer is returned. If this is 
the last buffer of the messaqe, the data is dropped, the buffer is 
returned, and the TSBIFLSH bit is turned off to indicate TCLEARQ 
completion. In addition, when TSINPUT finds the TSBIFLSH tit on, the 
routine returns any TCAM buffers associated with this terminal that 
are on the buffer wait queue, and turns off the correspondinq QCBBUFQ 
bit. 

If the received messaqe is a partial line caused by a break-in, 
the partial line is sent back to the terminal after completion of 
output to allow the user to complete his messaqe. The partial line is 
also placed on the input queue. 

When TSINPUT finds that a break-in has occurred (LCEWBEBK bit on) , 
and if the incominq TCAM buffer does not end in a CR, Line Delete, or 
EOT character, the routine turns the correspondinq TSEEBKIN bit on to 
indicate to TSOUTPUT that a partial line exists, in TSO buffers, for 
promptina. The correspondinq TSO header buffer is flaqqed as a 
partial line (BUFFPABT bit is turned on) . At this point, the terminal 
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Destination QCB is tpcsted to itself to activate the send operation 
that sends the break-in messaqe and prompts the user. 

If TSINPUT finds the TSBBIPI tit en, the incominq TCAM buffer is 

the completion of a break-in messaqe that was sent to the user to 

complete. TSINPUT turns off the TSBBIPI bit and completes the partial 
messaqe on the input queue by addinq the new data to it. 

If automatic line numberinq is in proqress (TSBAULST and TSBAUTON 
bits are on) , the current line number is incremented as each complete 
line is received. The next line number is sent when line completion 
occurs (EOT or FOB is received) by turninq on the SCBALN bit. The 
user can terminate automatic line numberinq at any time by enterinq a 
null line. 

When line completion occurs, TSINPUT turns off the QCEREAD and 
OCBTGET bits to indicate that REAE no lenqer has priority and that any 
TGET requests have been satisfied. If the user is not in main storaqe 
and a TGET request has not been satisfied (an IWAIT condition exists) , 
control is passed to the Time Sharinq Interface Proqrair (TSIP) , which 
sets the "restore" flaq in the TJB and pests the RCT to release the 
user from TWAIT. If the user is in main storaqe and an IWAIT 
condition exists, TSINPUT flaqs all TCBs as dispatchable and continues 
normal processinq. 

TSINPUT always exits to DSPCHAIN in the TCAM Dispatcher when 
processinq is complete or can no lenqer continue. 

External Routines: 

• IEDQTNT - Termname Table code - to qet the address of a terminal 
table entry. 

• OTTP SVC - TSC SVC - activated with appropriate entry codes, to 
delete a iressaqe fraqment, to terminate TCLFAEQ processinq, to 
delete the input line currently beinq scanned, to move scanned 
data from TCAM to TSO buffers, and to put the system into LWAIT or 
put a TSB on the waitinq TSE queue. 

Tables/Work Areas; AVT, CVT, Time Sharinq CVT, DCE, IOE, ICE, buffer 
prefix, OCE, SCE, TIOCEUE, TTOCRPT, Terminal Table, TSE, TSI. 

Attributes; Reusable, refreshable, problem prcqram mode. 

TSO logon Routine (Chart YI) 

Module Name: TIDCYL 

Entry Point: TEEAYL - activated by the User Interface routine 
(IEDOUI) when a LCGON macro is coded in a TSO messaqe handler. 
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^unctions: The TSO Icqcn routine informs the TSO system when a 
potential TSO user attempts to loq onto the system and to route TSO- 
bound messaqes to the TSINPUT routine (IEDAYI) . 

The TSO Lcqcn routine first initializes the ICETTCIN field in the 
LCB and the PFESRCE field in the prefix cf the buffer that contains 
the loqon request. The routine locates the proper Destination OCB via 
the Termname Table code (IEDQTNT) and then routes the message. If a 
Time Sharinq session is already in prcqress with the terminal in 
question, the loqcn request in the buffer is not an initial request. 

If the TSO session is in proqress, the routine scans the messaqe 
handler for a IOGCN macro request, and if cne is net found, performs 
one of the follcwinq actions: 

• Requests TCAM to cancel this buffer. 

• If the Locate Option routine (IEDQAE) is present, branches there 
to find the options for the NCIOG user-exit routine, if one 
exists. If a user-specified NCLOG exit routine is specified, the 
TSO Loqon routine branches there tc process the buffer. 

If neither of these actions can be performed, the TSC Lcqon routine 
does one of the fcllowinq: 

• If TSO is net in the system, tells the user that TSO is not 
runninq and returns control to the messaqe handler via the Return 
Interface routine (IEDGLM) . 

• If the environment is TCAM-TSO, sends the user the 'try aqain' 
messaqe and returns control to the messaqe handler via IEEQLM. 
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If the environment is TSO only and the CCB retry count does not 
already exist, sets up a count, sends the 'try aqain' messaqe, and 
returns to the messaqe handler via IEDQLM. 

• If the environment is TSO only and the CCB retry count has been 
previously set up, decrements the ccunt by one, sends the 'try 
aqain' messaqe, and returns tc the messaqe handler via IEDQLM. 

• If the environment is TSO only and the CCB retry count is zero, 
advises the user that his loqon attempt has failed, tells TCAM to 
disconnect the terminal, and returns control to the message 
handler via IEDQLM. 

If there is a LOGON macro request in the message handler, the TSO 
Loqon routine puts blanks in the buffer tc overlay any characters 
preceedinq the characters LCGON. Then the routine performs one of the 
follcwinq actions: 

• If the terminal cannct support ISO, tells the user that the 
terminal cannot receive TSO messaqes, marks the buffer 'to-be- 
canceled', and returns control to the messaqe handler via IEDQLM. 
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If the terminal is held (unable to receive messages through normal 
means) , qenerates a messaqe to inform the user, sets flags to 
cancel the buffer, and returns to the message handler via IEDQLM. 

If TSO is not in the system, advises the user of this fact, sets 
flags to cancel the buffer, and returns to the message handler via 
IEDQLM. 

If the maximuir number of TSO users has already logged on, advises 
the last user to log en of this fact, sets flags to cancel the 
buffer, and returns control to the message handler via IEDQLM. 

If TSO does net have the maximuir number of users already logged 
on, the routine performs its initialization procedures for TCAM. 
The routine places zeros in the QCEFETCT, QCBSATCT, QCBTSOF1, 
0CBTS0F2, and QCBCAFCT fields cf the QCE. The routine then places 
in the CINHIBIT field the value of the TCT in the QCEINHEN field 
and turns en the QCETSSES switch. Next, the routine performs the 
initialization for TSO by issuing a QTIP (SVC 101) reguest to 
activate the logon procedure in the TSO region. The QTIP SVC 
searches the TJB chain for an available TJB. If a TJB is not 
free, the SVC places a X'00 1 return cede in register 15 and 
returns control to the TSO Logon routine. The TSO Logon routine 
activates the Locate Option routine (IEDQAE) . If the return code 
from IEDQAE indicates that logon initialization is reguested, the 
TSO Logon routine performs the TCAM and TSO initialization 
procedures then returns control to the message handler via the 
Return Interface routine. 

Tf a free TJB is found, the QTIP SVC increments the TSCVTCUS 
field by cue (to include the current user), turns on the TSCLOGON 
field in the Time Sharing CVT to indicate that a LOGON has been 
issued, and puts in the TJB the address of its associated TSB 
entry and QCB. At this point the QTIP SVC places the characters 
•STARTING 1 into the TJBDSER field to denote a new user, turns off 
the TJBNJB bit to indicate that this TJE is being used, turns on 
the TJBLCGCN bit to indicate a LCGCK reguest, and turns on the 
TSBINUSE bit to indicate a used TSB. Next, the SVC turns off the 
TSBATNLD bit so that the attention key on the terminal cannot 
activate the line delete function. The QTIP SVC initializes the 
TSBLNNO, TSBLNSZ, TSBSTCC, and TSBDSPIY fields according to the 
terminal type indicated either in the UCB or in the Device 
Characteristics Table (DCT) and, depending on the terminal type 
found, may turn on the TSBATNLD bit. The SVC places the contents 
of the FFFSFCE field from the buffer prefix into the TSBASRCE 
field, calculates the adjusted maximum input and output buffers 
allowed to each user and inserts them in the TIOCHPT field, posts 
the LOGON ECE for the Time Sharing Control program, places the 
value of the TJBTJID field in register 15, and returns control to 
the TSO Lcgcn routine. If register 15 contains a zero, the Logon 
routine performs the same processing that was done when no free 
TJB was found. 
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External Routines; 

• IEDQTNT - Termname Table code - to qet the address of a Terminal 
Table entry. 

• TEDQAE - Locate Option Routine - to find the address of the option 
field. 

• OTIP SVC - TSO SVC - tc perform initialization for TSO. 

Tables/Work Areas: AVT, CVT r DCB r DEB, ICE, buffer prefix, QCE, SCE, 
TCT, TIOCRPT, TJE, Time Sharinq CVT. 

Attributes; Reusable, refreshable, enabled, problem program mode. 

TSO Message Generation Foutine (Chart YM) 

Module Name: IEDAYM 

Entry Points: 

• IEDAYM - called by Buffer Disposition (IEDCBD) to process a MSGGEfl 
message, or called by the TSO Simulated Attention routine (IEDAYS) 
to process a simulated attention message for a simulated by time 
interval. 

• AYM000 - called by the TCAM Dispatcher (TGG019BE) to process any 
other type of message. 

Functions: The TSO Message Generation routine processes a message, 
which may be provided in one of three places. If the messaqe is 
generated in a MSGGEN macrc instruction, it is located in the macro 
generation. If a simulated attention READ was requested, this routine 
qenerates a simulated attention messaqe from a constant. If an 
automatic line numberinq messaqe of a prompt messaqe was requested, 
the messaqe is located in a user-specified field in the Terminal 
Status ^lock, which is in the TSO reqion. 

If the messaqe was not qenerated by MSGGEfl, the TSC Messaqe 
Generation routine checks to see if the last buffer of the messaqe has 
been tposted (that is, it has been processed by the TSINPUT routine) . 
If it has not this routine exits to the Dispatcher chain function to 
tpost the buffer. If the buffer has been tposted, this routine links 
to the Termname Table code (TEDOTNT) , qets the terminal entry, and 
extracts the QCE address from it. At this pcint, if the messaqe does 
not fall into any of the above three cateqcries,. this routine exits to 
the Dispatcher chain function tc tpost the EBB to Buffer Disposition 
(IEDOBD) . 

The TSC Messaqe Generation routine qains access to the messaqe 
from whichever location applies, and sets the LCB to activate the 
terminal. The routine qains access to the translation table from the 
DCB, or, if the messaqe is qenerated from a MSGGEN macro with a code 
operand, from the macro qeneration. If translation is via a TRANLIST 
macro, this routine links to the Locate Option Field Address routine 
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(IEDOAE) via the User Interface routine (IEDOUI) to locate the option 
field containinq the translation table. If for any reason the message 
can not be tranlated, this routine turns off all SCB error word bits 
and all bits in the LCB sense byte, turns off the SCB translation 
requested bit, indicates that the remaininq TNMSG or ODTMSG macros are 
to be bypassed, and exits to the Dispatcher chain function to tpost 
the EFB to Buffer Disposition. 

The TSO Messaqe Generation routine left-iustif ies the message if 
necessary, and moves it to the niultiple-buf f er-^scan save area in the 
SCB. This routine then links to the TSO TIOC Edit routine (IEDAYE) to 
edit the messaqe. Upon return, this routine translates the messaqe to 
line code, sets the priority and CCW in the LCB, and exits to the 
Dispatcher chain function to tpost the EPB to the Activate-I/O 
Generator subtask (IEDOKA) . 

The TSO Messaqe Generation routine also provides simulated 
attention support for 2260 devices. For remote 2260s, it indicates a 
write erase coirirand if requested. For local 2260s, it indicates a 
write erase command, and sets the data address and count in the CCW, 
if erase is requested. 

External Routines; 

• TEDOTNT - Termname Table code - to qet the terminal entry from the 
terminal or line index in the ICB. 

• TEDQAE - locate Option Field Address routine - to locate the 
translation table option field for the TPANLIST macro (via the 
User Interface routine - IEDOUI) . 

• IEDAYE - TSC TIOC Edit routine - to edit the messaqe. 

Tables/Work Areas: CVT, Time Sharinq CVT, AVT, LCB, CCE, SCB, DCE, 
TSB, TSID, terminal entry, TPBIOF, ERE. 

attributes: Reentrant, refreshable, enabled, resident, problem 
proqram mode. 

TSOUTPUT Routine (Chart YO) 

Module Name: IEDAYO 

Entry Points: 

• IEDAYO - activated by the TCAM Dispatcher when a TPUT macro is 
issued to move data from TSO buffers into TCAM buffers. 

• IEDAY002 - activated by the TCAM Dispatcher to return TSO buffers 
to the TSC available buffer queue. 

Functions; The TSOUTPUT routine supervises the movement of TSO data 
from TSO buffers into TCAM buffers. The routine must qet empty TCAM 
buffers, fill these buffers with TSO data, return the TSC buffers to 
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the TSO available buffer queue, and route the full TCAM buffers to the 
appropriate TSO terminal fcr cutput. 

When a user issues a TPTJT instruction tc request output of a 
messaqe, the TFUT SVC moves the messaqe into TSO buffers and turns on 
the OCBTPUT tit in the Destination QCB. This causes the Send 
Scheduler to tpost an EBB to the TSOUTPUT QCB to request TCAM buffers 
for the messaqe from TSO. 

The TSOUTPUT routine satisfies this initial request by 
constructinq the required number of TCAM buffers from units taken from 
the buffer unit pool. The routine determines the number of units per 
buffer accordinq to the buffer size specified in the DCE or in the 
Terminal Table entry and determines the number of buffers for the 
initial request from the value specified in the DCB BUFOUT parameter. 

If while buildinq the TCAM buffers, the TSOUTPUT rcutine cannot 
obtain units, it places the ERE on the Buffer Return QCE element chain 
and exits tc the TCAM Dispatcher. When a unit is available, the 
Buffer Return routine (IEDCGD) tposts the unit to the TSOUTPUT QCB at 
its secondary entry point - IEDAY002. If, in this situation, the 
LCBERROR bit in the ICB is off, the TSOUTPUT routine continues to 
build buffers. If, however, the error bit is on, the routine tposts 
the unit and any part of a TCAM buffer that is built to the Buffer 
Return QCB to free the units, tposts the ERE to the address in the 
LCERCQCB field, and exits to the TCAM Dispatcher. 

As each unit is obtained, the TSOUTPUT routine branches to the TSO 
TIOC Edit routine (IEDAYE) to move data from the TSO buffers into the 
unit. The TSO TICC Edit routine also edits the data from carriaqe 
control characters, reserve characters, new line characters, simulated 
attention characters, and EOT characters. The TSC TIOC Edit routine 
issues a QTIP SVC to update the data count in the TSO buf f er (s) from 
which it has mcved data. This routine then places one of the 
followinq return codes in reqister 15 and returns to the TSOUTPUT 
routine: 

X'OO' - A complete TSO messaqe has beer mcved. 

X'OC - A complete TSO messaqe has not been moved and the 
terminal line is net filled, that is, not ready for 
transmission. 

X'10' - A complete TSO messaqe has not been moved, but the 
terminal line is filled. 

When the TSCUTPUT routine reqains ccntrcl from the TSO TIOC Edit 
routine, it examines the return code and executes accordinq to that 
value. 

• Return code of X'OO 1 

When a complete TSO messaqe has been mcved into TCAM buffers, the 
TSOUTPUT routine examines the TSB to determine whether automatic 
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prompting is specified. If so, the routine sets the corresponding 
indicator in the SCB (SCEALN) . The routine then sets the "end of 
message" indicator in the ICB, tposts the ERE with the full 
buffers to the Activate OCB to initiate sending, and exits to the 
TCAM Dispatcher. 

» Return code of X'OC 

When a complete TSO message has not teen moved and the terminal 
line is net filled, the TSOUTPUT routine determines whether a 
complete TCAM buffer has teen constructed. If not, the routine 
gets another unit from the buffer unit pool and repeats the 
procedure to fill it. When a complete tuffer has been built and 
there is still part of the TSO message to be moved, the TSOUTPUT 
routine determines whether the maximum number of TCAM buffers 
allowed for this reguest has been reached. If not, the routine 
continues to build buffers. Otherwise, the routine sends the 
buffers alreadv constructed by tposting the ERE to the Activate 
OCB. If dynamic buffering is not specified (PCI specified in the 
DCB) , the routine sets the "end of message" indicator in the ICB 
(1CBECMSG) before exiting to the TCAM Dispatcher. 

• Return code of XMO' 

When a complete TSO message has not been moved and the terminal 

line is filled, the TSOUTPUT routine tposts the ERE with the data 

in the TCAM tuffer (s) and/or part of a tuffer to the Activate QCE 
and then exits to the TCAM Dispatcher. 

The PCI Appendage activates the TSOUTPUT routine when the ICBEOMSG 
bit is off and dynamic buffering is specified. The appendage tposts 
to the TSOUTPUT QCB an ERB to reguest more TCAM buffers when the data 
in the current buffers is successfully transmitted. The TSOUTPUT 
routine p ocesses this reguest the same as an initial reguest except 
that the TSOUTPUT routine individually tpests each TCAM buffer built 
to the appropriate TCAM message handler. For all except the first PCI 
reguest, the routine can tpost only one TCAM buffer before giving 
control to the TCAM Dispatcher. On subseguent PCI reguests when the 
LCEERECT bit is not egual to zero, the TSOUTPUT routine must tpost its 
own OCB to itself before branching to the TCAM Dispatcher. 

The Send Scheduler activates the TSOUTPUT routine when the data in 
the TCAM buffers has been successfully sent and the LCEEOMSG bit is 
on. The scheduler tposts to the TSOUTPUT QCB the last TCAM buffer 
from which data was sent. The TSOUTPUT routine frees the empty TSO 
buffers and removes any wait conditions that are relieved by freeing 
these buffers. If the LWAIT can be relieved or if the TSINPUT routine 
(TEDAYT) is holding TCAM buffers, the TSCUTPUT routine tpests the 
TSINPUT OCE to itself. Next, if there are more messages to send or if 
the user has hung up, the routine leaves the TCBTPUT bit on so that 
the Send Scheduler will tpost the TCAM Buffer to the Buffer Return QCB 
and returns control to the TCAM Dispatcher. 
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Note from the discussi.cn in the preceding paragraph that as lonq 
as the OCBTPUT "bit is en, that is, as lenq as there is data on the 
output queue, "initial" requests for TCAM tuffers continue to occur. 
Tn this way a TSO messaqe that is toe lenq to be contained in the 
number of TCAM tuffers allowed in an "initial" request (in one output 
line) , are completely sent even if dynamic tufferinq is net specified. 

The Send Scheduler also activates the TSOUTPUT routine when there 
is no data on the output queue. In this case, if a break-in messaqe 
has iust been sent and there is a Partial input messaqe on the input 
queue to be sent to prompt the user (TSEEEKIN is on) , the TSOUTPUT 
routine issues a CTIP SVC to indicate that the partial input situation 
is handled (TSBBPKIN is off and TSEBIPI is on) and to put the partial 
input messaqe on the output, as well as the input, queue. After this, 
the messaqe is processed like any ether messaqe except that when the 
messaqe is successfully sent, the TSOUTPUT routine leaves the TSO 
buffers on the input queue (does net free them) . 

When the Send Scheduler activates the TSOUTPUT routine with no 
data on the output queue and the TSBBEKTN bit is off, the TSOUTPUT 
routine determines whether the user is beinq loqqed off (TSBDISC is 
on). Tf so, the routine activates CPB Initialization (TEDQFA) to 
restore the TCAM control blocks and to facilitate another leq on. On 
return, the TSOUTPUT routine restores the TSO ccntrol blocks and 
determines whether there are any abnormal conditions that require 
special messaqes to be sent to the terminal user. If a special 
messaqe is required, the routine exits to the TSO Messaqe Generation 
routine (TFDAYM) to transmit the messaqe. If no loq off messaqe is 
required, the TSOUTPUT routine determines whether automatic promptinq 
should be started (TSESTAUT is on) . If so, the routine turns off 
TSBSTAUT and exits to the TSO Messaqe Generation routine, which sends 
the automatic prompt messaqe. If there are no special messaqes to be 
sent, the TSOUTPUT routine tposts the LCB tc itself and exits to the 
TCAM Dispatcher. 

When an FEE is tpested to the TSOUTPUT QCB and the recall 
indicator (LCEECLLfl) is on, an input/cutput error has occurred. For 
an input error (LCBBFCVN is on) , the TSOUTPUT routine reinitializes 
the TCAM buffer to receive the input messaqe aqain, tposts the FEB to 
the address in LCBFCQCB, and exits to the TCAM Dispatcher. For an 
output error (ICBSFNDN is on) , the TSOUTPUT routine issues a QTIP SVC 
to reinitialize the TSO buffers that contain the messaqe to be resent 
to appear as they did oriqinally on the "initial" request. At this 
Doint, the TSOUTPUT routine processes the messaqe like an initial 
request, except that the routine tposts the FEB to the address in 
LCEKCQCB, rather than to the Activate QCB, before returning ccntrol to 
the TCAM Dispatcher. 

On any "initial" request, the TSCUTPUT routine performs the 
followinq tests and functions: 

1. If TSO is atendinq (AVTTSAB is en), the TSOUTPUT routine exits to 
CPB Initialization to initialize the TCAM ccntrol blccks and, on 
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return, sends an abend messaqe to the terminal (via the TSO 
Message Generation routine) . 

2. If a hardware attention has occurred (SCEATTN is on) r the TSOUTPUT 
routine tpcsts the ICB to the ISO Attention routine (IEDAYA) and 
exits to the TCAM Dispatcher. 

3. If a hana up situation exists (TJEHUNG is on), the TSOUTPDT 
routine clears the input and output queues, activates CPB 
Initialization to initialize the TCAM control blocks, initializes 
the TSO control blocks, and exits to the TCAM Dispatcher. 

On subsequent or PCI requests, the TSOUTPDT routine checks for a 
hardware attention (SCBATTN is en) . If a hardware attention is 
indicated, the TSOUTPDT routine puts zeros in the EEB buffer chain 
pointer field and exits to the TCAM Dispatcher. Otherwise, if the 
LCBEHEOE bit is on, the routine tposts the ERE to the address in 
LCEECOCE and exits to the TCAM Dispatcher. 

when a display station user enters data on the last cr next- to- 
last line of the screen, the data is erased. In this situation, the 
TSINPUT routine sets the TSBBPKIN bit in the TSB. When the TSOUTPUT 
routine qains control and this bit is on, the routine must resend the 
last input messaqe or, if the messaqe is lenq, the last full input 
line and any fraqment of a line. The TSOUTPUT routine handles this 
situation }.ike a partial input line with a break-in except that after 
handlinq the display messaqe the routine turns off the TSBBIPI bit. 
^his differentiates the display messaqe situation from a real break-in 
situation. 

External Poutines: 

• TEDAYE - TSC TIOC Edit routine - to move data from TSO to the TCAM 
buffers and tc edit the data for control characters. 

• TEDQFA - CPB Initialization routine - to perform TCAM cleanup 
processinq. 

• OTIP SVC - TSO SVC - to update the data count in the TSO buffers. 

Tables/Work Areas: AVT, CVT, DCE, E^B, ICE, buffer prefix, QCE, SCB, 
STCB, TIOCBUE, TIOCPPT, TJB, Terminal Table, TSB, Time Sharinq CVT, 

TSI. 

Attributes: Feentrant, refreshable, reusable. 



STA^TMH Subtask for TCAM-TSC Mixed (Chart YE) 
Module Name: IEDAYP 
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Entry Point; IEDQAA01 - activated by the TCAM Dispatcher when a 
buffer is tposted to the STABTMH QCB to initialize the buffer before 
sendinq it thrcuqh a TCAM cr TSO message handler. 

"Functions: The ST.ABTMH subtask for TCAM-TSO Mixed initializes a 
buffer before sendinq it throuqh a TCAM cr TSO messaqe handler. The 
functions vary dependinq upon whether the buffer is a header or a text 
buffer, and whether it is to be processed by the incorainq or outqoinq 
side of the messaqe handler. 

The STAETMH subtask for TCAM-TSO Mixed first checks for a recalled 
buffer. If the buffer is recalled, the subtask performs no 
initialization but does check for translation. If the buffer is an 
outqoinq buffer and the destination terminal is in lock mode, the 
subtask increments the LCB count of outstandinq lock responses 
(LCBINCAM) and turns off the prefix lock bit (PEFEOFF) . If the 
buffer, incominq or outqoinq, is a TC&M/TSO buffer, the subtask 
initializes the LCB reserve count (LCEISZE) to zero. Then the subtask 
checks to see if the buffer is a header or a text buffer. For all 
header buffers the subtask sets the address in the SCE multiple- 
buffer-header entry (SCEMBHEN) to zero. Next, the TSC STABTMH subtask 
checks to see if the buffer is to be processed by an inccminq or 
outqoinq MH. The subtask then tailors the processinq tc each of the 
four situations. 

For an incominq header buffer, the STAETMH subtask for TCAM-TSO 
Mixed initializes the prefix field (PB"?SBCE) from the current terminal 
index in the ICE (LCBTTCIN) . The subtask then clears the SCB priority 
(SCBPBI) and cutoff ccunt (SCEEKFCT) tc zero. If the buffer is a 
TCAM/TSO buffer, the subtask branches to the exit code. Tf the buffer 
is strictly a TCAM buffer, the subtask sets the prefix scan pointer 
(PEFSCAN) to pcint to the last byte cf the prefix, or to the last 
reserve character, if specified. If the source of the messaqe was an 
application prcqram, the subtask branches to the exit code. 
Otherwise, the subtask checks to see if an EOA sequence was defined in 
the Special Characters Table. If the sequence was defined, the 
subtask links to the Skip Forward and Scan routine (TEDQAI) to see if 
the EOA sequence is in the buffer. If the EOA sequence is in the 
buffer, the subtask sets the prefix scan pointer to point beyond it. 
For 1030s and Eemote 2260s the subtask moves the prefix scan pointer 
beyond the addressinq character that fellows the EGA sequence for 
these devices. The subtask then determines if the terminal is in lock 
mode and if sc branches to the exit code. Otherwise, the subtask 
checks to see if the buffer contains an On-line Test messaqe. For 
binary synchroncus (BSC) lines the subtask checks a bit (LCBSYNC) in 
the LCB: for start/stop lines the subtask links to the Skip Forward 
and Scan routine to see if an On-line Test sequence is in the buffer. 
If the buffer contains an On-Line Test messaqe, but On-line Test is 
not in the system, the subtask sets a bit in the SCB error word 
(SCBOLTR) and branches to the exit code. If On-Line Test is in the 
system, the subtask sets the On-Line Test priority bit (PEIONLT) in 
the buffer prefix and exits to the Dispatcher post function to tpost 
the buffer to the On-Line Test QCE. If the buffer does net contain an 
On-Line Test messaqe, the subtask branches to the exit code. 
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For an inccminq text buffer, the STAFTMH subtask for TCAM-TSO 
Mixed initializes the prefix source field as for an incoming header 
buffer. If the MH to receive the buffer is a TSO MH, the subtask 
checks to see if the destination is in the TSINPUT QCB. If the 
destination is not in the QCB, the subtask checks for a LCGCN exit. 
If one is net present, the subtask branches to the code for a 
translation check. If a LOGON exit is present, the subtask 
establishes a new OCE and MH, and branches to the new Mfi. If the MH 
to receive the buffer is not a TSO MH , the subtask initializes the LCB 
reserve count from the count specified in the DCB at BCEFFSEF+1, and 
sets the prefix scan pointer to point tc the last byte of the text 
prefix, or to the last reserve character, if specified. Then the 
subtask branches to the translation check cede. 

For an outqoina header buffer, the SISPTMH subtask for TCAM-TSO 
Mixed immediately branches to the exit code if it is a TCAM/TSO 
buffer. If the buffer is a TCAM buffer, the subtask checks for a 
LOGON exit. If one is present, the subtask sets up and branches to 
the new MH as described above. If no LOGON exit is present, the 
subtask performs FFFO updatinq. Normally, the subtask updates the 
FFFO pointer in the Destination (priority) QCB, and turns off the 
'currently sendinq* flaq in the Master QCE. However, there are three 
situations in which this is not done; (1) if the destination terminal 
is in lock mode with an application proqram, the subtask cannot update 
the FFFO pointer until the terminal is unlocked; (2) if the line is in 
initiate mode, the subtask cannot update the FEFO pointer until the 
last buffer of the initiate messaqe has been processed throuqh the MH; 
(3) if a text transfer error qenerated a zero-^lenqth buffer, the 
subtask cannot update the FEFO pointer because the buffer will not be 
sent to the destination. If the destination terminal is in both lock 
and extended lock modes, the subtask turns off both lock bits 
(SCBLCKIN and SCBMSGLN) . After it has completed any FEFO updating, 
the subtask sets the LCB reserve count to zero for zero-length 
buffers, or tc the value in the scan pointer for non-zero-length 
buffers. The subtask sets the prefix scan pointer to point to the 
last byte of the header prefix, or to the last reserve character, if 
specified. In addition, for non-zero-lenqth buffers the subtask links 
to the Termname Table code (TEDOTNT) to qet the terminal entry, saves 
the current output sequence number in the SCB (SCEOSEQ) , and 
increments the output sequence number in the terminal. entry 
(TFMOUTSQ) . If this sequence number then exceeds the maximum output 
sequence number, the subtask branches to the exit code. 

For an outqeinq text buffer, the STARTMH subtask for TCAM-TSO 
Mixed immediately branches to the translation check code if the 
buffer is a TCAM/TSO buffer. Otherwise, the subtask checks for a 
LOGON exit. If one is present, the subtask sets up and branches to 
the new MH as described above. If no LOGCN exit is present, the 
subtask initializes the LCB reserve count tc zero, sets the prefix 
scan pointer to point to the last byte of the text prefix, and 
branches to the translation check code described below. 

The STAFTMH subtask form TCAM-TSO Mixed handles buffer translation 
for the followinq types of buffers: (1) inccminq text buffers directed 
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to a non-TSO MB; (2) incominq text buffers directed to a TSO MH 
without a LOGON exit; (3) outqoinq TCAM (non-TSO) header buffers; and 

(4) all recalled buffers. The translation check code first checks for 
a zero-lenqth buffer. A zero-lenqth buffer is not translated. Next 
the translation check code checks the SCE tc see if a translation was 
requested. If no request was made, the buffer is not translated. If 
a request was made, the subtask links to the Translate Buffer routine 

(IEDQAW) » via the User Interface routine (IEDQUT) , to translate the 
buffer. If the SCB multiple- buff er-header field is zero, the subtask 
branches to the exit code. If not, the subtask indicates the presence 
of the multiple-buffer header by settinq a neqative value in reqister 
and loadinq the address of the User Interface routine in reqister 15 
before branchinq to the exit code. 

The exit cede of the STABTMH subtask for TCAM-TSO Mixed qets the 
address of the first instruction in the MH and sets an increment of 
4096 in reqister 2 for multiple base reqister support. If a multiple- 
buffer header is present, the subtask sets a condition code of 4 in 
the PSW. Otherwise it sets a condition cede of 1 in the PSW if the 
line is sendinq or 8 if the line is receivinq. These condition codes 
are tested by the code qenerated by the STABTMH macro instruction. 
The subtask then exits tc the first executable instruction of the MH. 

External Routines: 

• IEDQAI - Skip Forward and Scan routine - to scan for an EOA 
sequence or On-line Test sequence in the buffer. 

• TEDOAW - Translate Buffer routine - tc translate the buffer. 

• IEDQTNT - Termname Table code - to qet the terminal entry for the 
destination of an outqoinq header buffer. 

• IEDOUI - User Interface routine - tc link to IEDOAW to translate 
the buffer and to re-enter an uncompleted routine. 

Tables/Work Areas; AVT, LCB , SCB, DCB, DEB, UCB, GCB, buffer prefix, 
terminal entry. Special Characters Table, TPPIOF, EBB. 

Attributes; Serially reusable, refreshable, enabled, resident, 
problem mode. 



TSO Simulated Attention Poutine (Chart YS) 
Module Name; IEDAYS 
Entry Points: 



IEDAYS - receives control from the TCAM User Interface routine 
(IEDOUI) to handle simulated attention by character strinq. 
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• TEDAYS2 - receives control from the TSC TIOC Edit routine (IEDAYE) 
to handle simulated attention ty line count. 

• TEDAYS3 - receives control from the TCAI? Dispatcher (TGG019RB) to 
handle simulated attention by time delay interval, 

^unctions: The TSO Simulated Attention routine handles simulated 
attention for TSO. The three ways of simulating attentions are (1) by 
character string, (2) by line count, and (3) by time delay interval. 

For simulated attention by character string, the TSC Simulated 
Attention routine first checks to see if the Time Sharing buffer was 
read by the Simulated Attention Bead channel program. If it was not, 
the routine checks to see if the device is a 2260. If the device is 
a 2260 and the screen is full, the routine sets the "erase display 
request" bit ir the SCB error word. The TSO Simulated Attention 
routine then scans the buffer for a clear character string, which 
indicates that the screen is to be erased immediately. If this strinq 
is present, the routine immediately tposts the buffer to Buffer 
Return, and no additional simulated processing takes place. 

If the device is not a 2260, or if nc clear character string is 
present in the buffer, the TSO Simulated Attention routine checks the 
OCE to see if simulated attention by character string was reguested. 
If it was not, the routine returns control to the Return Interface 
routine. The TSO Simulated Attention routine also returns control 
immediately if a simulated attention by character string was requested 
but no valid simulated attention character string is found in the 
buffer. If the routine finds the character strinq, it checks to see 
if a valid attention level (a number 1 throuqh 9 followed by a 
carriaqe return or a new line symbol) was also entered. If it was 
entered, the routine sets the attention level in the SCE. An invalid 
attention level causes the TSC Simulated Attention routine to 
immediately return to the Return Interface routine* After setting the 
attention level, this routine sets on the "simulated attention 
reguest" bit in the SCB error word, tposts the buffer to Buffer 
Return, and returns control via the Return Interface. 

If the buffer was read by the Simulated Attention Read channel 
proaram, the TSO Simulated Attention routine turns off the "simulated 
attention read" bit in the Destination QCE. In this case, a simulated 
attention character strinq is not required. If one was entered, the 
routine checks it for validity, and also checks the attention level. 
However, in this case, an invalid character strinq or attention level 
does not prevent the buffer from being tposted. Instead, the routine 
sets an attention level of zero and tposts the buffer and returns as 
stated above. Also, in this case, the routine automatically sets the 
"erase display request" bit for 2260s, but makes no check for a clear 
character string. 

"For simulated attention by line count, the TSO Simulated Attention 
routine counts each physical output line and keeps the count in the 
destination OCE. When the threshold specified by the user in the 
Terminal status Block is reached, the routine reguests a special 
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simulated attention channel proqram by setting en the "simulated 

attention read request" bit in the QCB and settinq the output line 

count to zero before returninq to the Edit routine. This is not done 
when the device is a 2260. 

For simulated attention by time interval, the TSO Simulated 
Attention routine receives control from the Dispatcher when a QCB is 
removed from the time delay queue. If simulated attention by time 
delay was net requested, the TSO Simulated Attention routine returns 
control to the Dispatcher. Otherwise, the routine issues a OTIP SVC 
(SVC 101) with entry code 26 to turn off the "QCB tposted" flaq and 
determine if a TPDT has teen requested. If a TPUT is requested, the 
TSO Simulated Attention routine tposts the QCB to itself and returns 
control to the Dispatcher. Otherwise, the routine requests a 
simulated attention read. If the ICB is free, the routine removes the 
LCB from the time delay queue and tposts it to itself. 

"External Routines: 



• TEDQTNT - Termname Table cede - to qet the terminal entry from the 
index in the ICE. 

• QTIP SVC (1C1) - entry code 26 - to turn "QCB tposted" flaq off 
and determine if TPUT is requested. 

Tables/Work Areas; CVT, Time Sharinq CVT, TSB, ICE, SCE, AVT, QCB, 
TSID, terminal entry, current buffer prefix. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem proqram mode. 



TSO Abend Interface Foutine (Chart YT) 
Module flame: T5DAYT 
Entry Points: 



• IEDAYTO - receives control from the OS Supervisor when TCAM 
abends. 

• TEDAYT1 .- receives control from the OS Supervisor when an attached 
task abends . 

• IEDAYT2 - receives control from the EXCP Driver (IGG019EC) when no 
space is available on a nonreusable disk queue and a flush 
closedown has been initiated. 

"Functions: The Abend Interface routine informs TSO when TCAM abends, 
when an attached TCAM task abends, or when, in a mixed TSO/TCAM 
environment, the EXCP Driver abends because no space is available on 
a nonreusable disk queue and a flush closedown has teen initiated. 
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If TCAM abends, the Abend Interface routine issues the TCABEND 
macro instruction, which turns off the TCAM ready tit in the CVT- If 
the CVTTSRDY. bit in CVTTSELG is on, indicatinq that TSO is active, the 
TCABEND macro instruction also indicates that the Time Sharing Control 
task (IKJEAT03) is to step by turninq on the TCASTOP bit in the Time 
Sharinq CVT, and by postinq the Time Sharinq Controller ECB in 
TSECETAB complete. 

If an attached TCAM suttask abends, the Abend Interface routine 
qains access to all the elements that were tposted to the abendinq 
subtask from the ready queue and the task QCB and disposes of them 
that is, buffers are placed on the Buffer Return queue and LCBs are 
tposted to themselves. If the abendinq task is either Checkpoint or 
On-line Test, the Abend Interface routine clears the QCE STCB link 
address, sets the QCB element chain to point to the dummy last element 
address in the AVT, and resets the QCB flaq to indicate that it is a 
QCB. This is dene to indicate that the abendinq task nc longer exists 
in the system. If the abendinq task is Operator Control, the 
procedure is the same as when the EXCP Driver abends. 

If, in a mixed TSO/TCAM environment, the EJXCP Driver abends 
because no space is available on a nonreusable disk queue and a flush 
closedown has been initiated, the TSO Abend Interface routine issues 
the AQCTL SVC 102 to tpost the Abend routine ECE to the ready queue. 
It also issues the TCABEND macro instruction, which performs the same 
functions as when TCAM abends. 

External Routines: 



• 



TGC102 - AQCTI SVC 102 routine - to tpost the Abend Interface 
subtask ECE tc the ready queue. 

• TCABEND (SVC 94) - to turn off the TCAM ready bit and stop the 
Time Sharinq Control task. 

Tables/Work Areas: AVT, QCB, CVT, TSID, STAE work area. 

Attributes: Serially reusable, enabled, problem proqram mode. 



TSO TNMSG/OUTMSG linker (Chart YX) 

Module Name: IEDSYX 

Entry Point: IEDAYX - receives control from Buffer Disposition 
(IEDOBD) to provide linkaqe to the TSO Attention or the TSC Hangup 
routine when ATTEK or HANGUP macro instructions are coded in the INMSG 
or OUTMSG subgroups. 

Functions: The TSO INMSG/CUTMSG Linker provides linkaqe to the TSO 
Attention and ISO" Hangup routines (IEDAYA and IEDAYH, respectively). 
If the linkaqe is to the TSO Hanqup routine, the TSO INMSG/OUTMSG 
Linker obtains the address of the routine from the macro expansion 
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that was passed. If the linkaqe is to the TSO Attention routine, the 
Linker obtains the address of the routine from the STARTMH macro 
pointed to in the DCE. Before it tranches to either routine, the TSO 
TNMSG/OUTMSG linker sets the ERB priority and tposts the EBB to Buffer 
Disposition. 

External Routines: None. 

Tables/Work Areas: AVT, ICE, CCB. 

Attributes: Serially reusable, refreshable, enabled, resident, 
problem program mode. 



TSO Asynchronous Time Delay "Removal Routine (Chart YY) 

Module Name: IEDAYY 

Entry Point: IEDAYY - receives control when it is tposted 
asynchronously frcm TIOC modules tc remove CCBs from the time delay 
crueue. 

Functions: The TSO Asynchronous Time Delay Removal routine removes 
OCBs from the time delay queue when a send cr receive operation is to 
be initiated. The routine first checks to see if it has been 
activated (tposted to the ready queue) by a TIOC module. If it has 
not been activated, the TSO Asynchronous Time Delay Removal routine 
returns control to the Dispatcher to dispatch the next subtask. If it 
has been activated, the routine deactivates itself, by markinq its QCE 
not tposted, and obtains the addresses of the previous and current 
elements on the time delay queue. The routine then scans the time 
delay queue lcckinq for a Time Sharinq QCB with both the Write Break 
flaq and the TPUT request flaq on. Each time it finds such a QCB, the 
TSO Asynchronous Time Delay Removal routine performs the followinq 
functions. It updates the link field of elements on the time delay 
queue. It sets the time delay flaq in the QCB to indicate that it is 
no longer in the time delay queue. It tposts the QCB to itself to 
initiate a send operation. The routine then loads the tpost reqister 
(R1) with the address of the QCB to be tposted to the ready queue and 
links to the Dispatcher tpost function to tpost the QCB. 

When the TSC Asynchronous Time Delay Removal routine receives 
control aqain from the Dispatcher, it continues to scan the time delay 
queue, lookinq for the next QCB to be removed. When it has searched 
the entire queue, and has removed all the applicable QCEs, the TSO 
Asynchronous Time Delay Removal routine branches back to the beqinninq 
to see if another interrupt has occurred tc reactivate it. If no such 
interrupt has occurred, the routine returns to the Dispatcher. If an 
interrupt has occurred, the routine repeats the entire procedure 
outlined above. 

External Routines: TGG019RB or TGG019RO - the TCAM Dispatcher - to 
tpost the QCB (s) to the ready queue by priority. 
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Tables/Work Areas: AVT r QCE, TSIE. 

Attributes: Serially reusable, refreshable, enabled, problem program 
mode. 



^ime Sharing Scheduler (Chart YZ) 
Module Name: IIDAYZ 
Entry Points: 

• AYZ000 - activated by the Leased Receive Scheduler (TGG019R3) to 
determine whether or not to initiate a Read operation. 

• AYZ100 - activated by the Dial Receive Scheduler (IGG019R1) to 
determine whether or net to initiate a Bead operation. 

• AYZ200 - activated by the Line End Appendage (TGG019^0) when a 
negative response to polling has been received to determine 
whether or not another poll operation is desired, 

• AYZ300 - activated from the QEVENT subroutine in the Leased 
Receive Scheduler (IGG019P3) to generate a Prepare channel program 
when a line connected to a 2741 is to be freed, 

• AYZ400 - activated by the Send Scheduler (TGGC19R4) when it is 
dispatched from the QCE to determine whether a Write Break channel 
command can be issued. 

• AYZ410 - activated by the Time Sharing Destination Scheduler 
(TEDAYD) to determine whether or not a Write Break channel command 

can be issued. 

• AYZ500 - activated by the Send Scheduler (IGG019RU) when it is 
dispatched from the LCE to determine whether or net to initiate a 
send operation. 

• AYZ600 - activated by the Activate-I/C Generator subtask (IEDQKA) 
before it builds an input or output channel program. 

^unctions: The function of the Time Sharing Scheduler varies 
depending upon the routine from which it receives control and at which 
entry point. 

If the Time Sharing Scheduler is entered from the Leased Receive 
Scheduler (IGG019F3) at entry point AYZ000, the scheduler links to the 
Termname Table code (IEDQTNT) to qet the teririnal entry, from which it 
gets the address of the Destination QCB. If the terminal is not 
dedicated to a Tiire Sharing session, the scheduler updates the LCB 
pointer to the current invitation list entry and returns ccntrol to 
the Leased Receive Scheduler. If a terminal is dedicated to a Time 
Sharing session, the Time Sharing scheduler checks various scheduling 



420 



bits in the OCE tc determine whether to initiate a read operation. If 
a hardware attention interrupt has been received, the scheduler turns 
off the "simulated attention read request" bit (QCBSATFE) in the QCE 
and exits to the Dispatcher post functicn tc tpost the ICE to the TSO 
attention routine specified in MH. The TSC Attention routine (IEDAYA) 
activates TSC attention exits or indicates that certain attention 
controled functions (such as line deletion) should be activated. When 
the Time Sharinq Scheduler decides to beqin a read operation, it first 
determines whether any requests for a simulated attention read 
override the read operation. If so, the scheduler initiates the 
special simulated attention read channel prcqram. 

If no read operation is to be started, the Time Sharinq Scheduler 
checks to see if a simulated attention by time delay interval was 
requested. If this simulated attention was requested, the scheduler 
checks to see if a send operation was requested or if the QCB is 
already in the time delay queue. If neither of these conditions 
exists, the scheduler sets the priority, the time delay interval, and 
the time delay flaq in the QCB and links tc the Time Delay subtask 
(TEDQHG) to insert the QCE into the time delay queue. The scheduler 
then updates the invitation list pointer to point to the next entry, 
updates the ICB pointer to the currently connected terminal, and 
branches back to the beqinninq to qet the terminal entry and QCE 
address for the new terminal and to repeat the procedure for it. When 
the Time Sharinq Scheduler reaches the end of the invitation list, it 
checks to see if all entries were polled. If they were, the scheduler 
sets the "start of pollinq list" bit and returns control tc the Leased 
Receive Scheduler. If no entries were polled, the scheduler sets the 
invitation list pointer to point to the first entry and exits to the 
Dispatcher bypass function to immediately activate the next STCB in 
the LCB chain. 

If a read operation is to be started, the Time Sharinq Scheduler 
checks to see if the QCE is in the time delay queue. If it is, the 
scheduler links to the Time Delay subtask (IEDQEG) tc remcve it from 
the crueue. Finally, the scheduler turns en the "time sharinq buffer 
prefix" bit (LCBTSBUF) in the LCB, updates the ICE invitation list 
pointer, and returns ccntrcl to the Leased Receive Scheduler. 

When the Time Sharinq Scheduler is entered from the Dial Receive 
Scheduler (TGGC19R1) at entry pcint AYZ100, the scheduler makes the 
same tests as above to determine whether cr not to initiate a read 
operation. The scheduler does the same processinq to insert or remove 
a QCB from the time delay queue or to tpost the LCB tc the TSO 
Attention routine. 

If no reqular read operation is to be started, but a simulated 
attention read was requested, the Time Sharinq Scheduler turns off the 
"neqative response to pollinq" bit (LCBNEGRE) in the LCE and initiates 
the special simulated attention read channel proqram. Otherwise, 
after performinq any necessary time delay processinq, the scheduler 
frees the line, puts up a Prepare channel proqram on the line to 
monitor for an attention interrupt, turns off the "send priority" bit 
(LCBSNDPR) and the "neqative response to pcllinq" bit in the LCB, and 
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exits to the Dispatcher dispatch function to dispatch the next 
subtask. 

If a regular read operation is to be started, the Time Sharing 
Scheduler performs any necessary time delay processing and checks to 
see if a negative response to polling was received on the last poll. 
If a negative response was received, the scheduler sets the LCB to re- 
poll, and checks to see if the polling delay interval in the DCB is 
zero. Tf the polling delay is not zero, the scheduler puts up a 
Prepare channel program to monitor for an attention interrupt and 
exits to the Dispatcher post function tc tpost the ICB to the Time 
Delay QCB. Tf the polling delay is zero, if a negative response to 
polling was net received, or if a simulated attention read operation 
is to be started, the Time Sharing Scheduler turns on the "time 
sharing buffer prefix" bit in the ICB and returns control to the Dial 
Feceive Scheduler. When the entry is from the Dial Receive Scheduler 
the Time Sharing Scheduler does not update the invitation list 
pointers. 

The Time Sharing Scheduler is entered at entry point AYZ200 from 
Line End Appendage (TGGC19B0) when a negative response to polling is 
received. The scheduler first links tc the Termname Table code 
(TEDOTNT) to get the terminal entry frcm which it extracts the 
Destination OCE address. The scheduler also gets the address of the 
last buffer froir the LCB. If neither the last entry polled nor the 
next entry to be polled is dedicated to time sharing, the Time Sharing 
Scheduler turns off the "start of polling list" bit (ICBSCPL) in the 
LCB and returns control to Line End Appendage to poll the next entry 
in the invitation list. 

If the next entry to be polled is dedicated to time sharing, the 
Time Sharing Scheduler checks the QCB scheduling bits tc determine 
whether or not to poll it. If the entry is not tc be polled, the 
scheduler returns control to Line End Appendage to update the 
invitation list pointer to point to the next entry. If a simulated 
attention by time delay interval was reguested, the scheduler links to 
the Time Delay subtask to insert the CCE into the time delay gueue 
before returning tc Line End Appendage. 

If a TSO-dedicated entry is to be polled and its QCB is in the 
time delay gueue, this routine links tc the Time Delay subtask to 
remove it. Then the scheduler checks for both TSO and TCAM entries to 
see if the last entry polled was also dedicated to TSO or TCAM. If 
both entries are not dedicated to the same system, the Time Sharing 
Scheduler adiusts the addresses, counts, and in some cases the op 
codes, in the CCWs for all buffer units tc meet the reguirements of 
the current systeir. The scheduler flags each buffer prefix as either 
a TSO buffer or a TCAM buffer. For TSO buffers, the scheduler turns 
on the "time sharing buffer prefix" bit in the LCE. After it has made 
all the adjustments, the scheduler returns control to Line End 
Appendage to pell the next entry. 

Because this scheduler is disabled when it is entered from Line 
End Appendage, special enabled code is included to link to the Time 
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Delay suttask, schedule an enatled reentry to the Time Sharing 
Scheduler, and exit to the Dispatcher. The Dispatcher, in turn, 
returns control tc the scheduler in the enatled state. 

The Time Sharinq Scheduler is entered at AYZ300 from the QEVENT 
entry point in the Leased fleceive Scheduler (IGG019B3) when TSO is in 
the system. QEVENT is dispatched as the last STCB in the chain of 
scheduler STCEs for a line. After it links to the Termname Table code 
and qets the address of the DCB, invitation list, and Destination QCB, 
the scheduler checks to see if the followinq conditions are met: (1) 
the terminal is dedicated to a time sharinq session; (2) a Prepare is 
not already up on the line; (3) the terminal has the Attention 
feature; (4) an attention exit was specified in the MH ; and (5) the 
invitation list consists of only ore entry. If all these conditions 
are not met, the scheduler returns control to the QEVENT routine. The 
Time Sharinq Scheduler next checks to see if the terminal is a 2741. 
If it is not a 2741, the scheduler checks tc see if the terminal can 
time out. If the terminal can time out, the scheduler returns control 
to the OEVENT routine. If the terminal is inhibited from timing out, 
the scheduler sets up a Prepare on the line, links to the Activate-I/O 
Generator subtask (IEDQKA) to build the channel prcqram, and branches 
to the routine specified below that issues the EXCP. 

If the terminal is a 2741, the line is to be freed. If the ICE 
indicates that a circle D has not been sent tc the 2741, the Time 
Sharinq Scheduler qenerates a write circle E - Prepare Channel proqram 
to Dut the line into receive mode and to monitor for an attention 
interrupt. If a circle D has been sent, the line is already in 
receive mode, sc the scheduler qenerates a Prepare channel proqram. 
The scheduler puts the CCW startinq address in the ICE. Then the 
scheduler loads the IOP address in reqister 1, issues the EXCP SVC 
(SVC 0) to start the channel proqram, and returns contrcl to the 
OEVENT routine. 

The Time Sharinq Scheduler is entered at entry point AYZ400 from 
the Send Scheduler (IGG0 19P4) when it has teen dispatched cff the QCB. 
The Time Sharinq Scheduler first checks, to see if a simulated 
attention read was requested. If it was, the scheduler passes control 
to the Dispatcher at DSPUNAV to remove the STCB from its current QCE 
and insert it in the Send Scheduler QCB. If no simulated attention 
read was requested, the Time Sharinq Scheduler checks to see if a 
Write Break was requested. If not, the Scheduler returns control to 
the Send Scheduler. If a Write Break has been requested, the Time 
Sharinq Scheduler turns off the "read priority" bit (QCBEEAE) in the 
OCB and tests several status bits in the 1CB and QCB to determine 
whether or not it can issue a Write Break channel ccmmand. If it 
cannot issue this channel command, the scheduler returns control to 
the Send Scheduler. If the terminal is en a leased line, the Time 
Sharinq Scheduler links to the Termname Table code,, qets the terminal 
entry and extracts the QCB address. If the terminal for which the 
Write Break was requested is not currently connected, the scheduler 
returns control to the Send Scheduler. Otherwise, the Time Sharinq 
Scheduler qets the address of the first buffer (in LCELSPCI) , turns on 
the "write break in proqress" bit (ICBWBBBK) in the LCE, qets the 
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address of the UCE r and issues an TOHALT SVC (SVC 33), line End 
Appendage handles the IOHALT interrupt which causes a Ereak channel 
prcgram to be executed. After it issues the TOHALT, the Time Sharing 
Scheduler passes control to the Dispatcher at DSPUNAV to switch the 
STCB to the Send Scheduler QCE. 

The Time Sharing Scheduler is entered from the Time Sharing 
destination Scheduler (IEDAYD) at AYZ410 when a Write Break has been 
reguested. The processing is the same as when entered from the Send 
Scheduler above, except that the first two checks for simulated 
attention and Write Ereak are bypassed, and the Time Sharing Scheduler 
always returns control to the Time Sharing Destination Scheduler. 

The Time Sharing Scheduler is entered from the Send Scheduler at 
AYZ5Q0 when it has been dispatched off the ICB. If a TSO session is 
not in progress, and no non-TSO (gueuing) functions are to be 
performed, the Time Sharing scheduler returns control to the Send 
Scheduler to put the Send Scheduler STCB tack in the QCB chain. If a 
non-TSO output function is to be performed, the scheduler returns 
control to the Send Scheduler to initiate a send operation. If a TSO 
session is in progress, the Time Sharing Scheduler checks the various 
scheduling bits in the QCB to determine whether or not to initiate a 
TSO send operation. If a send operation is to be performed, the 
scheduler returns control to the Send Scheduler to do so. If a 
simulated attention Bead or a Read of a partial input line is 
reguested, it takes priority ever cutput. In this case if the LCB is 
in the time delay gueue, the Time Sharing Scheduler links to the Time 
Delay subtask to remove it. Then the scheduler tposts the LCB to 
itself and passes control to the Dispatcher bypass function to 
immediately activate the next STCE in the LCE chain. 

The Time Sharing Scheduler is entered at AYZ600 from the Activate- 
1/0 Generator subtask (IED0KA) befcre it builds an input or output 
channel program. The scheduler links to the Termname Table code, gets 
the terminal entry, and extracts the QCB address. If a TSC session is 
not in progress, the scheduler immediately returns ccntrcl to the 
Activate-I/O Generator module. Per input, if a hardware attention was 
received, the Time Sharing Scheduler trosts the LCB to the TSO 
attention routine specified in the MH. If a TPUT was requested, the 
scheduler tposts the LCB to itself. In either case, the scheduler 
passes control to the Dispatcher chain function to tpost the input 
buffers to the Puffer Return routine (IEDQGE) . If a Prepare is up on 
the line, the scheduler issues an IOHALT SVC (SVC 33) to halt I/O on 
the line. Then the scheduler makes another check for a hardware 
attention, and, if one was received, processes it in the same manner 
as above. Otherwise, the Time Sharing Scheduler returns control to 
the Activate-I/O Generator subtask after the TCHALT. 

External Routines: 

• TEDQTNT - Termname Table code - to get the terminal entry from the 
terminal cr line entry in the LCB. 
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• IEDQHG - Time Delay subtask - to remove an ICE cr a QCE from the 
time delay queue, or to insert a QCB into it. 

• IEDQKA - Activate-I/C Generator subtask - to build a Prepare 
channel command. 

• IGG019RB - TCBM Dispatcher - at the dispatch entry point, to 
provide for enabled re-entry to IEDAyZ after linking to IEDQHG, 
when entered in a disabled state. 

• OS IOHAIT routine (SVC 33) - to halt I/C en a line, 

• OS EXCP routine (SVC 0) - to start a Prepare channel program. 

Tables/Work Areas: CVT r Time Sharing CVT, AVT, TSE, QCE, TSID, LCB, 
DCE, SCB, buffer prefix, terminal entry, invitation list, TFEIOB, EBE. 

Attributes : Reentrant, disabled when entered from line End Appendage, 
otherwise enabled, supervisor mode when entered from line End 
Appendage, otherwise problem program mode. 
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Chart AA-.1 STARTMH SUBTASK 
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Chart AA-2 STARTMH SUBTASK 
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Chart AA-3 STARTMH SUBTASK 
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Chart AC DATE AND TIME PROVISION ROUTINE 
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Chart AD OUTPUT SEQUENCE NUMBER PROVISION ROUTINE 
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Chart AE LOCATE OPTION FIELD ADDRESS ROUTINE 
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Chart AF-1 INSERT DATA ROUTINE 
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Chart AF-2 INSERT DATA ROUTINE 
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Chart AH INPUT SEQUENCE NUMBER INSERTION ROUTINE 
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Chart AM SKIP FORWARD AND SCAN ROUTINE 
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Chart AI-2 SKIP FORWARD AND SCAN ROUTINE 
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SAVE THE BYTES 

FOUND IN THE 

SCB 



S/WSCQUI, 



SAVE THE COUNT 

OF BYTES FOUND 

AND USER 

REGISTERS IN 

THE SCB 



POINT THE SCAN 
POINTER BEYOND 
THE BUFFER END 



SAVE THE 

PARAMETER LIST 

ADDRESS IN THE 

SCB 



DUNUSlf 



PASS THE COUNT 
FOUND IN THE 
AVTPARM FIELD 



/ R 



PUT A ^ 
RETURN CODE 
OF -X*04* IN 
REGISTER 15 



< OF 



(■ \ 

(exit to iedqlm J 
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Chart AI-3 SKIP FORWARD AND SCAN ROUTINE 



AX.AS, 



get the address 
of the next 

BYTE 



ADD THE BYTE TO 

THE AVT WORK 

AREA 



INCREMENT THE 

COUNT OF BYTES 

FOUND 





APDRRFT 



PUT THE RETURN 
ADDRESS IN 
REGISTER 15 



IT TO 1EDQLM 
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Chart AJ SKIP TO CHARACTER SET ROUTINE 




PUT A ^ 
RETURN CODE 

X'04' IN 
REGISTER 15 



RETURN, , , " 

[ RETURN TO ^ 
►I ;. IEDQLM ■ 1 



SKIFCHAR,,, 



GET THE SCAN 

POINTER FROM 

THE BUFFER 

PREF I X 



AL A I, 



GET SCAN PTR 
ADDR.EOU » CUR- 
RENT UNIT REGS 




MUUBUQL 



MOVE THE 

CHARACTERS FROM 

FROM THE SCB TO 

THE AVT WORK 

AREA 



COMPUTE NUMBER 
OF CHARACTERS 

FOUND! PUT THE 

NUMBER IN THE 

COMPARE REG 



COMPUTE THE 

RETURN ADDRESS 

AND PUT IT IN 

THE REGISTER 

SAVE AREA 



INITIALIZE THE 

COMPARE 

REGISTER TO 

ZERO 



AX AS, 



GET ADDRESS OF 

NEXT BYTE IN 

THE BUFFER 




ADD A CHARACTER 

TO THE AVT SAVE 

AREA; INCREMENT 

THE COMPARE 

REGISTER • 




SHIFT 



SHIFT THE 

CHARACTERS IN 

THE AVT WORK 

AREA ONE BYTE 

TO THE LEFT 




SET THE PREFIX 

SCAN POINTER AT 

THE LAST BYTE 

OF CHARACTERS 



(IBHPRPC 

MOVE THE 

CHARACTERS 

• FOUND FROM THE 

AVT WORK AREA 

TO THE SCB 



SAVE THE 

ADDRESS OF THE 

PARAMETER LIST 

IN THE SCB 



MOVE THE 
REGISTERS FROM 

THE AVT SAVE 
AREA TO THE SCB 



SET THE PREFIX 
SCAN POINTER 

BEYOND THE END 
OF THE BUFFER 




uuo 



Chart AK-1 LINE CONTROL INSERTION ROUTINE 




( *\ 

►I EX IT TO IEDQA4 I 



♦ NT A3 



GET THE 

TERMINAL ENTRY 

ADDRESS 





SET .THE INITIAL 
INSERT OFFSET 
AT THE FIRST 
BYTE OF DATA 



AK-,3 Fi 



AK-3 A4 




COMPUTE THE 

NUMBER OF I TBS 

PRECEDING THE 

EOB 



♦ AK-3 A I 




STXLINK 



REQUEST THE 

ADDRESS OF THE 

STX 



DECREMENT THE 

SCBEOB BY THE 

NUMBER OF 

PRECEDING I TBS 



S TXRBCAL t 



SET THE DATA 

OFFSET FROM THE 

SCBEOB 



♦ AK-3 G4 
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Chan AK-2 LINE CONTROL INSERTION ROUTINE 



MAHHLQOft, 



-JLML 



CLB55UF VIM,, 



INSERT FIRST 

LINE CONTROL 

CHAR (CCs8) 



^ COMPUTE THE 
RESIDUAL COUNT 
IN THE BUFFER 




PICK UP THE 
EOB/ETB 
INTERVAL 



ACTIVATE INSERT 

DATA TO SHIFT 

EMPTY BYTES 




M-.i fig, 



COMPUTE THE 

FINAL DATA SIZE 

(CC=8) 



SET THE INSERT 

OFFSET TO THE 

TOTAL DATA SIZE 



ACTIVATE IEDQAF 

TO SHIFT TO 
NEXT INSERT PT 



AK-a a.1 



GET OFFSET TO 

NEXT LINE 
CONTROL CHAR 



SET THE INITIAL 
ITS OFFSET FOR 
THE NEXT BUFFER 







URE0BA.C 



SET THE INITIAL 

EOB/ETB OFFSET 

FOR THE NEXT 

BUFFER 



!, AJ. AL 



GET INSERT AD- 
DRESS (ADDR OF 
LAST DATA BYTE) 




5STEQT, A,K-3,Aa 



GETSCTAD 



INSERT EOT, SET 

FINAL SIZE, AND 

EXIT <CC=2) 



SETSOBT t 



BUILD AN 

EOB/ETB STRING 

IN THE AVT WORK 

AREA 



PUT THE LENGTH 

AND ADDRESS OF 

THE STRING IN 

THE AVT 

PARAMETER AREA 



AK-3 D2 



insert, set 
final Size, and 

EXIT (CC=2) 



k. 



IT TO IEDQA4 



D 
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Chart. AK-3 LINE CONTROL INSERTION ROUTINE 




SETEflB 



RETURN THE 

CURRENT EOB 

OFFSET: UPDATE 

THE SCB TO THE 

NEXT EOB OFFSET 




UPlTBftC t 



UPDATE THE SCB 

TO THE NEXT ITB 

OFFSET 



5ETITB 



RETURN THE 

CURRENT ITB 

OFFSET 



f N 

I LINKAOBT I 



C\ [ F1NALS1Z J 
RETURN J V^ J 



f GETSCTAD J I LCOFFSET J f 



AK-2.AI 
AK-2.F5 



GET THE ADDRESS 
OF THE LC CHAR- 
ACTER FROM THE 
SPECIAL CHARAC- 
TERS TABLE 




PUT THE LENGTH 
AND ADDRESS OF 
THE LC CHARAC- 
TER IN THE AVT 
PARAMETER AREA 



BUILD THE UNIT 

REQUEST 

PARAMETER LIST 

IN THE AVT 



U' *3 



CALL UNIT REQ 

INTERFACE RTN 

TO INSERT DATA 




COMPUTE THE 

FINAL DATA SIZE 

AND SET IT IN 

THE PREFIX 



SET THE SIZE OF 
THE BUFFER 
PREFIX AND 
RESERVE THE . 

CHARACTER COUNT 



PUT THE INITIAL 

OFFSET FOR THE 

EOB/ETB IN THE 

SCB 




PUT THE INITIAL 
OFFSET FOR THE 
1TB IN THE SCB 



/ \ 

I LCOFRCL2 1 



3 



( RETURN- 1 ( LCOFFRCL J 



GET THE OFFSET 

TO THE FIRST 

DATA BYTE FROM 

THE SCBEOB 



PUT THE INITIAL 

OFFSET FOR THE 

EOB INTO THE 

SCB 




PUT THE INITIAL 

OFFSET FOR THE 

ITB INTO THE 

SCB 
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Chart AL ADDRESS FINDER ROUTINE 



C0QA.I. .n^ 
ENTER J 



APPRCPMPn 



AC.BI 
AF-I ,E4 
AF-2.C3 



INITIALIZE THE 

ADDRESS OF THE 

FIRST UNIT 



ADDRLOOP 



Al-I ,FI 


AN-I ,G2 


A3 


E2 


AI-3.B3 


AO.FI 


A4 


G2 


AJ.DI 


AW.E4 


A5 


J4 


AK-2.E4 


AO.E1 ,H2 








GET THE ADDRESS 

OF THE NEXT 

UNIT 



DECREMENT THE 

OFFSET BY THE 

UNIT LENGTH 



ADDRRET 



SET THE ADDRESS 
OF THE ITEM = 

ADDRESS OF THE 
UNIT + OFFSET 



C UN 1 T UPDAT I NG J 
>S. SPEC I F I ED >^ 

|YES 






RESTORE THE 

PARAMETER 

ADDRESS; SET 

THE CURRENT 
UNIT ADDRESS 














SET END-OF-UNIT 
ADDRESS TO 






BYTE BE\ 
CURRENT 


rOND THE 
r UNIT 







r \ 

\ RETURN 1 
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Chart AM ORIGIN ROUTINE 



isaam 



5ETBIT3 



GET THE 5C8 

ADDRESS FROM 

THE LCB 




/ INDICATE ^ 
L1NVAL1D ORIGIN 
\ IN THE SCB > 



►< OF 



PUT A > 
RETURN CODE 
OF -X'04' IN 
REGISTER 15 



G 



RETURN TO MH 



) 
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Chart AN-1 MULTIPLE INSERT/REMOVE ROUTINE 



Cuam — s. 
ENTER J 



EDQANO I 



GET THE ADDRESS 

OF THE 

FIRST/NEXT 

SUBPARAMETER 

LIST 





NORMRpUT 



INKTNT 



NT A3 



GET ADDRESS OF 

DESTINATION 
TERMINAL ENTRY 



GET THE DELIM- 
ITER FROM THE 
ENTRY 4 PUT IT 

IN THE SUB- 
PARAMETER LIST 



TTFJA.N5 



SET THE INDEX 

TO LIST INTO 

THE TABLE BY 

THE FIRST 'AT' 

STRING BYTE 



RESET THE 

PREFIX SIZE 

FIELD 



( \ 

I EXIT TO IEDQLM I 



UPDATE THE DATA 

OFFSET BY THE 

TRANSLATE AND 

TEST LENGTH 



, , AL A I 



GET THE ADDRESS 

OF THE DATA 

OFFSET 





YES 








SET THE 

TRANSLATE AND 

TEST LENGTH = 

THE TOTAL DATA 

REMAINING 




SET THE 

TRANSLATE AND 

TEST LENGTH = 

THE UNIT LENGTH 
























SET THE SHIFT 

LENGTH TO THE 

NUMBER OF 

TRANSLATED 

BYTES 



GET THE ADDRESS 
OF THE 'FROM' 

STRING FROM THE 

SUBPARAMETER 

LIST 



SAVE THE 

CURRENT SCAN 

POINTER AND SET 

THE TEMPORARY 

SCAN POINTER 



AN-S AS 



UPDATE THE DATA 

OFFSET BY THE 

LENGTH OF THE 

SHIFT 



Ul A3 



ACTIVATE IEDQAI 

TO SCAN THE 

BUFFER 




CLERFROM 



CLEAR THE BYTE 

IN THE 
TRANSLATE TABLE 



uatu 



INCREMENT THE 
DATA OFFSET 
PAST THE 'HIT- 
BYTE 



© 



UPDATE THE DATA 

OFFSET BY THE 

LENGTH OF THE 

STRING 
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Chart AN-2 MULTIPLE INSERT/REMOVE ROUTINE 



INCREMENT THE 

RETURNED OFFSET 

BY THE LENGTH 

OF THE 'TO' 

STRING 




UPDATE THE DATA 

AND INSERT 

OFFSETS BY THE 

EXTENT 



GET THE ADDRESS 

OF THE 'TO' 

STRING FROM THE 

SUBPARAMETER 

LIST 



SAVE PREFIX 

OFFSETS AND 

BUILD IEDQAJ 

PARAMETER LIST 

IN THE BUFFER 




SET THE 'TO' 

OFFSET AS THE 

RETURNED OFFSET 



UPDATE THE DATA 

OFFSET TO THE 

OFFSET OF THE 

LAST BYTE 




DECREMENT THE 

RETURNED OFFSET 

BY THE 'TO' 

STRING LENGTH 



UflNSOFF 



INCREMENT THE 

INSERT OFFSET 

BY THE REMOVE 

LENGTH 



RESET THE DATA 

OFFSET TO THE 

RETURNED OFFSET 





ACTIVATE IEDQAF 
TO SHIFT OR 
INSERT DATA 



N 

I RETURN 1 



UPDATE THE DATA 

OFFSET BY THE 

LENGTH OF THE 

STRING 




I.NBFRT, 



REQUEST THE 

TEST, LINK, AND 

INSERT 

FUNCTIONS 




PUT THE DATA 

ADDRESS, DATA 

LENGTH, & DATA 

TYPE IN IEDQAO 

PARAMETER LIST 



PUT IDLE. 

NUMBER OF 

IDLES, & DATA 

TYPE IN IEDQAO 

PARAMETER LIST 



t ,m M 



ACTIVATE IEDQAO 

TO GET NEW UNIT 

4 INSERT IT 
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Chart AO UNIT REQUEST INTERFACE ROUTINE 




INSERT 
DATA LONGER \NO 
THAN SPACE 
AVAILABLE 



JBMM 



REQUEST A UNIT 




NO /PUT A X'04' \ 

I »-<RETURN CODE I N > 

X REGISTER 15/ 



iNKUM 1,1,1 



l. AL.AI 



JUK, UINI I AU 

t . EOU ADDR 



POINT THE NEW 

UNIT TO. THE 

NEXT UNIT 



POINT THE 

CURRENT UNIT TO 

THE NEW UNIT 



MflYEPAJA 



MOVE DATA FROM 

THE CURRENT 

UNIT TO THE NEW 

UNIT 



JUEflEES. 



INCREMENT DATA 

OFFSET, INSERT 

OFFSET « PREF I X 

SIZE FIELD BY 

KEY LENGTH 



[EXIT TO IEDQLM 1 



INCREMENT THE 

PREF I X NUMBER 

OF UNITS COUNT 

BY ONE 



INSERT 



BUILD THE 

PARAMETER LIST 

TO ACTIVATE THE 

INSERT DATA 

ROUTINE 



/ ^ 

•1EXIT TO IEDQUI 1 



448 



Chart AP- 1 REMOVE AT OFFSET ROUTINE 




CALCULATE THE 

BUFFER PREFIX 

SIZE 
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Chart AP-2 REMOVE AT OFFSET ROUTINE 




SET THE 'TO' 

DELIMITER TO 

THE END OF THE 

DATA 



.SETflFp- 



/ SET THE \ 

-<• TOTAL REMOVE' > 

X FLAG / 



SET THE PREFIX 

DATA OFFSET AND 

THE INSERT 

OFFSET 




RESET THE SCAN 

POINTER FOR THE 

CLOSE UP 



/PKn THE X'04 
<RETURN CODE IN 
X REGISTER 15 
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Chart AQ OPERATOR CONTROL INTERFACE ROUTINE 




GET THE SOURCE 

KEY FROM THE 

BUFFER 



( \ 

I RETURN 1 




NT ftg 



GET TERMINAL 

TABLE ENTRY 

ADDR FOR SOURCE 




POINT SCAN 

POINTER TO END 

OF THE OPERATOR 

CONTROL 

CHARACTERS 



PUT THE ADDRESS 
OF THE OPERATOR 
CONTROL QCB IN 
THE BUFFER RCB 



( ^ 

(EXIT TO DSPPOSTl 
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Chart AR CANCEL MESSAGE ROUTINE 



i£CflAB > ^ 

f ENTER 1 



/ SET THE \ 

/'CANCEL- FLAG\ 
< IN THE BUFFER 3 
X PREFIX / 






STOP CHECKPOINT 

AND ALL 

MULTIPLE 

ROUT 1 NG 








SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 










ADD THE ERB TO 
THE TPOST LIST 






NT A3 




IEDQTNT 


. 


GET THE 

TERMINAL ENTRY 

ADDRESS 










DECREMENT THE 
INPUT SEQUENCE 

NUMBER IN THE 
TERMINAL ENTRY 












S^ IS THE \ 

C TERMINAL IN J 
\l LOCK MODE .X^ 


YES 


SET UP THE LCB 
TO POLL AGAIN 






NO 














f EXIT TO ^ 
1 DSPCHAIN 
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Chart AS-1 HOLD/RELEASE TERMINAL ROUTINE 



I&0SAJ5 

( ENTER V" 



ACTIVATED BY BUF- 
FER DISPOSITION 
WITH A RECALLED 
BUFFER TO HOLD 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 




GET THE 

DESTINATION 

OFFSET FROM THE 

LCB 



GET THE 

DESTINATION 

OFFSET FROM THE 

BUFFER 




,:.Mi,.Aa 



LOCATE THE 

TERMINAL TABLE 

ENTRY 




SET UP TO V 

TPOST THE > 

BUFFER TO THE 

^BUFFER RETURNS 

QCB / 




RTNBE&. 



ADD THE \ 

BUFFER TO THE> 
LIST TO BE 
TPOSTED > 



AMES. 



3 



SAMS , 



SUBTRACT ONE 
FROM THE OUTPUT 
SEQUENCE NUMBER 




SET UP TO X 
TPOST THE \ 
.BUFFER UNITS TOJ 
THE BUFFER / 
.RETURN QCB / 



/ ADD THE X 

/ BUFFERS TO > 
(THE LIST TO BE 
X TPOSTED > 



GET THE ADDRESS 

OF THE 

DESTINATION QCB 

AND PRIORITY 

QCB 



IS HOLD ^ 
WITH DELAY 
.SPECIFIED^ 


S^NO 




SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 






|YES 









ARE THERE 

ANY HELD FEFO 

MESSAGES 





OHOH 


AS-5 F4 


YES 


FIXCPB 


BUILD CCWS. IF 
CPBS ARE 
AVAILABLE 











JUU. 



A5-S h\ 
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Chart AS-2 HOLD/RELEASE TERMINAL ROUTINE 



'gogftSQl „, ,,.„. 



ACTIVATED WHEN 
OPERATOR CONTROL 
OR TIME DELAY 
TPOSTS A BUFFER 
TO RELEASE 




AS-8 A3 



MflYETFlFfl t 



GET THE ADDRESS 

OF THE FIRST 

BUFFER 



„MT„M 



IEDQTNT 



GET THE 

TERMINAL ENTRY 

ADDRESS 



NOTES THE BALR 14,15 IN BLOCK J5 CAN 
ACTIVATE THE SUBROUTINE AT BZ-I.A4: 
EW-3.F5; R4-2.AI; Q6.A3; Q7-2.A1", 
OR RD-2.A3. 



GET THE ADDRESS 
OF THE FIRST 
PRIORITY QCB 




GET THE ADDRESS 

OF THE NEXT 

PRIORITY QCB 



AUFEFfl 



PJXOEIftr TA5r,S Fi 




SET THE DATFEFO 

AND QCBINTFF 

FIELDS 



i A i S i I i S i n i ft i 



^HmmJOmm 



INSERT A 

RELEASE STCB 

FIRST ON THE 

CPB CLEANUP QCB 



• INITIALIZE 
/THE REGISTERS 
CAND THE IEDQFQ 
\ ENTRY POINT 



fjKAU, t 



RS\ 
FQ > 

/ 



EXIT TO IEDQFQ 



DQFQ J 



A5-5 F\ 



BUILD CCWS. IF 
CPBS ARE 
AVAILABLE 




PUT THE FEFO 

POINTER IN THE 

DATA FIELD OF 

THE RECORD 



■UiwiUMp*mp 



REMOVE THE 

BUFFER AND SET 

UP TO TPOST IT 

TO THE BUFFER 

RETURN QCB 











,,t RB-g A 



f \ 

(exit TO DSPDISPH 



rb-s At, 




PUT THE 

SCHEDULER 

SUBROUTINE 

ADDRESS IN 

REGISTER 15 



BALR 14,15 



EXECUTE THE 

SCHEDULER 
SUBROUTINE 



^ ARE 

NO^X^THERE MORE 

BUFFERS ON 

THE QUEUE 



© 
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Chart AS-3 HOLD/RELEASE TERMINAL ROUTINE 




JNPPIAL 



A5-t A& 



SET UP TO 

SEARCH THE 

DIAL-OUT CALL 

QUEUE 



t A.S-4 A4 



FIND THE LCB 



GET THE ADDRESS 

OF THE FIRST 
STCB ON THE LCB 



A5TDI.AU t 



GET THE NUMBER 

OF LCBS FOR 

THIS DCB 




LCBIQQP 



•0 



BUILD AN STCB 

AND CODE IN THE 

BUFFER 



Hfi-3 AS 



REMOVE THE ELE- 
MENT FROM TIME 
DELAY QUEUE 



INSERT THE 

BUFFER STCB 

AFTER THE 

DESIRED STCB 



p roarai Orqanizaticn t»5? 



Chart AS-4 HOLD/RELEASE TERMINAL ROUTINE 




( ^ C 

I FINDLCB 1 I 



} 



AS-3.B3 



GET THE 

RELATIVE LINE 

NUMBER FROM THE 

QCB 



CALCULATE I OB 
SIZE X RELATIVE 

LINE NUMBER + 

ADDRESS OF THE 

FIRST LCB 



GET THE OFFSET 

TO THE FIRST OF 

THE LCB 



f RETURN j 
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Chart AS-5 HOLD/RELEASE TERMINAL ROUTINE 



ENTER V" 



ACTIVATED WHEN THE 
BUFFER STCB IS 
FIRST ON THE LCB 



/ PUT THE 

•buffer first 
Con the release 

\ QCB 



7 



RB-a in 



TPOST THE 

BUFFER AND 

RETURN 



AS-1 ,H5 
AS-2.BI 



•CLEAR LINK \ 
/ FIELDS SET ^ 
[OFFSET TO LINK 
X* ADDRESS OF > 

\RELEASE QCBX 



/ ZERO THE \ 
/LINK FIELD; ^ 
[SET THE OFFSET 
X TO LINK > 



QNFQ 



GET THE ADDRESS 

OF THE LAST 

ELEMENT ON THE 

QCB; SET A NEW 

LAST ELEMENT 







NO,,- 


<HS THE QCB^ 
EMPTY 


SYES 


EMPTY 




LINK THE 

PREVIOUS LAST 

ELEMENT TO THIS 

ELEMENT 


SET THE POINTER 

TO FIRST ON THE 

QUEUE 















I RETURN 1 




SET UP THE 
ADDRESS OF THE 
EXCP INPUT QCB 



I QBFR j f QCPB J f DELAYQ J 



AS-I ,K3 
AS-2.H1 



INITIALIZE THE 

BUFFER FOR TIME 

DELAY 



Hfi-1 A 



INSERT AN ELE- 
MENT ON TIME 
DELAY QUEUE 



f RETURN J 
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Chart AT CREATE AN ERROR MESSAGE ROUTINE AND SUBTASK 




f ENTER J 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



C EX IT TO \ 
DSPCHAIN 1 



GET THE LENGTH 

BYTE FROM THE 

PARAMETER LIST 



© 




GET THE LENGTH 
BYTE FROM THE 
ERROR MESSAGE 



RESET THE 
LENGTH BYTE AND 

ERROR MESSAGE 
ADDRESS IN THE 
PARAMETER LIST 



INSERT Ul a.3 



IEDQUI 



INSERT DATA RTN 

TO PUT ERROR 
MSG IN THE BFR 



TRUNCATE THE 
LENGTH OF THE 
ERROR MESSAGE 



COMPUTE THE 

FINAL DATA SIZE 

AND PUT IT IN 

THE BUFFER 

PREFIX 




USER ROUTINE 



RESET THE 
•DUPLICATE 
HEADER* BIT 



REQUEST A NEW 

UNIT; SET UP TO 

TPOST THE ERB 

TO THE BUFFER 

REQUEST QCB 



SET UP TO TPOST 

THE BUFFER TO 

THE DESTINATION 

QCB 



SET UP TO 

RETURN TO THE 

ERROR MESSAGE 

SUBTASK 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



C EX IT TO \ 
DSPCHAIN 1 



C EX IT TO \ 
DSPCHAIN 1 
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Chart AU CUTOFF MESSAGE TRANSMISSION ROUTINE AND SUBTASK 



CUTFFQCB+ I 2 




SET UP TO TPOST 
THE LCB TO THE 
CUTOFF SUBTASK 
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Chart AV LOOKUP TERMINAL ENTRY ROUTINE 




GET THE 

DESTINATION KEY 

FROM THE 

PRFDEST FIELD 



PUT THE 

DESTINATION KEY 

IN THE PRFDEST 

FIELD 



.IMKiIMT 



nt fta, 



GET DESTINATION 

TERMINAL TABLE 

ENTRY ADDRESS 



GET THE QCB 
ADDRESS FROM 
THE TERMINAL 

TABLE ENTRY 



PUT THE RETURN 

DESTINATION KEY 

IN THE AVTPARM3 

FIELD 
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Chart AW TRANSLATE BUFFER ROUTINE 



1EDQAW 
f ENTER 1 



1,MTB,L f 




QCBINFQ 



GET THE 

TRANSLATE TABLE 

ADDRESS FROM 

THE DCB 



GET THE ADDRESS 

OF THE OUTPUT 

TABLE 



GET THE ADDRESS 
OF THE INPUT 
TABLE . 





SET UP TO START 

THE TRANSLATION 

AT THE EOB 

CHARACTER 



■TRANS, 



FIND THE OFFSET 

TO THE FIRST 

DATA BYTE 



SET5IZE t 



FIND THE TOTAL 

TRANSLATION 

LENGTH 




t AL ft| 



GET THE ADDRESS 

OF THE FIRST 

DATA BYTE 




• 4 J r 


NO 


TRANS,! „ 


DECREMENT THE 

TRANSLATION 

LENGTH BY ONE 

UNIT 






TRANSLATE ONE 
UNIT 






INCREMENT TO 
THE NEXT UNIT 







.EXIT „♦ 



fEXIT TO IEDQLM 1 
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Chart AX BUFFER STEP ROUTINE 



(sou . 



S.CAN, ■ 



AC.E3 
AC.E5 
Al-I ,F2 



A1-2.AI ,GI 

AI-3.BI 

AJ.C3 



INCREMENT THE 

SCAN POINTER 

ADDRESS AND THE 

OFFSET 





(RETURN TO \ 



SET THE UNIT 

REGISTER TO THE 

ADDRESS OF THE 

NEXT UNIT 



SET THE SCAN 
POINTER ADDRESS 

TO THE FIRST 

BYTE OF THE NEW 

UNIT 



SET THE END- 
OF-UNIT REGIS- 
TER TO ONE BYTE 
BEYOND THE LAST 

BYTE IN UNIT 



(RETURN TO \ 
CALLER +4 I 
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Chart AY SCREEN ROUTINE 







NT A3 


YES 


IEDQTNT 


GET THE DESTI- 
NATION TERMINAL 
ENTRY ADDRESS 












ARE THERE^ 1 
NY OPTION 
FIELDS ;t 


SYES 




INCREMENT PAST 

THE OPTION 

F I ELDS 






|NO 









IS ^ 

•BUFS1ZE- 
SPEC I F I ED.* 


\YES 




INCREMENT PAST 

THE 'BUFSIZE* 

FIELD 






|no 
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Chart AZ REDIRECT A MESSAGE ROUTINE 




GET THE ORIGIN 

OFFSET FROM THE 

PREF I X 



GET THE 

DESTINATION 

OFFSET FROM THE 

PREF I X 





BUILD THE 

LOCATE OPTION 

PARAMETER LIST 

( IEDQAE) IN THE 

AVT WORK AREA 



GET THE LENGTH 

AND ADDRESS OF 

THE NAME FROM 

THE PARAMETER 

LIST 



UNKAI 



Ul Ag 



ACTIVATE LOCATE 

OPTION RTN TO 

GET ADDRESS 



BUILD THE 

BINARY SEARCH 

PARAMETER LIST 

( IEDQAI ) IN THE 

AVT WORK AREA 



t Ul A3 



BINARY SEARCH 
TO FIND NAME IN 
TERMNAME TABLE 




TESTPEAP 



LOOKUP ROUTINE 

TO GET QCB ADDR 

& DEST OFFSET 




GET THE 

DEAD-LETTER 

QUEUE OFFSET 

FROM THE AVT 





SRRMSG,, 



UPDATE THE SCB 

TO THE ERROR 

MESSAGE 

PARAMETER LIST 

ADDRESS 



SET THE BUFFER 
DISPOSITION QCB 

AS THE 
DESTINATION QCB 



GET THE 

DESTINATION QCB 

ADDRESS FROM 

THE SCB 



MQIEflfiB,, 



GET THE ERROR 

MESSAGE ROUTINE 

ADDRESS 



PUT THE QCB 

ADDRESS AND THE 

PRIORITY IN THE 

BUFFER 



( \ 

I EX IT TO IEDQAT I 



GET THE LENGTH 

AND ADDRESS OF 

THE NAME FROM 

THE OPTION 

FIELD 



PUT THE BUFFER 
ADDRESS IN 
REGISTER I 



GET THE ADDRESS 
OF THE TCAM 
D I SPATCHER 



C EX IT TO \ 
DSPCHAIN I 
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Chart AO SKIP BACKWARD ROUTINE 



ENTER j 



l EDQAOdl t 



INITIALIZE THE 
SCAN POINTER 

OFFSET REGISTER 
FROM PRFSCAN 







AO F2 






s NO 


NEWSOU 




SET THE COUNTER 

TO THE SKIP 

LENGTH 


GET THE ADDRESS 

OF THE START OF 

THE UNIT 







-*l_AI 



GET THE ADDRESS 

OF THE SCAN 

POINTER 



PUT THE ADDRESS 
OF THE SCAN 
PO 1 NTER I N 
REGISTER I 



A 



PUT A ^ 
RETURN CODE 
00' IN 
REGISTER 15 







A0.D2 
A0.E4 



: AL A1 



GET ADDRESS AND 

UNIT OF CURRENT 

SCAN POINTER 



Ag, re 



GET THE ADDRESS 

OF THE START OF 

THE NEW UNIT 





SET THE ADDRESS 

OF THE START OF 

THE UNIT 



/ 

/ P 

{ PO 
\ 



UPDATE THE ^ 

PREFIX SCAN 

POINTER; PUT 

'■00' IN 

.REGISTER I5> 



(TURN ,T , ^ 
RETURN J 
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Chart A 1 BINARY SEARCH ROUTINE 




ML 



DECREMENT THE 

ENTRY ADDRESS 

BY THE SEARCH 

EXTENT 



DIVIDE THE 

SEARCH EXTENT 

BY TWO 




© 




v 

I EX IT TO IEDQLM 1 
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Chart A2 INSERT AT OFFSET ROUTINE 




SET THE INITIAL 
OFFSET TO THE 
PARM FIELD + 

RESERVE COUNT + 
PREFIX SIZE 




INCREMENT THE 

SCAN POINTER BY 

THE INSERT 

LENGTH 



OfTSCftN 



SET THE INITIAL 
OFFSET TO THE 
SCAN POINTER 




PUT THE OFFSET 

IN THE BUFFER 

PREFIX AND SET 

AVT PARMS FOR A 

UNIT REQUEST 




<PUT A > 
RETURN CODE 
OF X'04' IN 
REGISTER 15 



HEX IT TO IEDQLM I 



COMPUTE THE 
RESIDUAL COUNT 

AND SET THE 

LIMIT TO THE 

RESIDUAL COUNT 



SET THE AVT 

PARAMETERS FOR 

A DATA SHIFT BY 

THE INSERT DATA 

RTN (IEDQAF) 



JU-JU. 



ACTIVATE THE 

INSERT DATA 

ROUTINE 



COMPUTE THE 

FINAL DATA SIZE 

AND PUT IT IN 

THE BUFFER 

PREF I X 



( ^ 

I EX IT TO IEDQLM 1 
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Chart A3 DYNAMIC TRANSLATION ROUTINE 



G 


SET THE RETURN 

REGISTER TO 

SELECT A ' 

RECEIVE/ 

TRANSMIT TABLE 


.© 

„ 










RETURN J 
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Chart A4 INCOMING/OUTGOING MESSAGE DELIMITER ROUTINE 



IS THIS THE*^ 
LAST BUFFER 


>„YES 




SAVE THE 

PARAMETER LIST 

ADDRESS IN THE 

SCB 






|NO 









THIS „ 
DUPLICATE 
HEADER BUFFER 



' TURN OFF > 

•DUPLICATE 
HEADER' BIT 
klN THE SCB y 



PUT THE SCAN 

POINTER OR THE 

DEFAULT VALUE 

IN THE SCB 



/ SET THE 
/ ' INCOMPLETE 
(HEADER* BIT ON 
\ IN THE SCB 



h> 



TSTENTRY 





SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 



AX,ftg 



SCAN FOR THE 

UNIQUE 

CHARACTER 




/ RESET THE X 
' 'MULTIPLE \ 
30UTE' FIELD I N J 
V THE SCB / 



< CLEAR THE X 
• MULT I PLE \ 
ITE' FIELD INJ 
THE SCB / 



TESTPOST 




YES 


DEL 1 NK THE 

EMPTY UNITS 

FROM THE BUFFER 






RB-2 Al 




DSPPOSTR 




TPOST THE EMPTY 

UNITS TO BUFFER 

RETURN QCB 




'QSTMFF t 



PUT THE 
READ-AHEAD QCB 
ADDRESS IN THE 

BUFFER 



PflSTBlSPn 



PUT THE BUFFER 

DISPOSITION QCB 

ADDRESS IN THE 

BUFFER 



PUT THE 
DESTINATION QCB 
ADDRESS IN THE 

BUFFER 



PASS THE NUMBER 

OF RESERVE 

CHARACTERS IN 

THE BUFFER 

PREFIX 



fEX IT TO IEDQGT V 



NT A3 



GET THE 

TERMINAL ENTRY 

ADDRESS 



GET THE EOA 
CONFIGURATION 
FROM THE SCT 



■-IMFOA t 



INCREMENT THE 

COUNT OF 

RESERVE 

CHARACTERS BY 

ONE 



(exit TO dsppost! 






( *\ 

I EX IT TO IEDQGD J 
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Chart A5 FORWARD ROUTINE 



CPflftS ^ 
ENTER J 



( \ 

I LINK A I 1 



GET THE FIRST 

SUBSIDIARY 

PARAMETER LIST 



A5.K2 
A5.F3 



f Ul ,A3 



ACTIVATE IEDQAI 

TO FIND THE 

TERMINAL NAME 




AS A3 



LINK TO THE 

BINARY SEARCH 

ROUTINE 




GET ADDRESS OF 
LAST BYTE IN 
TERMINAL NAME 



INITIALIZE THE 

SCB SECONDARY 

DESTINATION 

FIELD 



RESET THE SCB 

SECONDARY 

DESTINATION 

FIELD TO ZERO 



RETURN J 
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Chart A6-1 LINE CONTROL INITIALIZATION ROUTINE 




GET THE ADDRESS 
OF THE DEVICE- 
DEPENDENT AREA 



SET THE 

SUBBLOCK 

REGISTER FROM 

THE SUBBLOCK 

THE ENTRY 



exjTQFFmT 

(exit to iedqlm J 
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Chart A6-2 LINE CONTROL INITIALIZATION ROUTINE 




INCREMENT PAST 

THE OPTION 

FIELDS 




SHIFT 



POINT TO THE 

FIRST OR THE 

NEXT FIELD 




f ^\ 

I RETURN 1 



GET THE LENGTH 
OF THE FIRST OR 
THE NEXT FIELD 
AND POINT PAST 
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Chart A7 COUNTER ROUTINE 




ACTIVATE LOCATE 
OPTION ROUTINE 
TO GET ADDRESS 




INCREMENT THE 

COUNT IN THE 

OPTION FIELD BY 

ONE 




PUT A ^ 
RETURN CODE 
OF X'OO* IN 
REGISTER 15 



f RETURN 1 



RgflB. 



' PUT A ^ 

RETURN CODE 
OF X'FF' IN 
REGISTER 15 



Proqram Orqanization 4*?3 



Chart A8 MULTIPLE INSERT AT OFFSET ROUTINE 



CQOAfi 
ENTER 1 



'EPflASfll 



BUILD THE 

LOCATE OPTION 

PARAMETER LIST 

IN THE AVT WORK 

AREA 



t HI Mi 



ACTIVATE LOCATE 
OPTION ROUTINE 
TO GET ADDRESS 






TEXT 




X"lS THIS A >v 
C HEADER BUFFER^ 


NO 


SET THE INITIAL 

OFFSET TO RE- 
SERVE CHARACTER 

COUNT, PREFIX 
SIZE, & OPT FLD 






YES 








SET THE INITIAL 

OFFSET TO RE- 
SERVE CHARACTER 

COUNT, PREFIX 
SIZE, 4 EXTENT 




















TESTF1T ' 



PUT A ^ 
, RETURN CODE 
< OF X'04' IN 
\ REGISTER 15 







(exit TO IEDQLM J 



COMPUTE THE 

INITIAL OFFSET 

FOR THE NEXT 

BUFFER 



SET UP TO STORE 
ZEROS IN THE 
OPTION FIELD 







lUflli, 



PUT THE INITIAL 

OFFSET IN THE 

BUFFER AND THE 

INSERT DATA IN 

THE AVT 



PUT THE DATA 

TYPE AND 

ROUTINE OFFSETS 

IN THE AVT 



MMNUQPB 



ui ft a 



ACTIVATE UNIT 
REQUEST ROUTINE 
TO INSERT DATA 



BUILD THE 

INSERT DATA 

PARAMETER LIST 

IN THE AVT 



COMPUTE THE 

RESIDUAL COUNT 

IN THE BUFFER 



.iSHUSX, 



SET THE PASS 

LIMIT EQUAL TO 

THE EXTENT 



., f D4 J 



SLflSSUP 




SET THE PASS 

LIMIT EQUAL TO 

THE RESIDUAL 

COUNT 



1 ,UI .u., 



INSERT DATA RTN 

TO SHIFT TO END 

OF DATA 



COMPUTE THE 

INITIAL OFFSET 

FOR THE NEXT 

BUFFER 




COMPUTE THE 

INITIAL OFFSET 

FOR THE NEXT 

BUFFER 



,5ETQ(?I 



re 



SET THE OPTION 

FIELD FOR THE 

NEXT BUFFER 



GOODRJLa. 

/ SET A ^ 

/ RETURN CODE 
* OF X'OO* IN 
\ REGISTER 15 



-0 



m A3 



INSERT DATA RTN 

TO SHIFT TO 
NEXT INSERT PT 



^i£ai T mTi >^ 

(EXIT TO IEDQLM J 
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Chart BA MULTIPLE ROUTING SUBTASK 




BUFFER 



GET THE CURRENT 

BUFFER ADDRESS 

AND THE COUNT 

OF BUFFERS FROM 

THE ERB 



COUNT THE 

NUMBER OF 

BUFFERS PRESENT 




PUT THE COUNT 
AND THE ADDRESS 
OF THE CURRENT 

BUFFER IN THE 
ERB 



SET THE SCB TO 

START THE SCAN 

AT THE START OF 

THE CURRENT 

BUFFER 



PUT THE ADDRESS 

OF THE SECOND 

BUFFER IN THE 

LCB 



SETftYTftP f 



© 



III, A3, 



PUT THE BUFFER 

ADDRESS IN THE 

AVT 



NEXTDE5T t 



PUT THE 

DESTINATION IN 

THE BUFFER 

PREFIX 





SET THE RETURN- 
CONTROL QCB 
FIELD OF THE 
LCB TO DISTRI- 
BUTION LIST QCB 



SET THE SCAN 

POINTER FROM 

THE SCB 



'OSTBFR 



LINK THE SECOND 

BUFFER TO THE 

FIRST ONE 



MBHSftYE, 



PUT THE DATA 

FOUND IN THE 

LCB 



CLEAR THE 

MULTIPLE ROUTE 

FIELD OF THE 

SCB 



CLEAR THE LINK 

FIELD OF THE 
CURRENT BUFFER 



PUT THE BUFFER 

RETURN QCB 

ADDRESS IN ALL 

BUFFERS 



PUT THE ADDRESS 

OF THE FIRST 

BUFFER IN THE 

ERB 



PUT THE 
DESTINATION QCB 
ADDRESS IN THE 

BUFFER 



LINK THE ERB TO 
THE LAST BUF- 
FER: SET THE 

BUFFER DISPOSI- 
TION QCB ADDR 



GET THE FORWARD 

PARAMETER LIST 

ADDRESS FROM 

THE SCB 



PUT THE ADDRESS 
OF THE DISK I/O 
QCB IN THE LCB 



i 1 f EXIT TO Tt 

lEXIT TO DSFPOSTj I DSPCHAIN J 



f \ 

I EX IT TO DSPPOSTj 



© 
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Chart BB CHECKPOINT REQUEST ROUTINE 





(RETURN TO ^ 
1EDQLM 1 



1 

(exit to dsppostj 
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Chart BC DISTRIBUTION LIST SUBTASK 



igBflBC 

{ ENTER V 



GET THE ADDRESS 

OF THE RECALLED 

HEADER 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



GET THE OFFSET 
TO TL1ST IN THE 
TERMNAME TABLE 



■MI A3, 



GET ADDRESS OF 
THE LIST IN THE 
TERMINAL TABLE 



GET THE OFFSET 

OF THE FIRST 

ENTRY IN THE 

LIST 




GET THE ADDRESS 

OF THE TLIST 

ENTRY 




BCONT 



NT A3 



GET THE 

TERMINAL TABLE 

ENTRY ADDRESS 



PUT THE 

DESTINATION QCB 

ADDRESS IN 

SCBDESTQ 



TPOST THE 

BUFFER TO THE 

DESTINATION QCB 



C EX IT TO \ 
DSPCHAIN 1 




TPOST THE 

BUFFER TO THE 

MULTIPLE 

ROUTING QCB 



TPOST THE LCB 
TO IEDQBD 



SET LCBRCQCB TO 

POINT TO THE 

MULTIPLE 

ROUTING QCB 



TPOST THE 

BUFFER TO THE 

BUFFER RETURN 

QCB 
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Chart BD-1 BUFFER DISPOSITION SUBTASK 




V YES 


GET THE FIRST 

BUFFER ASSIGNED 

TO THIS LINE 






GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 






YES 








,/does THE ^s. 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



KKERB 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



RECEIVE 



SET UP TO TPOST 
THE ERB TO ITS 
DESTINATION QCB 



REMOVE THE ERB 
FROM THE BUFFER 
RETURN QCB, 



IS THERE 




SET UP TO TPOST 

THE LCB TO 

ITSELF 



SET UP TO TPOST 

THE ERB TO THE 

ACTIVATE QCB 

FOR RECALL 
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Chart BD-2 BUFFER DISPOSITION SUBTASK 



I ENTER 1 





SET UP TO 

RETURN A 

RECALLED HEADER 

TO MULTIPLE 

ROUTING 



GET ADDRESS OF 

DISTRIBUTION 
TERMINAL ENTRY 



SET UP TO 

RETURN THE 

RECALLED HEADER 

TO DISTRIBUTION 

LIST 



RECALL 



SET UP TO TPOST 

THE ERB TO THE 

DISK I/O QCB 

FOR RECALL 




BBCKPT 



SET UP TO TPOST 
THE LCB TO THE 
CHECKPOINT QCB 




IS A CANCEL^SvNO 




SET UP TO TPOST 
EOM SEGMENT TO 

BE MARKED 

SERVICED 



5NDLCK 




NOTLOCK „ 
-xti OCK f 



PUT ZEROS IN 

THE LCB AND SCB 

FLAGS 



SET THE 

DESTINATION TO 

BE THE BUFFER 

RETURN QCB 




C EX IT TO \ 
DSPCHAIN 1 
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Chan BE LOCK ROUTINE 





GET THE 

DESTINATION 

OFFSET FROM THE 

BUFFER 




MEXIT TO IEDQLM J 



SEARCH 



GET THE 

FIRST/NEXT 

TERMNAME TABLE 

OFFSET 



NT A3 



GET THE 

TERMINAL TABLE 

ENTRY ADDRESS 



/ SET THE X 
• 'MESSAGE \ 

Clock* switch in) 

\ THE SCB / 



'SET THE •POST^ 

PENDING' FLAG 
V IN THE LCB A 



PUT THE 

DESTINATION 

OFFSET IN THE 

LCB 




• SET THE \ 
f 'EXTENDED \ 
.LOCK' SWITCH IN) 
*V THE SCB / 
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Chart BF UNLOCK ROUTINE 




' SET THE ^ 

SUCCESSFUL 

RETURN CODE 

X'OO' 



'TURN OFF THE ^ 

•LOCK' SWITCH 
^ IN THE SCB > 



(exit TO IEDQL.M 1 
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Chart BG CASCADE LIST SUBTASK 



Coses 
ENTER V 



GET THE 

TERMNAME TABLE 

ADDRESS 



GET THE 

DESTINATION 

OFFSET OF THE 

CASCADE LIST 



NT A3 



GET TERMINAL 

TABLE ADDRESS 

OF CASCADE LIST 



CALCULATE THE 

NUMBER OF 

ENTR I ES 



-CL5IE. 



NT A3 



GET THE ENTRY 
ADDRESS IN THE 
TERMINAL TABLE 



GET THE ADDRESS 

OF THE QCB AND 

OF THE DCB 




, CLSWAP 




GET THE ADDRESS 

OF THE FIRST 

ENTRY 



CLPQST t 

PUT THE 

DESTINATION IN 

THE BUFFER AND 

IN THE SCB 



TPOST THE 

BUFFER TO THE 

DESTINATION QCB 



/ ^ 

►Iexit to dsppostI 
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Chart BL MESSAGE GENERATION ROUTINE 



GET THE ADDRESS 

OF THE 

TRANSLATION 

TABLE FROM THE 

PARAMETER LIST 



CDflBL 
ENTER FROM ^ 
IEDQBD I 



GET THE ADDRESS 

OF TEXT FROM^ 

THE PARAMETER 

LIST 




SET UP TO TPOST 

THE ERB TO 

IEDQBD 



USE THE DCB 

TRANSLATION 

TABLE ADDRESS 



S\ S THE TEXTS. 
C LONGER THAN J 
> S > ^ MAXIMUM yT 


YES 




TRUNCATE TO THE 
MAXIMUM SIZE 








NO 


















MOVE THE TEXT 
TO THE SCB 












/ SET THE 

VMSGGEN' BIT It 
V THE LCB i 



SET UP THE CCW 



SET UP TO TPOST 

THE ERB TO THE 

ACTIVATE QCB 



C EX IT TO \ 
DSPCHAIN 1 
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Chart BT-1 EOB/ETB HANDLING SUBTASK 




GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 




© 



■BT-4 ft 




REMOVE THE ERB 
FROM THE BUFFER 

RETURN QCB OR 
THE READY QUEUE 



CLEAR THE 
MULTIPLE- 
BUFFER-HEADER 
FIELD 



SET UP TO TPOST 

THE BUFFER TO 

THE ACTIVATE 

QCB 



C EX IT TO \ 
DSPCHAIN I 



SET UP TO TPOST 

THE BUFFERS TO 

THE BUFFER 

RETURN QCB 



RECALL 






SET UP TO 

RECALL THE LAST 

EOB 



SET UP TO TPOST 

THE ERB TO 

IEDQFA FOR 

RECALL 



GET THE 
^ADDRESS OF THE 
kSTARTMH STCB 



\ f EXIT TO > 

HE J ' H DSPBYPAS I 

/ vr — ; 



H8K 



Chart BT-2 EOB/ETB HANDLING SUBTASK 




ui hi 



ACTIVATE IEDQAE 
TO LOCATE THE 
OPTION FIELD 



ACTIVATE IEDQAE 
TO LOCATE THE 
OPTION FIELD 








UI A3 



ACTIVATE IEDQAE 

TO GET THE USER 

RTN ADDRESS 



USER ROUTINE 



ACTIVATE IEDQAE 
TO LOCATE THE 
OPTION FIELD 






o 



ASTRA, t 



RESET THE 

•TEXT ERROR* 

SWITCH 



'SET THE 'NOT 
LAST BUFFER' 
W SWITCH 



SFT CONT f 

/ SET THE \ 

O CONTINUE' FLAG> 




SET UP TO TPOST 

THE BUFFER TO 

THE ACTIVATE 

QCB 



C EX IT TO \ 
DSPCHAIN 1 
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Chart BT*3 EOB/ETB HANDLING SUBTASK 




GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



RESTORE THE 

FIELDS 

DESTROYED BY 

THE RECALL 




S5TRCY, 



SAVE THE 

REMAINING IDLE 

CHARACTERS 



RECALL, 



SET UP TO 

RECALL THE LAST 

EOB 



SET THE ERB TO 

RECALL BUFMAX - 

BUFOUT 



SET UP TO TPOST 

THE ERB TO 

IEDQFA FOR 

RECALL 



SET PRFSCAN AND 
THE SIZE IN THE 
RECALLED BUFFER 



PREVENT A 

MULT I -BUFFER 

HEADER 



CEXIT TO ^N 
DSPCHAIN 1 



HDROK 



PUT THE BUFFER 

AT THE START OF 

THE CHAIN 



EXCP - 

EXECUTE THE 

CHANNEL 

PROGRAM 




SET UP TO TPOST 

THE ERB TO FILL 

BUFMAX 



SET UP TO TPOST 

THE BUFFER TO 
THE STARTMH QCB 





SET THE SCB 

LAST EOB FIELD 

TO EQUAL THIS 

RECORD 



DECREMENT THE 

INPUT SEQUENCE 

NUMBER 



'REYEQB 



CHAIN THE 
RECALLED BUFFER 
AT THE START OF 

THE CHAIN 




REMOVE THIS 

RECORD AND ALL 

AFTER IT FROM 

THE MAIN 
STORAGE QUEUE 



BLBfiCW 



BUILD CCWS IN 

THE RECALLED 

BUFFER 
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Chart BT4 EOB/ETB HANDLING SUBTASK 




YES /%& THE *BAd\ 

•— — r -< RETURN* > 

\ INDICATOR • 



^ET THE 'GOOd\ 
< RETURN' > 
X INDICATOR • 



( N 

I RETURN I 

V J 



"Droqram Orqani?ation 487 



Chart BW UNIT REQUEST ROUTINE 




SUBTRACT ONE 
FROM THE 
AVAILABLE 

BUFFER COUNT 



f \ 

I RETURN 1 
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Chart BX LOG SEGMENT ROUTINE 



CCJ2&S. . 
ENTER J 




GET THE ADDRESS 

OF THE DCB FROM 

THE PARAMETER 

LIST 




OPENED 



' PUT A > 
RETURN CODE 
OF X'04' IN 
REGISTER 15 



c *\ 

I EXIT TO 1EDQLM I 




CALCULATE 

DCBNCP (NUMBER 

NEEDED) X THE 

SIZE OF THE 

DECB 



GETMAIN - 

GET MAIN 

STORAGE FOR 

THE DECBS 



PUT THE ADDRESS 
OF THE FIRST 

DECB IN THE 
DCBEODAD FIELD 

OF THE DCB 



J2&. 



GET THE NUMBER 
OF UNITS IN THE 
BUFFER: SET THE 

NUMBER OF 
WRITES DONE = 



WRITE1 



GET THE ADDRESS 

OF THE FIRST 

DECB 



WRITS, 



CALCULATE THE 

ADDRESS OF THE 

UNIT+12! THE 

NUMBER OF 

WRITES + I 




GET THE ADDRESS 

OF THE NEXT 

UNIT AND OF THE 

NEXT DECB 




ALLBFR 



GET THE ADDRESS 
OF THE FIRST 
DECB TO CHECK 



CHECK t 



GET THE ADDRESS 

OF THE NEXT 

DECB 
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Chart BY LOG MESSAGE ROUTINE 



CPflfil ,,, r,,.. 



GET THE ADDRESS 
OF THE TERMINAL 
ENTRY FROM THE 
PARAMETER LIST 



GET THE ADDRESS 

OF THE 
DESTINATION QCB 

FROM THE 
TERMINAL ENTRY 



ADD THE 

RECALLED HEADER 

BUFFER TO THE 

TPOST LIST 



SET THE 

DESTINATION QCB 

ADDRESS AND 

PRIORITY FOR 

TPOST 



_____ ' 

CEXIT TO \ 
DSPCHAIN j 
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Chart B Z- 1 LOG SCHEDULER ROUTINE 




GET THE DCB 

ADDRESS FROM 

THE QCB 




GET THE ADDRESS 

OF THE QCB AND 

OF THE SCB 



CALCULATE THE 

SIZE OF THE 

DECB TIMES THE 

NUMBER OF DECBS 

NEEDED 



GETMAIN - 

GET MAIN 

STORAGE FOR 

THE DECBS 




INTIAL1ZE 
r THE ERB FOR 

TPOST TO THE 
IDISK I 10 QCB 



X 






• SET RECALL ^ 
(AND THE RECALL 
\ QCB J 



(EXIT TO A f \ 

DSPBYPAS 1 I EX IT TO DSPPOSTj 




SET THE \ 
ADDRESS OF \ 
[THE QCBS FOR AN) 
STCB MOVE / 



RB~S ft 



t BZ-S ft& 



(exit TO DSPPOSTJ 



f STCBMOVE J 



HM-8.E2 

HM1-6.E2 

HM2-7.E2 



AS-2.J5 



GET THE ADDRESS 

OF THE LCB AND 

OF THE DCB 




Bi-S AS 



t RB-g ft 



TPOST THE LCB 

TO THE READY 

QUEUE S. RETURN 



c 






RTN RR-P Al 


DSPUNAVR 


MOVE THE STCB 
AND RETURN 






[ RETURN J 



« « 
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Chart BZ-2 LOG SCHEDULER ROUTINE 



fiETAPPR 



GET THE ADDRESS 

OF THE NEXT 

UNIT TO WRITE 



© 




f LCBPOST J 



BZ-1 ,F3 
BZ-I ,E4 



SET THE QCB 

ADDRESS POINTER 

TO THE LGB 

ADDRESS 



( N 

I RETURN J 



MflTALL, 



t u if r\ i i xl. . I nc 

NUMBER WRITTEN, 

AND THE NEXT 

UNIT TO WRITE 




SET THE ERB 

TO BE TPOSTED 

TO THE LCB 



» 



(exit TO DSPPOSTJ 
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Chart CA RESIDENT OPERATOR CONTROL MODULE 



f ENTER J 



«AVE REGISTERS^ 



/ \ 

/ ESTABLISH \ 
^ADDRESSABILITY > 



^>UT AN ENTRY 
< CODE OF I IN 
\ REGISTER 



t ZI-,1, ft I 




f RETURN J 



EDgCAfl2 . 

f ENTER J 



CF-2.AI 



A>\SX AN ENTRY 
< CODE OF 4 IN 
X REGISTER 



,Z1.-|, ft 



f RETURN J 
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Chart CF-1 MODIFY OPTIONS ROUTINE 



CCflCE ^^ 
ENTER J 



Z2.F2 



/ ESTABLISH ^ 
^ADDRESSABILITY 






LOAD THE . 
IEDQC5 WORK 
AREA 



GET THE 

TERMNAME TABLE 

ADDRESS 






ERROR 





SET THE 

•FIRST TIME' 

SWITCH 



PI SPLAT 



PUT THE OPTION 

FIELD VALUE IN 

THE WORK AREA 




LBLANK 



PREPARE THE 

•FIELD IS ALL 

BLANKS' MESSAGE 



-© 



CONVERT THE 

FIELD FROM 

PACKED TO ZONED 

DEC I MAL 



CONVERT THE 

LAST BYTE FOR 

THE S I GN 



CONVERT THE 

VALUE TO 

PR I NTABLE 

NUMBERS 



ERREX 



O 



N0TA.U, t 



IS THIS 
NO>^THE CORRECT^ 
OPTION ENTRY 



(RETURN TO A 
IGCOIIOD 1 



U94 



Chart CF-2 MODIFY OPTIONS ROUTINE 





ERREX 




RESET 



(RETURN TO "\ 
IGCOtlOD 1 






© 
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Chart CF-3 MODIFY OPTIONS ROUTINE 




(RETURN TO \ 
IGCOIIOD 1 



& 



c 



") 
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Chart CG COPY LINE INFORMATION ROUTINE 




ERROR 



BUILD THE -NAME 

NOT FOUND* 

MESSAGE 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



BUILD THE 'NAME 

IS A PROCESS 
ENTRY' MESSAGE 



GET THE QCB 

ADDRESS FROM 

THE TERMINAL 

ENTRY 



GET THE 

RELATIVE LINE 

NUMBER; PUT IT 

IN THE 1ED0381 

MESSAGE 



GET THE DCB 

ADDRESS FROM 

THE QCB 




NqTOP 



.YES 


GET THE DEB 

ADDRESS FROM 

THE DCB 




GET THE UCB 

ADDRESS FROM 

THE DEB 
















BUILD THE 'LINE 

NOT OPEN' 

MESSAGE 




PUT THE UCB ID 

IN THE IED038I 

MESSAGE 



PUT THE NAME 1 

THE 1ED038I 

MESSAGE 



Caui-l s 
RETURN TO \ 
I GCO I I0D 1 
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Chart CH COPY TERMINAL INFORMATION ROUTINE 



CQQCH , , ^ 



< ESTABLISH ^ 
IRESS ABILITY 



GET THE 

TERMNAME TABLE 

ADDRESS 




ERROR 



BUILD THE 'NAME 

NOT FOUND' 

MESSAGE 



SEJJAjpJL 



r PUT THE ^ 
RETURN CODE 

X'04' IN 
REGISTER 15 




FQUNB 



PUT THE ENTRY 

NAME IN THE 

MESSAGE 



GET THE 

TERMINAL ENTRY 

ADDRESS 



PUT THE INPUT 

AND OUTPUT 

SEQUENCE 

NUMBERS IN THE 

MESSAGE 




N81MMSC, 



(RETURN TO \ 
IGCOI IOD 1 



INCREMENT TO 

THE NEXT ENTRY 

IN THE TABLE 



PUT THE 

INTENSIVE MODE 

FIELD IN THE 

MESSAGE 
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Chart CI COPY LCB INFORMATION ROUTINE 



ENTER J 



Z2.F2 



CONVERT THE 

RELATIVE LINE 

NUMBER TO 

HEXADECIMAL 



CALCULATE THE 

OFFSET OF 

DDNAME IN THE 

TIOT 




QET.LCB 




C,0M,)N.Y 



PREPARE THE 

• INVALID 

COMMAND ' 

MESSAGE 



SEJF.ET t 



XPUT THE X'04'^ 
(RETURN CODE IN 
\ REGISTER 15 J 



r\ /^ atU — \ 

f nP \ ( RETURN TO A 

\~ J I 1GC0I IOD 1 



SETPCB 



GET THE DCB 

ADDRESS FROM 

THE DEB 




PREPARE THE 

•LINE NOT 

FOUND' MESSAGE 





CflUNTQK., 



GET THE I OB 

LENGTH 

MULTIPLIED BY 

THE RLN AND ADD 

TO THE I OB 



PUT THE LINE 

NAME IN THE 

MESSAGE 




GET THE SCB 

ADDRESS FROM 

THE LCB 



NO>^ IS THE 

RLN>NUMBER OF 
EXTENTS 



■£8fi 



PREPARE THE 

• INVALID 

COMMAND' 

MESSAGE 



ERUQflfi 



PUT THE ERROR 

MASK IN THE 

MESSAGE 



C RETURN TO \ 
IGCOIIOD 1 




(RETURN TO \ 




(RETURN TO \ 
IGCOIIOD 1 
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Chart CJ GOPY QCB INFORMATION ROUTINE 



ENTER ) — - 



GET THE 

TERMNAME TABLE 

STARTING 

ADDRESS 




FOUND, 



PUT THE 

TERMINAL NAME 

IN THE IED03I I 

MESSAGE 



GET THE 

TERMINAL ENTRY 

ADDRESS 



..ERROR 



PREPARE THE 

•NAME NOT 

FOUND* IED0I6I 

MESSAGE 




NQTQP 



PREPARE THE 
•LINE NOT OPEN' 
IED09II MESSAGE 



PUT THE QCB 
COUNT IN THE 
IED03I I MESSAGE 



PUT THE STATUS 

IN THE IED03I I 

MESSAGE 



RILflOF 



PUT THE 
PRIORITY IN THE 
IED03I I MESSAGE 





'PUT THE X 
^RETURN CODE IN 
REGISTER 15 





'PUT THE X'OO' 

{RETURN CODE II* 

REGISTER 15 



(EXIT T ^ 
RETURN TO ^ 
IGCOIIOD J 
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Chart CK COPY HELD TERMINALS ROUTINE 



■gPQCK , ^ 

f ENTER J 



Z2.F2 



/ ESTABLISH ^ 
^ADDRESSABILITY 






GET THE ADDRESS 

OF THE TERMNAME 

TABLE FROM THE 

AVT 




GET THE 

TERMINAL ENTRY 

ADDRESS 



INCREMENT TO 

THE NEXT 

TERMNAME TABLE 

ENTRY 




PUT THE 

TERMINAL NAME 

IN THE RESPONSE 

MESSAGE 




PREPARE A 
ENTRY FOUND* 
RESPONSE 
MESSAGE 



C RETURN TO \ 
1GC0II0D 1 
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Chart CL-1 COPY INVITATION LIST ENTRY ROUTINE 



ISP9CL „,„ , ^ 

f ENTER J 



^AODfl 




CONVERT THE 

RELATIVE LINE 

NUMBER TO 

HEXADECIMAL 




GET THE OFFSET 
OF THE ODNAME 
INTO THE TIOT 



GET THE ADDRESS 

OF THE FIRST 

DEB 



BUILD THE 

•INVALID 

COMMAND * 

MESSAGE 



(RETURN TOA 
IGCOIIOD I 





BU I LD THE ' L I NE 

NOT FOUND' 

MESSAGE 



(RETURN TO ^ 
IGCOIIOD I 



GET THE UCB 

ADDRESS FROM 

THE DEB 




502 



Chart CL-2 COPY INVITATION LIST ENTRY ROUTINE 




BUILD THE 'LINE 

NOT OPEN' 

MESSAGE 



GET THE 

INVITATION LIST 

ADDRESS FROM 

THE DCB 



INCREMENT TO 

THE START OF 

THE INACTIVE 

ENTRIES 



GET THE 
TERMINAL NAME 
OF THE ENTRY 



TURN ON THE 

•FOUND' 

I ND I CATOR 



C RETURN TO ^ 
IGCOIIOD I 




PREPARE AN 

•ENTRY LIST* 

MESSAGE 



C RETURN TO \ 
IGCOIIOD 1 
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Chart CM COPY OPERATOR CONTROL TERMINAL ROUTINE 



CPQfiM ■ ^ 
mTEB J 



/ ESTABLISH ^ 
^ADDRESSABILITY 



GET THE 

TERMNAME TABLE 

ADDRESS FROM 

THE AVT 



GET THE 

TERMINAL NAME 

OFFSET 





PUT 'SYSCON' I 

THE IED04I I 

MESSAGE 



SECTIfRM 



5ETTRM, 



ADD THE OFFSET 

TO THE ADDRESS 

OF THE TERMNAME 

TABLE 



PUT THE 

TERMINAL NAME 

IN THE IED04I I 

MESSAGE 




JBI 



GET THE 

TERMINAL ENTRY 

ADDRESS 




PUT THE 

TERMINAL NAME 

IN THE IED04I I 

MESSAGE 



I NCR t 



GET THE ADDRESS 

OF THE NEXT 
TERMINAL ENTRY 



PUTMSG 


..NO 


SETCON 




,/wERE ANY ^S 
-ENTRIES, FOUND 


PUT 'SYSCON' IN 

THE IED04II 

MESSAGE 




|YES 







PUT THE MESSAGE 

LENGTH IN 

IED04I I 



PEL.ETE 



FIX THE MESSAGE 

LENGTH AND PUT 

IT IN IED04I I 



iXIT, f 



•PUT THE X'OO' 
(RETURN CODE If. 
X REG I STER I 5 



oulJ 

/ return to a 
i i gco i i od 1 
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Chart CN CHANGE CONTROL TERMINAL ROUTINE 




GETTRM 



GET THE 

TERMNAME TABLE 

ADDRESS FROM 

THE AVT 




IS CON- 
TROL TER- 
MINAL SYSTEM 
CONSOLE 
NOW 



SET THE INDEX 

IN THE AVT TO 

ZERO 



NQTFOUNP 



PUT THE 

TERMINAL NAME 

IN THE IED0441 

MESSAGE 



-© 





C.EXIT, T, , , ,^ 
RETURN J 



PUT THE 

TERMINAL OFFSET 

IN THE AVT 



SET ,f 



GET THE 

TERMNAME TABLE 

OFFSET OF THIS 

TERMINAL 









_&LB_ 



MESSAGE ,t 



PUT 'SYSCON' 
THE IED04I I 
MESSAGE 




CEX1T T , ^ 
RETURN J 



X"lS lEDQNX^S 

C IN THE SYSTEM 


YES 




PUT THE 
TERMINAL NAME 
OFFSET IN THE 
1ED04II MESSAGE 






|NO 








LOAD - 
IEDQNX 




<• 


t> 
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Chart CO-1 CHANGE TERMINAL ROUTINE 



CML2 
ENTER J ^ 



GET THE 

TERMNAME TABLE 

ADDRESS FROM 

THE AVT 


















YES 




■ PREPARE AN 
ERROR RESPONSE 













PREPARE THE 

•CANNOT BE 

VARIED' MESSAGE 



GET THE ADDRESS 

OF THE QCB FOR 

THE ENTRY 



GET THE ADDRESS 

OF THE DCB FOR 

THE ENTRY 




/ PUT THE 
/ X'04' ERROR „ 
[RETURN CODE IN >- 
\ REGISTER 15 / 



)R \ : 






/ > * 

►I RETURN 1 



GET THE 

RELATIVE LINE 

NUMBER AND THE 

DEB ADDRESS 




GET THE 

INVITATION LIST 

ADDRESS 
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Chart CO-2 CHANGE TERMINAL ROUTINE 




BUILD THE 

•TERMINAL 

VARIED' MESSAGE 



(RETURN TO \ 
IGCOIIOD J 




SWAP THE ENTRY 

WITH THE 
PREVIOUS ENTRY 
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Chart CO-3 CHANGE TERMINAL ROUTINE 




PUT THE ENTRY 

ON THE ACTIVE 

SIDE 



POINT TO THE 

NEW END OF 

ACTIVE ENTRIES 



INCREMENT THE 

COUNT OF 

ENTRIES 



BACK UP PAST 

THE EOT/FE 

BYTES 




SWAP THE ENTRY 

WITH THE 
PREVIOUS ENTRY 





© 



GET THE NUMBER 

OF ACTIVE 

ENTRIES 



GET THE INDEX 

OF THE NEXT 

ENTRY 




SWAP THIS ENTRY 

WITH THE NEXT 

ENTRY 



SWAP THE ENTRY 

TO THE INACTIVE 

SIDE 



DECREMENT THE 

COUNT OF ACTIVE 

ENTRIES 
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Chart CP-1 ALTER TRACE STATUS ROUTINE 




fiETPAT/i 



CONVERT THE 

RELATIVE' LINE 

NUMBER TO 

HEXADECIMAL 




COM I NY 




CALCULATE THE 

OFFSET TO 

DDNAME 




PUT THE . 
RELATIVE LINE 
NUMBER IN THE 
IED0I7I MESSAGE 



PUT THE UCB 
ERROR IN THE 
IED0I7I MESSAGE 



SEJBA.D f, 



•PUT THE X'04'^ 
[RETURN CODE IN 
\ REGISTER 15 / 



.EXIT t 



V 

I RETURN I 



Program Organization 509 



Chart CP-2 ALTER TRACE STATUS ROUTINE 
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Chart CQ STOP/RESUME TERMINAL TRANSMISSION ROUTINE 



» / E 

ENTER I »-ODDF 

Z2.F2 



/ ESTABLISH ^ 
►^ADDRESSABILITY 



GET THE 

TERMNAME TABLE 

ADDRESS 



PREPARE THE 

•ALREADY 

RELEASED* 

MESSAGE 



/PUT THE X'OO'^ 
[RETURN CODE IN 
\ REGISTER 15 > 



f RETURN J 



PREPARE THE 

•ALREADY HELD' 

MESSAGE 
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Chart CU-1 START LINE ROUTINE 




CKOP t 



GET THE DEB 

ADDRESS AND 

RELATIVE LINE 

NUMBER (RLN) 



PUT THE DDNAME 

IN THE IED0I7I 

MESSAGE 




SETP£flC_ 



TURN ON THE 
•PROCESS' 
INDICATOR 



© 



t CtM ai 



EXAMINE THE LCB 



NEXT t 



CALCULATE THE 

NEXT RELATIVE 

LINE NUMBER 




PUT THE LINE 
DDNAME IN THE 
IED0I9I MESSAGE 





CU-3 A4 




YES^ 1 


' IS RLN ^ 
SPECIFIED 

|NO 




TESTALL 






CHECK FOR RLN = 
ALL 








1 CU 











PgB£2_ 



TURN ON THE 
•CHECKPOINT 
INDICATOR 



_£!£_ 



PUT THE LINE 
DDNAME IN THE 
IED0Z0I MESSAGE 





•PUT THE X'OO'^ 
(RETURN CODE IN 
\ REGISTER 15 A 



f RETURN 1 
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Chart CU-2 START LINE ROUTINE 



REQUEST \YES 
FROM MPP OR 
TOTE 




y^ REQUEST \N 
►C FROM TOTE >- 



QLTB1T I 



X 



TURN ON THE ^ 

ON-LINE TEST 

TYPE' BIT > 



fiETRUN 



GET THE 

RELATIVE LINE 

NUMBER 



Y \ INDICATOR X 



GETLCB 



GET THE ADDRESS 

OF THE FIRST 

DEB 



GET THE ADDRESS 

OF THE DCB FOR 

THE DEB 




jusb. 



GET THE NUMBER 

OF RELATIVE 

LINE NUMBERS 



^YES 




GET THE FIRST 
RLN 













GET THE 

TERMNAME TABLE 

ADDRESS 



GET THE FIRST 

ENTRY IN THE 

TABLE 




r PUT THE X^IM'^ 

^RETURN CODE IN 

REGISTER 15 > 



^5«,IT,S T . 
f RETURN J 



TRMEX 



SET UP TO 

PROCESS THE 

ENTRY 







FOUND ,t 



SAVE THE 

RELATIVE LINE 

NUMBER 
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Chart CU-3 START LINE ROUTINE 




COM I NY 



GET THE 

' COMMAND 

INVALID' 

IED0I8I MESSAGE 



SAVE THE 

RELATIVE LINE 

NUMBER 



au..; . 



/PUT THE X'04'^ 
CRETURN CODE IN 
\ REG I STER I 5 > 




QED 




PUT 'ALL' IN 

THE IED0I7! 

MESSAGE 



PUT THE RLN IN 

THE IED0I7I 

MESSAGE 



f RETURN J 



sn 



Chart CU-4 START LINE ROUTINE 



EftCPRTNE t 



SAVE ALL THE 
INCOMING 
REGISTERS 



GET THE DCB 

ADDRESS FROM 

THE LCB 



GET THE DEB 

ADDRESS FROM 

THE DCB 



GET THE ADDRESS 

OF THE UCB FOR 

THIS LINE 



NEXTLIN t 



BUILD A NOOP 

CCW IN THE 

CHANNEL PROGRAM 




^ IS THE ^ 
CONTROL UNIT 
■^ A 2702 v* 


s^YES 




PUT A SAD 
COMMAND IN THE 
CHANNEL PROGRAM 






|NO 









5FTBISCP 



PUT AN ENABLE 
COMMAND IN THE 
CHANNEL PROGRAM 



BJSERROR,. 



BUILD THE BSC 

ERROR MESSAGE 

IED0921 



CU-3 h\ 

TESTALL 




f \ 

I RETURN J 



PUT A DISABLE 
COMMAND IN THE 
CHANNEL PROGRAM 




NO/ IS THIS 

VALID DUAL 
INTERFACE 



SETMQPE 



PUT A SETMODE 
COMMAND IN THE 
CHANNEL PROGRAM 



f SET THE ^ 

COMMAND 
^CHAINING FLAG/ 
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Chart CV-1 STOP LINE ROUTINE 




INCREMENT TO 

THE NEXT ENTRY 

IN THE TABLE 



JES-AJ 



TPOST THE STOP 

LINE REQUEST 
ELEMENT TO TCAM 



CAM I NY, 



PREPARE THE 

•LINE NOT OPEN' 

MESSAGE - 

IED017I 




'SET THE X'04 
RETURN CODE IN 
REGISTER 








SVC I - 

WA I T FOR 

THE LINE TO 

BE STOPPED 



MM. 



PREPARE THE 

•LINE ALREADY 

STOPPED' 

MESSAGE IED025I 



PREPARE THE 

•LINE BELONGS 

TO TSO' MESSAGE 



^ET THE X'OO'^ 
<RETURN CODE IN 
X REGISTER 15 J 



WRITE t 




/SET THE X'00'\ / RESET THE \ 

<RETURN CODE IN> <• QUEUING' FLAG > 

X REGISTER 15 / X / 

J K5 J 




PREPARE THE 
'LINE STOPPED' 
MESSAGE IED026I 



©- 



RETURN J 
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Chart CV-2 STOPLINE ROUTINE 
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Chart CW MODIFY POLL ROUTINE 



C DQCW 
\ 
ENTER J 



< ESTABLISH ^ 
IRESSABILITY 




CONVERT THE 

RELATIVE LINE 

NUMBER TO 

HEXADECIMAL 




GET THE TIOT 




BUILD THE 
•COMMAND 
INVALID' 
MESSAGE 



'SET THE ERRORS 
RETURN CODE IN 
V REGISTER 15 J 



f RETURN 1 



SAVE THE OFFSET 
OF THE DDNAME 
INTO THE TIOT 



BUILD THE 'LINE 

NOT OPEN' 

MESSAGE 



/ s 

•SET AN ERROR 
►< RETURN CODE 



GET THE ADDRESS 

OF THE FIRST 

DEB 



GET THE ADDRESS 

OF THE DCB FOR 

THIS DEB 




INCREMENT TO 

THE NEXT DEB IN 

THE CHAIN 




XTURN ON THE ^ 
VAUTOPOLL' FLAG 

V ■/ 



BUILD THE 

'ALREADY 

MODIFIED' 

MESSAGE 



BUILD THE 

•MODIFIED' 

MESSAGE 



f \ 

I RETURN 1 
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Chart <CX-1 MODIFY INTENSE ROUTINE 



r* — ^ 

I ENTER J 



Z2.F2 



< ESTABLISH \ 
IRESSABILITY > 





GET THE ADDRESS 

OF THE TERMNAME 

TABLE 



© 



CONVERT THE 

RELATIVE LINE 

NUMBER TO 

HEXADECIMAL 




IS THE\YES 
■ THE 
TABLE 




INCREMENT TO 

THE NEXT ENTRY 

IN THE TERMNAME 

TABLE 




BUILD THE 
•COMMAND 
INVALID* 
MESSAGE 



BUILD THE 'LINE 

NOT OPEN' 

MESSAGE 



^UT AN ERROR > 

►<RETURN CODE IN 

X REGISTER 15 > 



^"UT THE X'04' 
<RETURN CODE IN 
X REGISTER 15 „ 



©L 



SAVE THE DDNAME 

OFFSET IN THE 

TIOT 



f RETURN J 



f RETURN J 



GET THE ADDRESS 

OF THE FIRST 

DEB 
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Chart CX-2 MODIFY INTENSE ROUTINE 




S20 



Chart CZ CHANGE INTERVAL TYPE ROUTINE 





SET THE X' 
RETURN CODE AND 
TURN ON THE 
•CHECKPOINT' 



r 1 ^ — ^ 

I RETURN J 





PUT THE 

INTERVAL IN THE 

DCB 










PREPARE THE 
IED048I MESSAGE 









I RETURN 1 
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Chart C0-1 MCP CLOSEDOWN PROCESSING ROUTINE 








CO-2 Al 


JMO 


LCBLOOP 


MARK ALL LCBS 

THAT ARE 

STOPPED 











GET THE CHAIN 

OF PCBS FROM 

THE AVT 



WTO - TELL 

CONSOLE OF 

DCB STILL 

OPEN FOR 

APPL PROG 



WAIT - FOR 
OPERATOR 

CONTROL ECB 

POSTED BY 

CLOSE 




GET THE NEXT 

PCB IN THE 

CHAIN 




TURN ON THE 

•QUICK 

CLOSEDOWN' BIT 

IN AVTBITI 



TURN ON THE 

•CLOSEDOWN' BIT 

IN AVTBITI 




SET THE 

•TEST-AND-SET' 

SWITCH 



REMOVE THE 

BUFFER; CLEAR 

THE 

•TEST-AND-SET' 

SWITCH 



CO-1 AS 



TPOST BUFFER TO 
1EDQBD SO LINE 
CAN BE FREED 




( N 

I POST I 



CO- I ,H3 

C0-2.E4.H5 

C0-2.J5.H2 



CLEAR THE LINK 

FIELD OF THE 

ELEMENT 



SET UP THE 

PARAMETER LIST 

FOR SVC 



EB Al 



TPOST ELEMENT 

TO THE DISABLED 

READY QUEUE 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 14 1 




co-a AI- 



WA IT - 

FOR 

AVTOSECB 



/ SET A 16 ^ 
tRETURN CODE IN 
\ REGISTER 15 > 



(E> 



C N 

I RETURN 1 
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Chart CO-2 MCP CLOSEDOWN PROCESSING ROUTINE 



L CBLOOP 

f ENTER 1 



CO-I ,D3,H5 
C0-2,A5,B5,C5 



,,co-e a 



WAIT FOR ALL 

CPBS TO BE 

MARKED STOPPED 



GET THE TCB AND 

DEB CHAIN; 

INITIALIZE THE 

•WAIT* SWITCH 




GET THE FIRST 

LCB. AND THE 

COUNT AND 

LENGTH OF LCBS 



WAIT FOR THE 

OPERATOR 

CONTROL ECB TO 

BE POSTED BY 

QEVENT 



SET THE 
WAIT' SWITCH 
TO A NONZERO 
VALUE 





fifl-l AS 



TPOST CLOSE- 
DOWN COMPLETION 
ELEM TO 1EDQNA 



TURN ON THE 
•REQUEST' BIT 
IN THE ENVIRON- 
MENT CHECKPOINT 
REQUEST ELEMENT 




XSET A ZERO X 
/ RETURN CODE \ 
LIN REGISTER 15;] 
\ RESTORE / 

\ REGISTERS / 



f RETURN TO THE ^ 
I ADDRESS IN J 
\. REG I STER I *J 



TURN ON THE 
•REQUEST' BIT 
IN THE ENVIRON- 
MENT CHECKPOINT 
REQUEST ELEMENT 



t, CO - I ■ AS, 



TPOST REMOVAL 

ELEMENT TO TIME 

DELAY QUEUE 



CO-I AS, 



TPOST ENVIRON 

REQUEST ELEMENT 

TO CKPT QUEUE 



GET THE NEXT 

DEB IN THE 

CHAIN 



© 
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Chart ci-1 ICHNG PROCESSING ROUTINE 




GET THE 

POSITION TO 

MOVE TO AND THE 

NUMBER OF BYTES 

TO MOVE 



M OVE! I ST 



I RETURN J 




GET THE ADDRESS 

OF THE REPLACE 

LIST 



BUILD A 

CHECKPOINT 

ELEMENT AND SET 

UP FOR 
CHECKPOINT 



COMPUTE THE NO 
OF ENTRIES X 
THE LENGTH OF 
AN ENTRY + 9 



OS WAIT - 
WAIT FOR 

THE 
CHECKPOINT 

ECB 



MQYEIB 



GET THE START 

OF THE 

INVITATION LIST 




MOVE 256 
CHARACTERS AND 
SET UP FOR THE 

NEXT MOVE 



DEQUEUE AN 

ELEMENT AND 

RESET THE 

•QUEUING' FLAG 




CKMOVIB 



CI-3 AS 



1 C Ir3 AS 



GET POINTER TO 

THE BEGINNING 

OF THE LIST FOR 

THE RECEIVE 

SCHEDULER 











' ' 






SET UP TO TPOST 

THE LCB TO 

ITSELF 




ER Al 






1 




IGCI02 




y/vkS THE^N. 


START LINE 
ACTIVITY 




C STOPPED J 
^s. BEFORE y^ 

>\. 1 CHNG_/^ 














NO 
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Chart ci-2 ICHNG PROCESSING ROUTINE 




CK'NACTI 





ACTIVATE 




SWAP THIS ENTRY 

WITH THE 
PREVIOUS ENTRY 



PUT THE ENTRY 

ON THE ACTIVE 

SIDE 



POINT TO THE 

NEW END OF 

ACTIVE ENTRIES 



RETURNA ♦ 



INCREMENT THE 

COUNT OF ACTIVE 

ENTRIES 




ACTIVE! 



SWAP THIS ENTRY 

WITH THE 
PREVIOUS ENTRY 



BACK UP PAST 

THE EOT/FE 

BYTES 
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Chart CI -3 ICHNG PROCESSING ROUTINE 




GET THE NUMBER 

OF ACTIVE 

ENTRIES 





SHAPLOOP ♦ 



SWAP THIS ENTRY 

WITH THE NEXT 

ENTRY 




SFTEOT 



S£I£aU 



SWAP THE ENTRY 

TO THE INACTIVE 

SIDE 



GEiD 



Cl-I ,KI 
CI-1 ,K2 



^ET UP FOR A 

< CHECKPOINT 



t SB Al 



SVC I - 
WAIT FOR 
THE LINE 

STARTUP 



f RETURN J 



DECREMENT THE 

COUNT OF ACTIVE 

ENTRIES 
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Chart C2-1 ON-LINE TEST INTERFACE ROUTINE 



ENTER J 



Z2.F2 




r SAVE ^ 

REGISTERS; 

GET THE AVT 

ADDRESS 





GET THE ADDRESS 

OF THE ERROR 

MESSAGE 



/ SET THE \ 

/ RETURN CODE > 
<FOR A REJECTED 
\ COMMAND > 

\|X'08'I / 



(RETURN TO THE \ 
ADDRESS IN 1 
REGISTER 14 / 



PUT THE UNIT 

AND THE BUFFER 

COUNT IN THE 

ERB 



PUT THE 

OPERATOR 

CONTROL QCB 

ADDRESS IN 

LCBRCQCB 



CALCULATE THE 

LENGTH OF DATA 

+ THE LENGTH OF 

THE HEADER . 

PREFIX 



INITIALIZE THE 

COUNT OF UNITS 

TO ZERO 




r SET THE 'ERB'^ 

FLAG EQUAL TO 
V X'02- / 



SUBTRACT THE 
LENGTH OF ONE 
UNIT FROM THE 
TOTAL LENGTH 



PUT THE BUFFER 

REQUEST QCB 

ADDRESS IN THE 

ERB 



SET THE 

PRIORITY AND 

CLEAR THE LINK 

FIELD 



SET THE SCAN 

POINTER AT 

•OLT=' 



SET THE KEY TO 

INDICATE 
TERMINAL INPUT 



PUT THE TOTE 

QCB ADDRESS IN 

THE BUFFER 

PREFIX 



SET THE 

PRIORITY AND 

CLEAR THE LINK 

FIELD 



BUILD THE SVC 

102 PARAMETER 

LIST 



EB Al 



TPOST THE 

BUFFER TO THE 

TOTE QCB 



• SET THE \ 
/ RETURN CODE > 
CfOR NO MESSAGE 
\ (X 1 14* I j 



I RETURN J 
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Chart C2-2 ON-LINE TEST INTERFACE ROUTINE 



BUILD THE SVC 

102 PARAMETER 

LIST 



♦ EB Al 



TPOST THE ERB 

TO THE BUFFER 

REQUEST QCB 



GET THE ELEMENT 

CHAIN OF THE 

OPERATOR 

CONTROL QCB 




get the next 
Element in the 

CHAIN 



OS WAIT - 

ON THE 

OPERATOR 

CONTROL ECB 
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Chart C3 COPY INVITATION LIST STATUS ROUTINE 



ENTER J 



CETLCB 




COMINV 



PREPARE THE 

' INVALID 

COMMAND* 

MESSAGE - 

1ED018! 



CONVERT THE 

RELATIVE LINE 

NUMBER TO 

HEXADECIMAL 








GET THE ADDRESS 

OF THE 
INVITATION LIST 
FROM THE DCB 



© 



US&. 



PREPARE THE 

•STATUS' 

MESSAGE - 

IED059I 




'PUT THE X'OO* 
(RETURN CODE I |v 
REGISTER 15 




PREPARE THE 

•LINE NOT OPEN* 

MESSAGE - 

I EDO I 7 I 



'PUT THE X'04'^ 

(RETURN CODE IN 

REGISTER 15 > 



c 



£1£L 



3 
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Chart C6- 1 DEBUG SERVICE AID ROUTER 



ENTER 1 




SET UP 

•COMWRITE NOT 

ACTIVE' MESSAGE 



LOAD RETREG 

WITH THE 

ADDRESS OF THE 

DELETE ENTRY 

POINT 



55ARCH t 



LOAD RETREG 

WITH THE 

ADDRESS OF THE 

LOAD ENTRY 

POINT 



INACTIVE ♦ 





SET UP ' INVALID 

OPERAND' 

MESSAGE 



ACTIVE 



LOAD REGISTER 

15 WITH THE 

ENTRY POINT 

ADDRESS 



BRANCH TO THE 

ADDRESS IN 

RETREG 




BRANCH TO THE 

ADDRESS IN 

RETREG+4 
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Chart C6-2 DEBUG SERVICE AID ROUTER 



LQAO 



SET UP 'ROUTINE 

ALREADY ACTIVE' 

MESSAGE 



© 




DELETE 



SET REGISTER 

TO A POSITIVE 

VALUE 



nCLFTE+4 




SET UP 'ROUTINE 

NOT ACTIVE' 

MESSAGE 



© 



USER , t 




SET UP 'ROUTINE 

DEACTIVATED' 

MESSAGE 



EXIT 



SET UP THE 

ADDRESS OF THE 

MESSAGE IN 

REGISTER I 



f RETURN TO THE ^ 
(CALLING routine! 



SET UP THE 

•ROUTINE NOT 

DELETED' 

MESSAGE 




SET UP THE 

•MULTIPLE 

REQUEST' 

MESSAGE 




© 



■fiENCC, 



SET UP THE 

•RETURN CODE = 

XXX' MESSAGE 



/return TO THE\ 

•1 CALLING ROUTlNEl 
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Chart EB AQCTL SVC 1 02 ROUTINE 



CCIOS ^ 
ENTER J *— 



/ ESTABLISH 
►^ADDRESSABILITY 




TESTDSP - 
OS TASK 
REMOVAL 
ROUTINE 




LOAD A REGISTER 
WITH THE TJID 
FROM THE PCB 



FOSTER 



LOAD A REGISTER 
WITH THE THE . 
ECB ADDRESS 
PLUS X'01 ' 



OS POST - 
POST THE 

COMPLETE 




IS THIS AN \NO 
RORI ECB TO 
POST 




.TSQPOST 



GET THE SOURCE, 

LENGTH, AND 

TARGET DATA 

FROM THE 

PARAMETER LIST 



RSFQST 



OS POST - 
POST THE 

ECB 
COMPLETE 



POSTPEHfi 



SET THE 

•POST 

(PENDING* FLAGS 

IN THE TCB 

AND DEB 



IKJTSI00 - 
FLAG THE 

TCB 
•ELIGIBLE 
FOR SWAP' 



MOVE THE DATA 

ACROSS THE 

PARTITION 

BOUNDARY 






r PUT A X'OO'X 

SUCCESSFUL " 

(RETURN CODE IN 

REGISTER 15 > 



SVC 79 - 

SET THE TCB 

STATUS 



QPOST 



PUT THE ELEMENT 

ON THE DISABLED 

READY QUEUE 



r FLAG THE MCP ^ 

TCB 'ELIGIBLE 
VFOR DISPATCH*/ 



CEX1T 1 ^ 
RETURN J 



OS POST - 

POST THE 

MCP ECB 

COMPLETE 



■T5QTCB 



IKJTSI00 - 
FLAG THE 
TCB 'NOT 
ELIGIBLE 
FOR SWAP* 




SVC 79 - 

SET THE TCB 

STATUS 
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Chart EC PUT SCHEDULER 




PUT THE SEND 

SCHEDULER STCB 

IN THE LCB STCB 

CHAIN 



PREPARE TO EXIT 
TO THE TCAM 
DISPATCHER 



FILL THE BUFFER 

WITH DATA FROM 

THE USER WORK 

AREA 



ADD THE BUFFER 

TO THE CHAIN 

FOR THE TCAM 

DISPATCHER 





PREPARE TO 

TPOST THE 

EXHAUSTED ERB 



PREPARE TO 

TPOST FULL 

BUFFERS TO MH 



PREPARE TO 

RETURN EMPTY 

BUFFERS TO THE 

BUFFER RETURN 

QCB 





SAVE THE LAST 
FULL BUFFER IN 

THE PROCESS 
ENTRY WORK AREA 



POST THE APPLI- 
CATION PROGRAM 
ECB COMPLETE 



PREPARE TO EXIT 
TO THE TCAM 
DISPATCHER 



( EX ' T ) 
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Chart ES RETRIEVE SERVICE ROUTINE 




GET THE ADDRESS 

OF THE ACCESS 

METHOD WORK 

AREA AND OF THE 

PCB 



.NAMEOK 



INITIALIZE THE 

SPECIAL AQCTL 

ELEMENT 




MOVE THE 

SEQUENCE NUMBER 

AND TYPE INTO 

THE SPECIAL 

ELEMENT 



MOVE THE 

RELATIVE RECORD 

ADDRESS INTO 

THE SPECIAL 

ELEMENT 



• BUILD THE \ 
/AQCTL SVC 102^ 
[PARAMETER LIST 



t SB M 



TPOST ELEMENT 

TO THE RETRIEVE 

SCHEDULER 



MOYE 



GET THE ADDRESS 

OF THE USER 

WORK AREA 



BUILD A QTAM 

PREFIX FROM THE 

TCAM PREFIX 




J2AIA. 



MOVE DATA FROM 
THE BUFFER TO 
THE WORK AREA 



.EMPTY .!, 



PREPARE TO FREE 

THE EMPTY 

BUFFER 



CLEANUP, 



EB A I 



TPOST ELEMENT 

TO THE RETRIEVE 

SCHEDULER 



/PUT THB, X'O 
[RETURN CODE 
\ REGISTER I 



auJ s 

• RESTORE THE^ 
'REGISTERS OF 

THE CALLING 

V ROUTINE 



/ ^ 

*l RETURN 1 
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Chart ET OPERATOR CONTROL/ APPLICATION PROGRAM INTERFACE ROUTINE 



CPQET , ^ 
ENTER J 



r SAVE 
REGISTERS; 
ESTABLISH 
ADDRESSA- 

k BIL1TY 




GET THE ADDRESS 

OF THE CURRENT 

TCB 



GET THE ADDRESS 

OF THE PCB 

CHAIN FROM THE 

AVT 



/ PUT THE ^ 
/ X'0 1 ' ERROR 
[RETURN CODE ir> 
\ REGISTER 15 




/ PUT THE \ 

• X'08- ERROR ^ 
[RETURN CODE IN 
\ REGISTER 15 > 



GET THE ADDRESS 

OF THE CIB WORK 

AREA FROM THE 

PCB 



COMPLETE THE 

CIB IN THE USER 

WORK AREA 



• BUILD THE 
/ AQCTL SVC 
[PARAMETER LIS 



,£B_A1 



TPOST THE CIB 

TO THE OPERATOR 

CONTROL QCB 




OS WAIT FOR 

THE CIB TO 

BE 

PROCESSED 



/ PUT THE \ 
/ OPERATOR > 
[CONTROL RETURN 
\ CODE IN J 

\REG 1 STER I 5/ 



/RESTORE THE\ 
'REGISTERS FOR^ 

THE CALLING 
V ROUTINE > 



►f RETURN J 
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Chart EU OPEN/CLOSE SUBTASK 



CPflSU ^ 
ENTER J 



< 



SAVE 
REGISTERS! 
ESTABLISH 
ADDRESSA- 
BILITY 




GET THE PROCESS 

ENTRY WORK AREA 

ADDRESS FROM 

THE SPECIAL 

ELEMENT 



YES 



GETMAIN 

STORAGE FOR 

AN LC8 




INITIALIZE THE 

LCB AND LINK IT 

TO THE PCB 



GET THE ADDRESS 
OF THE PROCESS 
ENTRY WORK AREA 



' STORE AN 
ERROR INDICATOR 
V IN THE PCB 



FREEMAIN 

STORAGE FOR 

THE PROCESS 

ENTRY WORK 

AREA 



TOR^ 



POINT TO THE 
AQCTL PARAMETER 
LIST IN THE PCB 



DECREMENT THE 

PCB USE COUNT 

BY ONE 




FREEMAIN 

STORAGE FOR 

THE LCB 



GETMAIN 

STORAGE FOR 

THE PROCESS 

ENTRY WORK 

AREA 



INITIALIZE THE 

PROCESS ENTRY 

WORK AREA 



LINK THE WORK 

AREA TO THE 
PROCESS ENTRY 



INITIALIZE THE 

AQCTL PARAMETER 

LIST 



£B. A.l, 



POST THE 
APPLICATION 
PROGRAM ECB 



PREPARE TO GIVE 
CONTROL TO THE 
TCAM DISPACHER 



f \ 

I RETURN 1 



SET UP THE 

STCBS FOR THE 

SCHEDULERS 



INCREMENT THE 

PCB USE COUNT 

BY ONE 
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Chart EW-1 GET SCHEDULER 






ERBFIX 






GET THE ADDRESS 

OF THE PRIORITY 

QC8 
















INCREMENT TO 

THE NEXT 
PRIORITY QCB 


NO. 







5TCBFIX 



MOVE THE STCB 

TO THE 

DESTINATION QGB 



O- 




/turn on the\ (exit 

v retrieve mode') ' v 




INITIALIZE THE 

SCB, LCB, AND 

ERB 




'PREPARE TO X 
„ r TPOST THE ERB\ 
CjO THE DISK .1/03 
QCB Y 



(IT TO DSPPOST 



5 
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Chart EW-2 GET SCHEDULER 




GET THE EMPTY 

BUFFER COUNT 

FROM THE 

SPECIAL ELEMENT 






SAVE THE 

ADDRESS OF THIS 

EOM BUFFER 



SET THE 'BUFFER 

SERVICED' 

PRIORITY IN THE 

BUFFER 



( \ 

I EX IT TO DSPDISPH" 



TPOST THE EMPTY 

BUFFER TO THE 

BUFFER RETURN 

QCB 




MMLOOP 



REMOVE THE FULL 

BUFFER FROM THE 

ERB 



PUT THE BUFFER 

ON THE PRE-MH 

QUEUE 





MUTEST 



ADJUST THE 

AVAILABLE 

BUFFER COUNT 



RETURN ALL 

BUFFERS TO THE 

BUFFER RETURN 

QCB 



ENDS T , 

BUILD THE 

CLOSEDOWN 

ELEMENT FOR THE 

OPEN/CLOSE 

SUBTASK 



/ POINT TO \ 
XTHE CHAIN OF \ 
<BUFFERS AND THE J 
\ SPECIAL / 

V ELEMENT / 



■ ' 

C EX IT TO \ 
DSPCHAIN 1 




TPOST THE 

BUFFER TO THE 

STARTMH QCB 




<TURN ON THe\ 
MH-OK' FLAG > 

f ^"">V 

I EX IT TO DSPDISPl 
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Chart EW-3 GET SCHEDULER 



.RECALL 



GET THE ADDRESS 

OF THE RECALLED 

BUFFER 



EMPTYRTN 




RETURN ANY 

UNWANTED 

BUFFERS TO THE 

BUFFER UNIT 

POOL 



SET UP TO 

RECALL A HEADER 

BUFFER 



CHAIN THE 

BUFFER ON THE 

READ-AHEAD 

QUEUE 



GET THE POINTER 

TO THE NEXT 

BUFFER FROM 

QBACK 



GET THE NEXT 

TEXT QUEUE-BACK 

POINTER 




TPOST THE 

BUFFER TO THE 

BUFFER REQUEST 

QCB 



RESTORE THE SCB 

INFORMATION 

FROM THE 

PROCESS ENTRY 

WORK AREA 



/TURN OFF THE > 
V RETRIEVE MODE' 
V FLAG y 



GET QBACK FROM 

THE CURRENT 
LAST TEXT FIELD 



SET UP TO 

RECALL A HEADER 

BUFFER 



SAVE QBACK FROM 

THE CURRENT 
LAST TEXT FIELD 



BLDERB, t 



• PREPARE TO \ 
XTPOST THE ERB\ 
Cto THE DISK 1 id) 
\ QCB / 



(exit to dsppostJ 

( T " ) 



HM-8.E2 AS-2.J5 

HM1-6.E2 

HM2-T.E2 



MOVE THE STCB 

FROM THE 

DESTINATION QCB 

TO THE 
READ-AHEAD QCB 



t RB-g A, I, 



f RETURN 1 
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Chart EZ GET SCHEDULER FIFO ROUTINE 



igflOE,Z i i ^ 

f ENTER J 



SAVE THE 
ADDRESS OF. THE 

RETRIEVE 
ELEMENT IN THE 
QCB LINK FIELD 



GET THE 

DESTINATION QCB 

ADDRESS FOR THE 

APPLICATION 

PROGRAM 



RAISE THE 

PRIORITY OF THE 

RETRIEVE 

ELEMENT 



PREPARE TO 

TPOST RETRIEVE 

ELEMENT TO DEST 

QCB, THEN TO 

GET SCHEDULER 



( P " ) 



5i»0 



Chart E 1 TCOPY SERVICE ROUTINE 




GET THE ADDRESS 
OF THE AVT AND 
OF THE TERMNAME 

TABLE 



SET UP THE 
PARAMETERS FOR 

THE BINARY 
SEARCH ROUTINE 



,„U) A3, 



ACTIVATE IEDQA1 

TO SEARCH THE 

TERMNAME TABLE 




^"UT AN ERROR 
<RETURN CODE IN 
\ REGISTER 15 



GET THE 

TERMINAL TABLE 

ENTRY ADDRESS 

FROM THE 

TERMNAME ENTRY 



DETERMINE THE 

TYPE OF 

TERMINAL ENTRY 



COMPUTE THE 

SIZE OF THE 

TERMINAL TABLE 

ENTRY 



GET THE ADDRESS 

OF THE USER 

WORK AREA 



MOVE THE 

TERMINAL ENTRY 

INTO THE WORK 

AREA 



/ PUT A 

• SUCCESSFUL 
<RETURN CODE I 
X REGISTER IE 



• RESTORE THE\ 
'REGISTERS FOR^ 

THE CALLING 

V ROUTINE > 



( N 

I RETURN 1 
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Chart E2 QCOPY SERVICE ROUTINE 




GET THE ADDRESS 

OF THE AVT AND 

OF THE TERMNAME 

TABLE 



SET UP THE 
PARAMETERS FOR 

THE BINARY 
SEARCH ROUTINE 



Ul A3 



ACTIVATE IEDQAI 

TO SEARCH THE 

TERMNAME TABLE 



GET THE ADDRESS 
OF THE TERMINAL 
ENTRY FROM THE 
TERMNAME TABLE 
ENTRY 




/ PUT THE \ 
X X'04V ERROR > 
[RETURN CODE IN 
V REGISTER 15 > 




/ PUT THE \ 
/ X'20' ERROR > 
CRETURN CODE IN 
\ REGISTER 15 / 



Restore thex 
/registers for\ 
< the calling > 
x rout i ne / 



YES 


GET THE 

DESTINATION QCB 

ADDRESS FROM 

THE ENTRY 
















> 


INITIALIZE A 

COUNTER TO THE 

SIZE OF THE 

MASTER QCB 




















ADD THE SIZE OF 

THE PRIORITY 

QCB TO THE 

COUNTER 






jT IS 

^ THE 
C ANOl 


IRE ^s. 
rHER J 


YES 



GET THE ADDRESS 

OF THE USER 

WORK AREA 



c — — ^ 

I RETURN I 



MOVE THE QCB 

INTO THE USER 

WORK AREA 



• PUT THE X^O'^ 
[RETURN CODE IN 
X REGISTER 15 > 



542 



Chart E3 TCHNG SERVICE ROUTINE 



r — \ 

v . ENT " J 



AVE \ 

STERSi \ 
ABL I SH > 
RESSA- / 
LITY / 



' SAVE 
REG I : 
ESTABLI 
ADDRESSA- 
V BIL 



GET THE ADDRESS 

OF THE AVT AND 

OF THE TERMNAME 

TABLE 
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Chart E4 ICOPY SERVICE ROUTINE 




/p\s\ 



GET THE AVT 

ADDRESS FROM 

THE CVT 



GET THE MCP TCB 

ADDRESS FROM 

THE AVT 



GET THE MCP 
TIOT ADDRESS 
FROM THE TCB 



GET THE MCP DEB 
CHAIN ADDRESS 
FROM THE TCB 



fPUT THE X^O'^ 
«-<RETURN CODE IN 
X REGISTER 15 i 



/RE 



RESTORE THE\ 
REGISTERS FOR^ 
THE CALLING 
ROUTINE J 






X 



/ ^ 

►( RETURN 1 



GET THE DCB 

ADDRESS FROM 

THE DEB 



GET THE TIOT 
EXTENT OFFSET 
FROM THE DCB 



COMPUTE. THE 

TIOT EXTENT 

ADDRESS 




GET THE MAXIMUM 

RELATIVE LINE 

NUMBER FROM THE 

DEB 



GET THE ADDRESS 

OF THE 

INVITATION 

LISTS FROM THE 

DCB 



CALCULATE THE 

SIZE OF THE 

DESIRED 

INVITATION LIST 




^■UT THE X^IM* 1 
<RETURN CODE IN 
X REGISTER I5y 



MOVE THE LIST 

INTO THE USER 

WORK AREA 



'PUT THE X'OO'^ 
RETURN CODE I N 
V REGISTER 15 J 
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Chart E6 PASSWORD SCRAMBLER ROUTINE 



CPQE6 ^ 
ENTER J 



E3.FI 




GET THE ADDRESS 
OF THE PASSWORD 
TO BE SCRAMBLED 



REARRANGE THE 
CHARACTERS OF 
THE PASSWORD 



PUT THE FIRST 
HALF OF THE 
PASSWORD IN 
REGISTER 



PUT THE LAST 
HALF OF THE 
PASSWORD IN 
REGISTER I 




f RETURN J 
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Chart E7 RETRIEVE SCHEDULER 



Csasj. N 
ENTER 1 



/ ESTABLISH "" 
^ADDRESSABILITY 




^BUE- 



put THE BUFFER 

RETURN QCB 

ADDRESS IN THE 

ELEMENT 



REMOVE THE 

BUFFER FROM THE 

ELEMENT CHAIN 



GETMA I N 

MAIN 

STORAGE FOR 

THE LCB AND 

THE SCB 



-GO. 



INITIALIZE THE 

LCB AND THE SCB 

FOR A RECALL 



SAVE THE BUFFER 

IN THE ELEMENT 

CHAIN 



,RB-g,AI, 



TPOST THE EMPTY 
BUFFER TO BUF- 
FER RETURN QCB 



SET UP THE SCB 

FOR THE NEXT 

RECALL 



iTi RB~S iiAI 



TPOST THE EMPTY 
BUFFER TO BUF- 
FER RETURN QCB 



/ STORE THE 

f ERROR 

(COMPLETION CODEJ 
\ IN THE PCB 






JX£_ 



BUILD THE AQCTL 

SVC 102 
PARAMETER LIST 



HEXIT TO DSPPOSTj 




MOVE THE 
RELATIVE RECORD 

ADDRESS FROM 

THE ELEMENT TO 

THE SCB 



INITIALIZE THE 

QUEUE-BACK 

POINTER 



/ SET THE 
/ 'SUBSEQUENT 
[RETRIEVAL' FLAGj 



A 

r LAG> 




MASTERS , T . 

PREPARE TO 

TPOST THE ERB 

TO THE DISK I/O 

QCB 



c — — >i 

I EX IT TO DSPPOSTJ 



FREEMAIN 

THE LCB AND 

THE SCB 



f \ 

I EXIT TO DSPDISPl 



© 
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Chart FA- 1 CPB INITIALIZATION 




.0- 



GET THE LCB, 
SCB, DESTI- 
NATION QCB, AND 
PRIORITY LEVEL 
QCB 




SRYCPMS.fi ,,! (i r A-Se l ,,A4 



FINDEST2 



I F,A-,I5,A5 



DECREMENT THE 

QCB MESSAGE 

COUNT 



SAVE THE 
SCBQTYPE FIELD 
AND THE SOURCE 
OF THE MESSAGE 



PREPARE TO FREE 

ALL BUT THE 

FIRST UNIT OF 

THE MESSAGE 



FVn,H,A.2 



FA- I 6 A4 




ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



SAVE THE NUMBER 

OF BYTES IN THE 

LAST UNIT 



/ SET THE 'DO ' 
[NOT WRITE FEFO' 
X FLAG > 







GET THE ADDRESS 

AND THE NUMBER 

OF UNITS LEFT 



REQUEST t FA- I 4 A I 




REMOVE AN 

ELEMENT FROM 

THE NO-CPB 

QUEUE 



SET THE CPB AD- 
DRESS, THE DATA 
. F I ELD FOR NO 
PREFIX, AND THE 
RECORD ADDRESS 



\ R 

X 



SET THE CPB' 

FLAG FOR 
REUSABLE OR 
NONREUSABLE 
QUEU I NG > 



C IT TO DSPD1SP 



5 



SAME t FA- 1 7 A2 



EXCPINQI 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 




PUT THIS BUFFER 

ADDRESS IN THE 

SCBDEOB FIELD 



NEXJXJRA, 



.NUTRA. 



GET THE ADDRESS 

OF THE NEXT 

UNIT 



SAVE THE SIZE 
AND FLAGS FOR 
THE LAST UNIT 
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Chart FA-2 CPB INITIALIZATION 



OLSE& 




Fift-1? A 



FIND THE DISK 

COPY OF THE 

MESSAGE 



FA' I?,, A3 




REQUEST ONE CPB 



FAr 1,5 A5 



DECREMENT THE 

QC8 MESSAGE 

COUNT 



/ SET THE \ 
/ 'CANCELED' > 
[FLAG AND CLEAR 
\ THE DATA J 

\ FIELD / 



FA," I 7 A2 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



FA-!7,A2 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



PREPARE TO 

TPOST THE 

BUFFER TO THE 

RECALL QCB 



/reset the\ 
/ 'initiate 
cmode' switch ii 
\ the source 4 

\ LCB / 



7 



FA-U.A.5 



PERFORM A TPOST 



Q51BFB, 



FA- 1 1 , A3 



ISIS TFA-18 A3 

REQCPB I 



REQUEST ONE CPB 



PUT THE 'SER- 
VICED* FLAG AND 
THE OUTPUT SE- 
QUENCE NO IN 
THE DATA FIELD 



♦ FA- I 7 AZ 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 
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Chart FA-3 CPB INITIALIZATION 




^Bfi- 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



SET SCBCPBNO=0. 

SCBNXCPB=I , AND 

SCBCOUBL=0 



^^*s^ 


< X'/^RE_thereJ s, \yes 




FA-20 A 


yr IS THE ^vNO 
C BUFFER SIZE ^ 
^s^COMPUTED s^ 


OFFSET 


BUILD AN ERB 


Jno 




YES 






SZTHFRF ■'■ 










MERGE THE 

DISABLED AND 

ENABLED COUNT 

FIELDS 








FA-22 A 


5 




FINDESTQ 






FIND THE 
DESTINATION QCB 
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Chart FA-4 CPB INITIALIZATION 



RECALL , 



FA-gfl 



BUILD AN ERB 









U^ 



SET THE DISK 

QUEUE TYPE IN 

THE SCB 



flPRNEXT „ , f,A-Sfl 



READCPB 



FIND THE 
CORRESPONDING 
BUFFER PREFIX 



CALUtra,, f„ 



SET THE UNIT 

ADDRESS TO MOVE 

FROM 



fA-M AS 



SET SCBQTYPE 




GET THE ADDRESS 

OF THE FIRST 

MESSAGE ON THE 

QUEUE 




GET THE ADDRESS 

OF THE NEXT 

MESSAGE 



GET THE ADDRESS 

OF THE HEADER 
OF THE MESSAGE 








CALCULATE THE 

NO. OF CPBS = 

NO. OF BUFFERS 

X NO. OF UNITS 

PER BUFFER 




FREE A MESSAGE 



© 
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Chart FA-5 CPB INITIALIZATION 




SET THE \ 

r QUEUE TYPE AS^ 
REUSABLE OR 
NONREUSABLE J 




RESET THE 

NEXT-TEXT 

POINTER 




■TRYNEXT FA-SO ft' 



cflUISTBFR t 



GET THE FIRST 

BUFFER AND THE 

NUMBER OF 

BUFFERS 




ASTUNIT. 



GET THE NUMBER 

OF UNITS IN A 

BUFFER AND THE 

NUMBER REQUIRED 



ADD ONE TO THE 

COUNT AND GET 

THE ADDRESS OF 

THE NEXT BUFFER 






ADD ONE TO THE 

NUMBER OF 

BUFFERS: SET 

THE NUMBER OF 

UNITS = ZERO 
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Chart FA-6 CPB INITIALIZATION 



NEXTCPB 




i-u i n i en ■ 

SEQUENCE 

NUMBER, AND 

IDLE SIZE 



CISBffRA. t, 



STORE THE DATA 

COUNT FROM THE 

UNIT IN INWKA 



RTH5R5, nFliire,! A' 



LAST 



SET THE SIZE OF 

DATA IN THE 

LAST UNIT 



S-5Q fts 



GET THE SIZE 

AND CLEAR THE 

DATA 





SET THE COUNT 

OF DATA TO BE 

MOVED (INWKA) = 

SIZE 



5AMEQN5 ,T M-&\ 



ADDNBUNT 



© 




|FA-7| 

"*\ El. 



,EA-S,0 ft* 



BUILD AN ERB 



BUILD AN ERB 




? 



Fft-SS AS 



FiXSCHOB. 




GET THE 
TERMINAL TABLE 
ADDRESS , 



SAVE THE XTRA 

OR NTXT FIELD 

IN THE SCB 
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Chart FA-7 CPB INITIALIZATION 



1ZTHERE 



INITIALIZE TO 
LINK THE BUFFER 
INTO ERB AND 
MOVE DATA TO 
OLD UNIT + 12 



NSWBUFB t 



SET THE COUNT 

OF DATA MOVED = 

KEY OR PREFIX 

SIZE 



NEJBUEC 



NBLPCK. 



SET X = THE NO. 

OF IDLES PLUS 

PREFIX SIZE 

PLUS THE AMOUNT 

MOVED 




MPYEWKA 



SET UP TO MOVE 
DATA FROM THE 
NEXT BYTE IN 
THE OLD UNIT 



BUILPPRr f 



LINK TO THE 

PREVIOUS BUFFER 

OR UNIT 



X 

FA- 1 0. 




.EiA-I.S.fr* 



APOWKfl 



ADD THE COUNT 

OF DATA LEFT TO 

MOVE AND THE 

PREFIX SIZE 
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Chart FA-8 CPB INITIALIZATION 




• RESET TH 
/ 'BUFFERE 
(TERM* * •MIDDLE} 
\ OF MESSAGE' 

\ FLAGS 



< 



RESET THE 

LCB SEND' 

FLAGS 



t RB-2 A I, 



f^A-gi, ft,' 



FREE A CPB 




SET THE DATA 

FIELD AND THE 

LASTIFEFO FIELD 



FA- 1 8 E2 



BUILD THE CCWS 

AND SET THE 
•QUEUING' FLAG 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



© 



(BRANCH TO THE ^ 
ADDRESS IN H 
REGISTER 14 J 



FA- I , D3 OR 
FA- I I , QZ 
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Chart FA-9 CPB INITIALIZATION 



STORE 




BFNOTFUL ' 




THE \ 
ETED > 



„Fft-|6,Ai 





NXTUNT , FA-SI A3 



ADDNBUNT 



.FA-SS A3 



PUT THE TOTAL 

NUMBER OF UNITS 

IN THE PREFIX 

KEY LENGTH 

FIELD 



BFRFULL 



FA-54, A' 




SET THE FIRST 

BYTE OF DATA AT 

THE ADDRESS OF 

UNIT + 12 




SET X = DESIRED 
BUFFER SIZE - 

CURRENT BUFFER 
SIZE; DATA IN 
NEW UNIT = 




SET THE AMOUNT 

OF DATA TO BE 

MOVED INTO THE 

NEW UNIT EQUAL 
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Chart FA- 1 CPB INITIALIZATION 






SET X = SIZE OF 

IDLES PLUS THE 

PREF IX S I ZE ; 

SET Y = PREFIX 

SIZE 





BA&SSSI t 



GET THE ADDRESS 
OF THE LAST 
BUFFER SENT 



GET THE DISK 
ADDRESS OF THE 
CURRENT BUFFER 



FTA-,1 7, A4 



SET THE DISK 

QUEUE TYPE IN 

THE SCB 



BlPFRFg 



FA- id 

y 



INWKAbDATA left 
IN WORK AREA - 
IDLES + PREFIX 



B.LPPRF3 




COPY PREFIX; 

SET THE AMOUNT 

OF DATA MOVED 

INTO THE NEW 

UNIT = X 



SET PRFSCAN = 
0; UNIT COUNT 
Y; PRFSIZE = Y 



.fiArA&vft* 



GET THE LCB 
ADDRESS AND THE 
NUMBER OF UNITS 



•TO' ADDRESS = 
UNIT ADDRESS + 

Y: 'FROM* 
ADDRESS s UNIT 
ADDRESS + WKACT 



SET UP TO SAVE 

THE IDLES (Y = 

PREFIX SIZE + 

SIZE OF IDLES I 





SET UP TO MOVE 
X CHARACTERS 

(AMOUNT OF DATA 
LEFT IN THE 
WORK AREA) 



MflYUNTA. 



inc. untni 
AMOUNT TO MOVE 

= ADDRESS OF 
OLD 'TO' UNIT-Y 



MOVE THE DATA 



NEW WKACT = OLD 

WKACT + X; NEW 

1NWKA = OLD 

INWKA - X 
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Chart FA-1 1 CPB INITIALIZATION 




SET THE \ 

•LOCK DOOR* ^ 
^SWITCH FOR THE 
LINE END > 
APPENDAGE • 



FftrSa A5 



DELINK A CPB 



<APPE 



r TURN OFF THE \ 
[APPENDAGE • LOCKJ 
\DOOR * SW I TCH / 



BUFFER 



ADDRESS TO MOVE 

DATA TO 'AT' 

UNIT + 12 



ARE THERE 



'PflEMTY ,FA-S3 



DEQMGRC 



DELINK A CPB 





\NO 






FA-23 A 


1 


HAS THIS 
CPB BEEN 
FIXED . 




CK WRITE 




CHECK THE WRITE 
COMMAND 










|YES 











ADD A CPB TO 

THE CHANNEL 

PROGRAM 



X TURN OFF \ 
/FLAG INDICAT-X 
[ING THAT ERB I S J 
^REQUESTING A / 

\ BUFFER / 



SETCFBAP 



CKCPB 



GET THE ADDRESS 
OF THE NEXT CPB 

ON THE 
NO-BUFFER 

QUEUES 







S^NO 




FA-PS A 


THE CPB^ 
FIXED 


CK WRITE 


CHECK THE WRITE 
COMMAND 




Jyes 













v 



[ EXIT TO \ 

■*-H IGG0I9RP 1 
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Chart FA- 12 CPB INITIALIZATION 



FA- I 2 

y 

■fiKERB.L 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 




WRQNQQN5 T, .FA-17 P, 



ENQMGRC 



BP6BR..t,,l:A^1. 



FREECPBA 



FREE A CPB 




SET UP TO TPOST 

THE ERB TO 

IEDQFA 




TXAtH A 



PERFORM A TPOST 





MEXICFfi 



ANYBFRS t FA-S4 



FREECPBA 



FREE A CPB 



FA- 16, A3 



SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

DISPOSITION QCB 



BCFQSL LFj^l* 



POST 



PERFORM A TPOST 
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Chart FA- 13 CPB INITIALIZATION 




/SET A 'TEM-^ 
' PORARY EOM' 

FLAG TO INDl- 
V CATE TRAN5- 
\M I SSI ON ENDy 



'flSTEBB-t 



SET UP TO TPOST 

BUFFERS TO THE 

BUFFER RETURN 

QCB 



SET UP TO TPOST 

THE ERB TO THE 

ACTIVATE QCB 



ENQERB , FA-llnA 



ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



a 



SET THE 

•DUPLICATE' 

FLAG 



V, 



ERBRCflCB 



Eft- ,16 A 3 



SET UP TO TPOST 

THE ERB TO 

LCBRCQCB 



RepgsT j„f;a-,h 



<D 



POST 



PERFORM A TPOST 
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Chart FA- 1 4 CPB INITIALIZATION 



[ BIGSUBR 


? 




FA-I ,C5 
FA-3.EI 

FA- 18 A 


REQCPB 




REQUEST A CPB 






FREEUINIT t 



RESTORE THE 

DESTINATION QCB 

ADDRESS 



♦ p*- '« A i 



( ^ 

I RTNBFR 1 



FA-I9.F3 



© 



, FA 7, 1 4, A* 




BUILD CCWS 



ADD ONE TO THE 
LAST BUFFER 
UNIT COUNT 



CHAIN THE UNIT 

INTO THE TIC 

CHAIN 



f RETURN J 



c 



3 G 



FA-I4,C?> 



SET THE NUMBER 

OF UNITS AND 

THE TIC 



(E> 



i RTNBFR t , 

SET UP TO TPOST 

THE UNITS TO 

THE BUFFER 

RETURN QCB 



.POST t 

KEEP THE 

ADDRESS OF THE 

LAST TPOSTED 

UNIT 



} 



FA-2.K3 
FA-I2.J3 
FA-I2.J4 
FA- 13,04 
FA- I 6, HI 
FA-I6.E3 
FA- I 9, K I 



( N 

( RETURN I 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



t, Fta-e Al, 



TPOST THE UNITS 



( \ 

I RETURN J 
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Chart F A- 1 5 CPB INITIALIZATION 




JKSEEEfl- 



H ty-5 A4 



FIND THE SCB 

FOR THE 

DESTINATION 



SHOULD THE^ 
SCB BE 
UPDATED > 


S^YES 




UPDATE THE FEFO 

POINTER SAVED 
IN THE SCB FOR 
THE DESTINATION 






[no 









NPSUaUF T FA-IB A3 



REQUEST ONE CPB 




COg££££fl_ 



GET THE ADDRESS 

OF THE FIRST 

MESSAGE 



MOCORE. 



SET THE DATA 
FIELD = PREFIX 
+ FEFO POINTER 



Ih-.\] ,AZ 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



© 



SET THE 

QCBLFEFO FIELD 

AND THE 'NO 

FEFO' FLAG 



f ^ 

I RETURN 1 




f FIX IT J [ DECRMGCT J 



FA-7.H4 
FA-IO.GI 



LINK THE UNIT 

TO THE PREVIOUS 

BUFFER 



f "\ 

I RETURN 1 



SET UP TO GET 

THE NEXT 

MESSAGE 



SETCFEFQ t 



FA-1 ,FI 
FA-2.G2 



SUBRACT ONE 

FROM THE 

MESSAGE COUNT 

IN THE QCB 



( *\ 

I RETURN I 
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Chart FA- 16 CPB INITIALIZATION 



( "\ 

I FULLBUF I 



FA-9.B3 
FA-9.J5 



MERGE THE 

ENABLED AND 

DISABLED COUNT 

FIELDS 




/ SET THE \ 

/ 'REQUEST ^ 

(complete* flag 



FA-24 A4 




UNLINK THE 

BUFFER AND 

PREPARE TO 

TPOST IT TO MH 



t FA- It AS 



PERFORM A TPOST 



A RETURN J 




f \ 

I SBTRKEYI 1 



SUBTRKEY,, 



ADD ONE TO THE 

NUMBER OF UNITS 

AND SUBTRACT 

THE KEYLENGTH 

FROM SCB SIZE 
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Chart FA- 17 CPB INITIALIZATION 



f ENQMGRB 1 f EXCPINQI 1 f EXCPINQ2 J f 



FA-1 ,C3 
FA-I3.B3 



CLEAR THE LINK 

FIELD OF THE 

BUFFER 



mr.uM t 



FA-1 ,F5,J2,H3,K5 
FA-3.F2; FA-1 I ,J1 
FA-I5.KI 



FA-8.G5 
FA-20.HI 



SET AND SAVE 

THE POSITIVE 

CHANNEL COMMAND 



EXfiPlflPT t 



f ENQMGRC J 



FA-I2.DI 
FA-23.C3 



GET THE ADDRESS 

OF THE INPUT 

CPB QUEUE 



JNBMfiRC t, 



GET THE ADDRESS 

OF THE LAST CPB 

ON THE QUEUE 



GET THE ADDRESS 

OF THE BUFFER 

LINK FIELD 



IS THISN. 
POSITIVE ^ 
CHANNEL 
COMMAND ^ 


S^NO 




CORRECT THE 

LINK ADDRESS 

FOR THE CPB; 

CLEAR THE LINK 

FIELD 






|YES 









ENQBFR 




NONMTY 



LINK THIS 

ELEMENT TO THE 

PREVIOUS LAST 

ELEMENT 



f RETURN J 



~) C ° TypE ) 



FA-4.G2 
FA-I0.B5 



FA-4.A4 
FA-5.B2 




SET SCBUNTCT = 




XSET SCBQTYPE X 



CTO NONREUSABLE > 
V DISK / 






f RETURN 1 
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Chart FA- 1 8 CPB INITIALIZATION 



C ro ) c 



FA-2.G3 
FA-I4.FI 



BUILD THE WRITE 

KEY AND DATA 

CCWS 



SET CPBADDR = 

CURRENT RECORD 

NUMBER IN THE 

PREF I X 



^ ( > * 

i I REQCPBI J 



FA-2.D3 
FA-14.BI 



FA-2.F2.H5 
FA-I5.F1 




REMOVE A CPB 




WRITE DATA AND 
NOOP IN THE CPB 





IS THIS A \NO 
PARTIAL 
BUFFER 



SAVE THE 
ADDRESS AND THE 
NUMBER OF UNITS 



SETDSF.LQ t 




/ ^ 

►( RETURN I 



iNflUEUE i 

PUT THE ELEMENT 
► FIRST ON THE 
NO-CPB QUEUE 



C EX IT TO \ 
IGG0I9RC I 



f — — *\ 

I RETURN 1 
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Chart FA- 19 CPB INITIALIZATION 



I FREEMSG 1 





FA-2.D5 
FA-4.H5 


NO MAIN STORAGE 

UNITS NOW IN 

USE 






GET THE ADDRESS 

OF THE HEADER 
OF THIS MESSAGE 



^ ( ^ 

I I CKCMIN I 



/^ET A FLAG TO> 
VSTOP RECEIVING 
\ MESSAGES J 





PUT ZEROS IN 

THE QCBPVHD 

FIELD 



TAKEOUT 



LINK THE 

PREVIOUS 

MESSAGE TO THIS 

MESSAGE 



..OSTMSf: f 



PREPARE TO 

TPOST ONE UNIT 

TO THE BUFFER 

RETURN QCB 



FA- 14 A S 



PERFORM A TPOST 



SUBTRACT ONE 

FROM THE COUNT 

OF DUPLICATE 

HEADERS 





GET THIS BUFFER 
ADDRESS, THE 
CURRENT AD- 
DRESS, AND THE 
NUM OF UNITS 



t„ EA-UhAZ 



:, ea- 1 ?, A4 



CHECK MAIN 

STORAGE QUEUES 

USAGE 
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Chart FA-20 CPB INITIALIZATION 




GET THE LCB 
ADDRESS, NO. OF 

THE CURRENT 

CPB, AND COUNT 

OF DATA MOVED 



ADD ONE TO 

SCBCPBNO; CLEAR 

THE WORK AREA 



SET INTO THE 
SCBSCSEG FIELD 

THE NUMBER OF 

THE RECORD JUST 

READ 



, EA- 1 7, A3 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 





I USELCB 1 f SIZECK J 



FA-4.B2 
FA-6, J2 



O 



.NQUEUE 



PUT THE ELEMENT 
FIRST ON THE 
NO-CPB QUEUE 



GET THE 

DESTINATION 

FROM THE BUFFER 

PREF I X 




TERMEMm, 



,MT ft3 



GET THE 

TERMINAL ENTRY 

ADDRESS 




USEBCB 



BUFFER SIZE, 

AND THE NUMBER 

OF UNITS 



sj,£EBflN£ ,,t 



BUILD THE ERB 



USELCB 



FA-6.D3 




SU5SM t 



SET UP TO BUILD 

THE SAME BUFFER 

SIZE 



I RETURN J 



( \ 

I RETURN 1 



f RETURN J 
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Chart FA-21 CPB INITIALIZATION 



( "" ) 



GET THE KEY 

LENGTH & THE 

FIRST BUFFER 

ADDRESS 




BFRUN1T 



SUBTRACT THE 
KEY LENGTH FROM 
THE BUFFER SIZE 




GET THE ADDRESS 

OF THE NEXT 

UNIT 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



/ ^ 

•A RETURN I 



RETURN 




S ETUNTCT t 



SET THE 
REMAINING SIZE 
= COUNT OF DATA 
IN THE NEW UNIT 



gUBTREM 



PUT THE COUNT 

NEEDED TO FILL 

THE UNIT IN 

TOUNT 



f RETURN J 



I ADDNBUNT J f 



FA-6.H2 
FA-9.D2 



ADD THE KEY TO 

THE REMAINING 

SIZE 



D 




SUBTRACT 1 FROM 
THE AVAILABLE 
BUFFER COUNT: 

UNLINK A BUFFER 



f \ 

l RETURN 1 



/ SAVE 
'REGISTERS AND 

THE RETURN 
W ADDRESS 



7 



DECREMENT THE 
NO. OF UNITS IN 
BUFFER IF ENTRY 
WAS AT ADDNBUNT 




PUT THE ERB ON 
THE BUFFER 
RETURN QCB 
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Chart FA-22 CPB INITIALIZATION 



/ ^ 

I SETEOM J 



FA-9.H4 
FA-24.D5 



/ SET -LAST \ 

/segment' and \ 
Clcbeomsg fields! 



( \ 

I RETURN J 



( > i c 

l LINKTIC 1 I 



FA-7.F5 
FA-9.D3 



LINK THE UNIT 

INTO THE TIC OF 

THE BUFFER 



CLEAR AND 

INITIALIZE THE 

. OP CODE 



f RETURN 1 



^ f ^ 

J I FINDESTQ J 



FA-I ,EI 
FA-2.AI 



FA-3.E3 
FA-6.C5 



GET THE 
DESTINATION QCB 
ADDRESS AND THE 
PRIORITY LEVEL 



FJNBESTS f 



GET THE ADDRESS 
OF THE FIRST 
PRIORITY QCB 




PRIORITY QCB 

ADDRESS = SIZE 

OF PRIORITY QCB 

X PRIORITY 

LEVEL 



f N 

I RETURN 1 
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Chart FA-23 CPB INITIALIZATION 



SUBTRACT 16 

FROM THE 

ADDRESS 




SFTNFW t 



MOVE THE CCWS 

TO THE PROPER 

LOCATION IN THE 

CPB 




FA-23 



( \ 

I CPBFREE 1 



PUT THE 

APPQEMTY 

ADDRESS 

(FA-II.G2) IN 

REGISTER 14 



nPBFRFFA » 



PUT THE CPB IN 

THE CPB FREE 

POOL 



( \ 

I RETURN 1 



QRFI/S FA- I 7 qi 
ENQMGRC 



ENQUEUE THE 

BUFFER IN THE 

CHANNEL PROGRAM 



/ ""^ 

►I RETURN J 



I- A- I I' 

v 
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Chart FA-24 CPB INITIALIZATION 



I FREECPBA J 



FA-8.C3 
FA-9.EI 
FA-I2.E3.F4 
FA- I 3, A I 



SUBTRACT I FROM 

THE SCB CPB 

COUNT 




OV-CJINAUI-B • 

SUBTRACT I FROM 
DISK COUNT 




FA.-S4 A4 




PUT THE ADDRESS 

OF THE NEXT 

UNIT INTO THE 

SCBSCSEG FIELD 



( \ 

( LASTTEST J 



FA-I6.DI 
FA-24, C2 









>XlS THE^S. 

yr COUNT OF \ 
C DATA TO BE J 
>N. MOVED = 0/ 


NO 


SET THE SCB 

UNIT COUNT = 

CPB WORK COUNT 






YES 


















SET THE SCB 
UNIT COUNT = 




RETURN J 


















Fft-S£ fti 



SET 'END OF 
MESSAGE' 
INDICATORS 



PUT THE ADDRESS 

OF THE NEXT 
BUFFER INTO THE 
SCBSCSEG FIELD 




,'NITERR 



SET THE READ 
ERROR RETURN TO 
TAGI (FA-I2.K4I 




V 




SETCPBNfl.t 



CFBFREEA 



PUT THE CPB IN 

THE CPB FREE 

POOL 



( \ 

I RETURN I 



( ^^1 

I RETURN J 
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Chart FA 1 - 1 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 





GET THE LCB, 
SCB, DESTI- 
NATION QCB, AND 
PRIORITY LEVEL 
QCB 



.FAI-I 



FAI-lfi ,ai 



ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



S RVCDMSG t FA I - I 3 A4 



FINDEST2 



♦ FA I -8 AS 



DECREMENT THE 

QCB MESSAGE 

COUNT 



SAVE THE 
SCBQTYPE FIELD 
AND THE SOURCE 
OF THE MESSAGE 



PREPARE TO FREE 

ALL BUT THE 

FIRST UNIT OF 

THE MESSAGE 



FAI-15 




FREE IT, f FA- 10 



FREEMSG 



FREE A MESSAGE 



/ RESET THE^ 
/ 'INITIATE 
►< MODE' FLAG IN 
VTHE DESTINA- 
V TION LCB j 




REMOVE AN 

ELEMENT FROM 

THE NO-CPB 

QUEUE 



GET THE ADDRESS 

OF THE SOURCE 

LCB 



fEXIT TO DSPDISPj 



f773 

v 




RESET THE \ 
'INITIATE > 
MODE* FLAG IN 
THE SOURCE J 
LCB / 



'QSTBFR T FAI-15, .A3 

RTNPART 



-© 



GET THE LCB. 
THE SCB, AND 

THE MAIN 

STORAGE QUEUE 

ADDRESS 
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Chart FA 1 -2 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



_EEB. 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



SET SCBCPBNO=0. 

SCBNXCPB= I , AND 

SCBCOU.BL = 




rr a 1-m .A3 



BUILD AN ERB 



SZTHERE 



MERGE THE 

DISABLED AND 

ENABLED COUNT 

FIELDS 



t FAI- 




BASESET, 



GET THE ADDRESS 
OF THE LAST 
BUFFER SENT 




SET SCBQTYPE 



RECALL 




FA I -I I A4 



BUILD AN ERB 





FIND THE 
CORRESPONDING 
BUFFER PREFIX 



CAU.FQ 



SET THE UNIT 

ADDRESS TO MOVE 

FROM 




FAI -.11 A3 



BUILD AN ERB 



HAYESISE ,t 



CALCULATE THE 

NO. OF CPBS = 

NO. OF BUFFERS 

X NO. OF UNITS 

PER BUFFER 
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Chart FA 1-3 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



NEXTCPB 



FA I -3 

y 

i_i 




SAVE THE SCAN 

POINTER. 

SEQUENCE 

NUMBER, AND 

IDLE SIZE 




CKBFRA 



STORE THE DATA 

COUNT FROM THE 

UNIT IN INWKA 



RTHERE EAi 



LAST 



SET THE SIZE OF 

DATA IN THE 

LAST UNIT 




SET THE *NO 

PREFIX' FLAG: 

INITIALIZE THE 

ADDRESS TO MOVE 

DATA FROM 



F IXPRFX 



♦ FAI-II AS 



GET THE SIZE 

AND CLEAR THE 

DATA 





SET THE COUNT 

OF DATA TO BE 

MOVED (INWKA) = 

SIZE 



SAMEQNE t, FA I -IS 



ADDNBUNT 



© 





NO 




FAI-II 


S\ S THERE A^S. 

C PREFIX } 


USELCB 


BUILD AN ERB 


A3 




YES 
FAI-I 1 






OFFSET 




^n^ 















FA 1-4 



v 




FIXSEHDR ♦ 




SAVE THE XTRA 

OR NTXT FIELD 

IN THE SCB 







.FA 1-1.3 


„NO 


FINDESTQ 


FIND THE 
DESTINATION QCB 










,t .ist,, ft,a 



GET THE 

TERMINAL TABLE 

ADDRESS 



NOINTC 
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Chart FA 1 -4 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 
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Chart FA1-5 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



y 

BLPPRFI I 



SET X =: SIZE OF 
IDLES PLUS THE 

PREFIX SIZE: 

SET Y = PREFIX 

SIZE 




SAVE THE 

PRFDEST AND 

PRFQBACK FIELDS 



BLPFRFS, 



y 



WKACT=X=DATA 
ALREADY MOVED i 
INWKA=DATA LEFT 
IN WORK AREA - 
IDLES + PREFIX 



P' npRF3 



FAI-5 

y 



COPY PREFIX; 

SET THE AMOUNT 

OF DATA MOVED 

INTO THE NEW 

UNIT = X 



SET PRFSCAN = 
Oj UNIT COUNT = 
Y; PRFSIZE = Y 



F*' -a 



GET THE LCB 
ADDRESS AND THE 
NUMBER OF UNITS 



•TO* ADDRESS = 
UNIT ADDRESS + 

Y: 'FROM' 
ADDRESS = UNIT 
ADDRESS + WKACT 



SET UP TO SAVE 

THE IDLES (Y = 

PREFIX SIZE + 

SIZE OF IDLES) 




SET UP TO EXIT 
TO PROCESS 
(FAI-I ,D3) 



RESET THE 
•SEND FIRST 
FEFO' FLAG 



/RESET 'BUFFX 
•TERM' , 'MIDDLE\ 
C.OF MSG ' , 4 ' LCB> 
\ SEND' FLAGS/ 




f BR 14 1 



./countN. 

y^ LEFT FOR ^V 

■C DATA > COUNT J 

^V LEFT TO jS 

^.MOVE S^ 


YES 


SET UP TO MOVE 
X CHARACTERS 

(AMOUNT OF DATA 
LEFT IN THE 
WORK AREA) 






MOVE THE DATA 




NEW WKACT = OLD 

WKACT + X; NEW 

INWKA = OLD 

INWKA - X 










MOVUNTA 


NO 
















SET UP TO MOVE 

THE DATA; 
AMOUNT TO MOVE 

= ADDRESS OF 
OLD 'TO' UNIT-Y 








FAI-6 

v 
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Chart FA 1 -6 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



FA I -6 

y 

store t 




BFNOTFUL 




BfTREUU. 



YES 
FA1-14 Al 





NXTtINT FA 1-12 


A3 


FA 1 - 1 3 


A3 










NO 


ADDNBUNT 




LINKTIC 




TOUNT=KEYLE; 

FIRST BYTE OF 

DATA IS AT 

ADDRESS OF UNIT 

+ 13 




SET X = DESIRED 
BUFFER SIZE - 

CURRENT SIZE IN 
BFR; DATA IN 
NEW UNIT = 


GET AN 
ADDITIONAL UNIT 


LINK A UNIT TO 
THE BUFFER 



























FREE A CPB 




t FA]~? lV 



£T7 
\7 




SET THE AMOUNT 

OF DATA TO BE 

MOVED INTO THE 

NEW UNIT EQUAL 

TO X 



r ft i - d 

v 
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Chart FA 1 -7 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 




ENQFRB FAI-I.fi A! 



ENQMGRB 



ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



SET THE 

'DUPLICATE' 

FLAG 



ERBRCOCB 



SET UP TO TPOST 

THE ERB TO 

LCBRCQCB 



RCPOST t FA1-8 A2 







POST 



PERFORM A TPOST 




• SET A 'TEM-X 
' PORARY EOM' ^ 

FLAG TO INDI- 

V CATE TRANS- > 
\MISSION end/ 



'QSIERB, t 



SET UP TO TPOST 

BUFFERS TO THE 

BUFFER RETURN 

QCB 



,ifA|r,?, A3 



FA1-I 



SET UP TO TPOST 

THE ERB TO THE 

ACTIVATE QCB 
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Chart FA 1-8 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



f ENTER J f POST J 



BUFFER ,t 



GET THE SCB AND 

LCB ADDRESS; 

SET THE ADDRESS 

TO MOVE DATA TO 

AT UNIT+12 




SETfiPBAP t„ 



FAI-7.D4 FAI-I4.H5 
FA1-9.HI ,E3 
FAI-IO.KI 



KEEP THE 

ADDRESS OF THE 

LAST TPOSTED 

UNIT 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



RB-2 A I, 



f \ 

I RETURN 1 



C r, " ,T ) 


FAI-5.GI 


LINK THE UNIT 

TO THE PREVIOUS 

BUFFER 


' 


CLEAR AND SET 
THE TIC 


< 


SET THE LCB AND 
THE SCB FIELDS 




[ RETURN J 



( N 

I DECRMGCT 1 



SUBTRACT I FROM 

THE MESSAGE 

COUNT IN THE 

QCB 



f N 

I RETURN 1 



h Al -3 



578 



Chart FA 1 -9 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 




t FA.I-I4.A4 



,/lS THIS\. 
/AN INITIAL >s. 
C REQUEST PCI Z 


YES 




[no 






/is thisN. 

y^ RECALL OR \. 

C APPLICATION J 

\. PROGRAM y^ 

^S. ERB ~/r 


YES 


. 






[NO 






UNLINK THE 

BUFFER AND 

PREPARE TO 

TPOST IT TO MH 








FA 1-8 A 


2 




POST 




PERFORM A TPOST 











/ ^ 

\ RETURN I 



UNLINK THE 

BUFFERS FROM 

THE ERB 



irAi-a-Az 



PERFORM A TPOST 



A RETURN J 
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Chart FA 1 - 1 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



f FREEMSG J f HAVEADDR 1 



FA1-I ,KI 



NO MAIN STORAGE 

UNITS NOW IN 

USE 



GET THE ADDRESS 

OF THE HEADER 
OF THIS MESSAGE 



PUT ZEROS IN 

THE QCBPVHD 

FIELD 




IAKEQUI t 



LINK THE 

PREVIOUS 

MESSAGE TO THIS 

MESSAGE 



/ RESET THE > 
< QCBPVHD FIELD 



PREPARE TO 

TPOST ONE UNIT 

TO THE BUFFER 

RETURN QCB 



♦ "1-8 A? 



PERFORM A TPOST 



SUBTRACT ONE 

FROM THE COUNT 

OF DUPLICATE 

HEADERS 



( \ 

I CKCMIN I 






SETBFft , f 



CURRENT AD- 
DRESS, AND THE 
NO. OF UNITS 




t FA ]„- I "§ ,D5 



,' FA 1,-1 g ,A4 



CHECK MAIN 

STORAGE QUEUES 

USAGE 




/RESTORE THE^ 
^RETURN ADDRESS 
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Chart FA 1 - 1 1 CPB INTIALIZATION - MAIN STORAGE ONLY QUEUING 




nuuntjo . i nt 

BUFFER SIZE, 

AND THE NUMBER 

OF UNITS 



SJZEPQNS t 



BUILD THE ERB 



( \ 

I RETURN 1 
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Chart FA 1 - 1 2 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



C last ) 



GET THE KEY 

LENGTH & THE 

FIRST BUFFER 

ADDRESS 




BFRUN1J, t 



SUBTRACT THE 
KEY LENGTH FROM 
THE BUFFER SIZE 




GET THE ADDRESS 

OF THE NEXT 

UNIT 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



"f RETURN J 



RETURN,, 




SETUNICT t 



SET THE 
REMAINING SIZE 
= COUNT OF DATA 
IN THE NEW UNIT 



( ^ c 

I ADDNBUNT I I 



FAI-3.H2 
FAI-6.D2 



ADD THE KEY TO 

THE REMAINING 

SIZE 



Z> 



FAI-4.DI 




SUBTRACT I FROM 
THE AVAILABLE 
BUFFER COUNT: 

UNLINK A BUFFER 



I RETURN J 



f SAVE 
REGISTERS AND^ 
THE RETURN 
ADDRESS / 






DECREMENT THE 
NO. OF UNITS IN 
BUFFER IF ENTRY 
WAS AT ADDNBUNT 




PUT THE ERB ON 
THE BUFFER 
RETURN QCB 



v 



iUBTREM T 

PUT THE COUNT 

NEEDED TO FILL 

THE UNIT IN 

TOUNT 



( \ 

I RETURN J 
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Chart FA 1 - 1 3 CPB INITIALIZATION - MAIN STORAGE ONLY QUEUING 



( SETEOM j 



• SET 'LAST X 

/SEGMENT' AND \ 
C-C8E0MSG FIELDS} 



( N 

I RETURN 1 



( uwktic ) c 



FAI-4.K5 
FA1-6.D3 



LINK THE UNIT 

INTO THE TIC OF 

THE BUFFER 



CLEAR AND 

INITIALIZE THE 

OP CODE 



f RETURN J 



^ ( ^ 

1 I F1NDESTQ 1 



FAI-2.E1 
FAI-3.C5 



GET THE 
DESTINATION QCB 
ADDRESS AND THE 
PRIORITY LEVEL 



F1NDEST2 t 



GET THE ADDRESS 
OF THE FIRST 
PRIORITY QCB 




PRIORITY QCB 

ADDRESS = SIZE 

OF PRIORITY QCB 

X PRIORITY 

LEVEL 



I RETURN J 
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c 



3 



FAI-6.EI 



SUBTRACT I FROM 

THE SCB CPB 

COUNT 




SET THE SCB 

UNIT COUNT = 

CPB WORK COUNT 





•^YES 




FA1-14 


' ARE THE ^ 
FIELDS TO BE 
<>/ UPDATED "^ 


LASTTEST 


SET THE SCB 
UNIT COUNT 




(NO 







fa i - 1 a 
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r *\ 

I ENQMGRB 1 



FA1-I ,C3 
FA1-7.B3 



CLEAR THE LINK 

FIELD OF THE 

BUFFER 



SET AND SAVE 

THE POSITIVE 

CHANNEL COMMAND 



5.NBMGRC t 




IS THE 
PREVIOUS \NO 
ELEMENT 
TPOSTED 



WAS THE \NO 
ELEMENT A 
BUFFER 



GET THE ADDRESS 

OF THE LAST CPB 

ON THE QUEUE 



ADD ONE TO THE 
LAST BUFFER 
UNIT COUNT 



GET THE ADDRESS 

OF THE BUFFER 

LINK FIELD 



CHAIN THE UNIT 

INTO THE TIC 

CHAIN 



S^\% THISV. 

yrh POSITIVE \. 

C CHANNEL J 

>w COMMAND yr 


NO 


CORRECT THE 

LINK ADDRESS 

FOR THE CPB? 

CLEAR THE LINK 

FIELD 






YES 






?NQB,F R . 










SET THE NEW 
LAST ELEMENT 











I RETURN 1 




EMflNMTY.t 



LINK THIS 

ELEMENT TO THE 

PREVIOUS LAST 

ELEMENT 



f RETURN J 



SET THE NUMBER 

OF UNITS AND 

THE TIC 



RTNBFR 



f RTNBFR J 



SET UP TO TPOST 

THE UNITS TO 

THE BUFFER 

RETURN QCB 



_££SJ_ 



KEEP THE 

ADDRESS OF THE 

LAST TPOSTED 

UNIT 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



I RB-S A 



TPOST THE UNITS 



f RETURN J 



FA1-I ,HI 
FAI-I0.F3 
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Chart FA2- 1 CPB INITIALIZATION - DISK ONLY QUEUING 




GET THE LCB, 
SCB, DESTI- 
NATION QCB. AND 
PRIORITY LEVEL 
QCB 




SRYCBMSfi,, 



„fiAS-Sfl,.A4 



FAS- 14, as 



DECREMENT THE 

QCB MESSAGE 

COUNT 



SAVE THE 
SCBQTYPE FIELD 
AND THE SOURCE 
OF THE MESSAGE 



PREPARE TO FREE 

ALL BUT THE 

FIRST UNIT OF 

THE BUFFER 



t Fft£-|3,A2 



FA2-2 



FA2-I5 A4 




ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



SAVE THE NUMBER 

OF BYTES IN THE 

LAST UNIT 




/ RESET THE 
V MESSAGE LOCK 1 
X SWITCH 



REMOVE AN 

ELEMENT FROM 

THE NO-CPB 

QUEUE 




/ S l 

►I EX IT TO DSPDISPj 



IS THE LAST^ 
EOB IN THIS 
BUFFER S 


v YES 


PUT THIS BUFFER 

ADDRESS IN THE 

SCBDEOB FIELD 




[NO 
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Chart FA2-2 CPB INITIALIZATION - DISK ONLY QUEUING 




GET THE ADDRESS 

AND THE NUMBER 

OF UNITS LEFT 



REQUEST 



FA2-I3 A I 



SET THE CPB 
ADDR, THE DATA 

FIELD FOR NO 
PREFIX, AND THE 

RECORD ADDR 



r SET THE CPB 

FLAG FOR 

REUSABLE OR 

NONREUSABLE 

V QUEUING 



> 




NEXTXTRA t 



NEXTRA f 



SK5ERYP FAS-SQ 



FINDEST2 



FA2-2 



GET THE ADDRESS 

OF THE NEXT 

UNIT 



SAVE THE SIZE 
AND FLAGS FOR 
THE LAST UNIT 




RQMPISK FAS- 1 7. 



REQCPB I 



REQUEST ONE CPB 



PUT THE 
•SERVICED' FLAG 
AND THE OUTPUT 
SEQUENCE NO. IN 
THE DATA FIELD 



FAS- I 7 



REQUEST ONE CPB 



' FA?- I 4 Afi 



DECREMENT THE 

QCB MESSAGE 

COUNT 



/ SET THE \ 

<• CANCELED' FLAG> 



t FAS- 16 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



/ SET THE \ 

<• SPECIAL' FLAG > 






COPY THE BUFFER 

INTO THE CPB 

UNIT 



'AS- 1 7 ,AI 



BUILD CCWS 



t FA2-16 A2 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



PREPARE TO 

TPOST THE 

BUFFER TO THE 

RECALL QCB 



FAS- 1 3, 



PERFORM A TPOST 



v 



FAS- 1 6 .as 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



OSTBFR t FAS- 1 3 .A3 



RTNPART 
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Chart FA2-3 CPB INITIALIZATION - DISK ONLY QUEUING 







GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 



CKBFRFLfe .M^Aa- 1,4,,-At 



SETFEFO 




TURN OFF \ 
IN SOURCE \ 
.CHAIN' BIT: SET) 
'NO-FEFO* / 
FLAG / 




gZTHERE t 




BUILD AN ERB 



MERGE THE 

DISABLED AND 

ENABLED COUNT 

FIELDS 



WRITE t FA.5-I3.A' 



BIGSUBR 



/ \ 

/ SET THE X 

V CANCELED' FLAG> 




FABr I S , 



FA2- I a 



FA2-I 
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Chart FA2-4 CPB INITIALIZATION - DISK ONLY QUEUING 




FA2-4 



SET THE \ 

r QUEUE TYPE AS^ 
REUSABLE OR 
NONREUSABLE A 




cflUNTBFR 



GET THE FIRST 

BUFFER AND THE 

NUMBER OF 

BUFFERS 



HPBNEXU FAS- 1 6 



QTYPE 



SET SCBQTYPE 



HnRNFXT FA2-I8 A I 



READCPB 



fUNTXT 



ADO ONE TO THE 

COUNT AND GET 

THE ADDRESS OF 

THE NEXT BUFFER 



SET SCBNTXT = 

THE CURRENT 

RECORD 




FAS- 1 5 



IRYNEXT , FAS- 18 




L/VSTUMT, 



GET THE NUMBER 

OF UNITS IN A 

BUFFER AND THE 

NUMBER REQUIRED 




READCPB 





ADD ONE TO THE 

NUMBER OF 

BUFFERS: SET 

THE NUMBER OF 

UNITS = ZERO 




RESET THE 

NEXT-TEXT 

POINTER 
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Chart FA2-5 CPB INITIALIZATION - DISK ONLY QUEUING 




^URN OFF THE \ 
{APPENDAGE 'LOCK} 
\DOOR' SWITCH/ 



BUFFER 



ADDRESS TO MOVE 

DATA TO 'AT* 

UNIT + 12 




'COEMTY, , „ FAS-SI 



DEQMGRC 



UNLINK A CPB 



FAS-S I 



t FAS-16.A2 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



/ TURN OFF X 
•flag INDICAT-X 
[|NG THAT ERB I S3 
XREQUESTING A / 

X BUFFER / 



CKCPB 



GET THE ADDRESS 
OF THE NEXT CPB 

ON THE 
NO-BUFFER QUEUE 




FflUNP, t 



REMOVE THE CPB 



Restore the\ 
/registers and^ 
^return address 



f RETURN J 






"S.N0 




FA2-2I 


THE CPB^ 
FIXED 


CK WRITE 


CHECK THE WRITE 
COMMAND 




JYES 















,r «e-o 

v 
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Chart FA2-6 CPB INITIALIZATION - DISK ONLY QUEUING 




WRQNGQNS 




RPERR 



Fftg-gg 



FREE A CPB • 



SET UP TO TPOST 

THE ERB TO 

IEDQFA2 




FAS- 13 



PERFORM A TPOST 





ftNYBFR5 



rftg-ea 



FREE A CPB 



„FA8,-I5 



SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

DISPOSITION QCB 



R.CPQ5T 



fas- 13/5 



PERFORM A TPOST 



FA2-5 



NEXTCPB 
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Chart FA2-7 CPB INITIALIZATION - DISK ONLY QUEUING 




ENBERB , FAS- 1 6 .a i 

ENQMGRB 



ENQUEUE A 

BUFFER IN THE 

CHANNEL PROGRAM 



-< 



FA2-5 



ERBRCQCB 



SET THE 
DUPLICATE' 
FLAG 



frte-i5,A3 



v 



SET UP TO TPOST 

THE ERB TO 

LCBRCQCB 



RCfgST f FA5-I3 



POST 



PERFORM A TPOST 



•SET A *TEM-^ 
' PORARY EOM' 

FLAG TO INDI- 
V CATE TRANS- 
XMISSION END> 



Pfl5I£RB I, 



SET UP TO TPOST 

THE ERB TO THE 

ACTIVATE QCB 
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Chart FA2-8 CPB INITIALIZATION - DISK ONLY QUEUING 



y 

iXTCPBI T „ 




SAVE THE SCAN 

POINTER, 

SEQUENCE 

NUMBER, AND 

IDLE SIZE 



CKBFRA , t 



STORE THE DATA 

COUNT FROM THE 

UNIT IN INWKA 



RTHFRF. FA2-I9AI 
LAST 



SET THE SIZE OF 

DATA IN THE 

LAST UNIT 



GET THE SIZE 

AND CLEAR THE 

DATA 





SET THE COUNT 

OF DATA TO BE 

MOVED (INWKA) = 

SIZE 



V 

SAMEONE T Fftg-I? A3 



© 



*V 





NO 




FA2-I8 


yr\ S THERE A >s. 
C PREF 1 X J 


USELCB 


BUILD AN ERB 


A3 




YES 
FAP-lft 






OFFSET 




BUILD AN ERB 














FA2-9 



v 



t„NT A3,, 



GET THE 

TERMINAL ENTRY 

ADDRESS 



SAVE THE XTRA 

OR NTXT FIELD 

IN THE SCB 




NO I NIC 
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Chart FA2-9 CPB INITIALIZATION - DISK ONLY QUEUING 



SSTMQYS 



SET X = THE NO. 

OF IDLES PLUS 

PREFIX SIZE 

PLUS THE AMOUNT 

MOVED 




SUBTRACT X FROM 
DATA COUNT IN 
OLD UNIT) RE- 
SULT IS AMOUNT 
OF DATA TO MOVE 




•© 



,t p:Ag-i? .A3 



FA2-I2 

v 
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Chart FA2-10 CPB INITIALIZATION - DISK ONLY QUEUING 



FREE A CPB 




FftSrSe,/' 




BUILD THE GCWS 

AND SET THE 
•QUEUING' FLAG 



FAS' I 6, A3 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 
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Chart F A2- 1 1 CPB INITIALIZATION - DISK ONLY QUEUING 



FA2-I I 

y 

STQRE ,1 , „ , 




BFNOTFUL 




,F.ft8r.l,5^' 





NXTUNT FAS- 1? .A3 



ADDNBUNT 



FA2-2Q A3 



PUT THE TOTAL 

NUMBER OF UNITS 

IN THE PREFIX 

KEY LENGTH 

FIELD 



BFRFULL 



FASrgS 



FREE A CPB 




SET THE FIRST 

BYTE OF DATA AT 

THE ADDRESS OF 

UNIT + 12 



SET X = DESIRED 
BUFFER SIZE - 

CURRENT BUFFER 
SIZE; DATA IN 
NEW UNIT = 




SET THE AMOUNT 

OF DATA TO BE 

MOVED INTO THE 

NEW UNIT EQUAL 

TO X 



v 
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Chart F A2- 1 2 CPB INITIALIZATION - DISK ONLY QUEUING 



BLPPRF 1 



SET X = SIZE OF 

IDLES PLUS THE 

PREFIX SIZE: 

SET Y = PREFIX 

SIZE 




SAVE THE 

PRFDEST AND 

PRFQBACK FIELDS 



SET UP TO SAVE 

THE IDLES (Y = 

PREFIX SIZE + 

SIZE OF IDLES) 



BLPPRF2 



WKACT=X=DATA 
ALREADY MOVED; 
INWKA=DATA LEFT 
IN WORK AREA - 
IDLES + PREFIX 



BUPPRF3 



FA2-I3 

y 



COPY PREFIX; 

SET THE AMOUNT 

OF DATA MOVED 

INTO THE NEW 

UNIT = X 



SET PRFSCAN = 
0; UNIT COUNT = 
Y; PRFSIZE = Y 



FA2-I4 



GET THE LCB 
ADDRESS AND THE 
NUMBER OF UNITS 



•TO' ADDRESS = 
UNIT ADDRESS + 

Y; 'FROM' 
ADDRESS = UNIT 
ADDRESS + WKACT 



-/count >s_ 
yr LEFT FOR ^V 
C DATA > COUNT J 
^«L LEFT TO yT 

\MOVE y/^ 


YES 


SET UP TO MOVE 
X CHARACTERS 

(AMOUNT OF DATA 
LEFT IN THE 
WORK AREA) 






MOVE THE DATA 




NEW WKACT = OLD 

WKACT + X; NEW 

INWKA = OLD 

INWKA - X 










MOVANT A, 


NO 












x 

FA2-I 1 


SET UP TO MOVE 

THE DATA; 
AMOUNT TO MOVE 

= ADDRESS OF 
OLD 'TO' UNIT-Y 








v 
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Chart F A2- 1 3 CPB INITIALIZATION - DISK ONLY QUEUING 




, ,t, F.AS-1.3 ,A3 



FREEUNil.t, 



RESTORE THE 

DESTINATION QCB 

ADDRESS 



., FAg„- 1 7 ,.A i 



f RTNBFR J 



FA2-I ,JI 



© 



FAS- 1,3 ,A4 




BUILD CCWS 



ADD ONE TO THE 
LAST BUFFER 
UNIT COUNT 



CHAIN THE UNIT 

INTO THE TIC 

CHAIN 



( N 

I RETURN J 



c 



3 C 



SET THE NUMBER 

OF UNITS AND 

THE TIC 



<S> 



, RTNBFR T , 

SET UP TO TPOST 

THE UNITS TO 

THE BUFFER 

RETURN QCB 



KEEP THE 

ADDRESS OF THE 

LAST TPOSTED 

UNIT 



D 



FA2-2.K4 
FA2-6.J3 
FA2-6.J4 
FA2-7.D4 
FA2-I5.HI 
FA2-I5.E3 



f — — ^y 

I RETURN 1 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



,t RB-a.AI, 



TPOST THE UNITS 



f RETURN J 
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Chart F A2- 1 4 CPB INITIALIZATION -DISK ONLY QUEUING 




•4 RETURN J 



SET QCBFFEFO 



ttRFSFO 



HM2-5 M 



FIND THE SCB 

FOR THE 

DESTINATION 



UPDATE THE FEFO 

POINTER SAVED 

IN THE SCB FOR 

THE DESTINATION 



SETLFEFO 




SET QCBLFEFO 
AND THE "NO 
FEFO* FLAG 



f \ 

I RETURN 1 



c ^ f ^ 

I F I X I T J I DECRMGCT J 



FA2-9.H4 
FA2-12.GI 



LINK THE UNIT 

TO THE PREVIOUS 

BUFFER 



f RETURN 1 



FA2-I ,FI 
FA2-2.F3 



SUBRACT ONE 

FROM THE 

MESSAGE COUNT 

IN THE QCB 



( \ 

I RETURN 1 
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FA2- I I ,B3 
FA2-I I ,K3 



MERGE THE 

ENABLED AND 

DISABLED COUNT 

FIELDS 




UNLINK THE 

BUFFER AND 

PREPARE TO 

TPOST IT TO M 



Ffts-ia .as 



PERFORM A TPOST 



3 AS 



c 



>4 RETURN 1 



J f SBTRKEYI J 



FA2-4.C4 



SUBTRKEY,. t 



ADD ONE TO THE 

NUMBER OF UNITS 

AND SUBTRACT 

THE KEYLENGTH 

FROM SCB SIZE 
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Chart F A2- 1 6 CPB INITIALIZATION - DISK ONLY QUEUING 



( ENQMGRB J f EXCPINQI 1 f EXCP1NQ2 1 



FA2-1 ,C3 
FA2-7.B3 



CLEAR THE LINK 

FIELD OF THE 

BUFFER 



ENQEL6M 



FA2-2.FI ,J3,H4,C5 
FA2-3.F2 FA2-5.JI 
FA2-I4.J1 



SET AND SAVE 

THE POSITIVE 

CHANNEL COMMAND 



EXCPINPT t 



( VJ 

I ENQMGRC 1 ■ 



FA2-6.D1 
FA2-21 ,C3 



GET THE ADDRESS 

OF THE INPUT 

CPB QUEUE 



SNOMfiRC t 



GET THE ADDRESS 

OF THE LAST CPB 

ON THE QUEUE 



GET THE ADDRESS 

OF THE BUFFER 

LINK FIELD 




FA2-I0.G4 
FA2-I8.HI 



^IS THIS A CPB^ 


NO 




CORRECT THE 

LINK ADDRESS 

FOR THE CPB; 

CLEAR THE LINK 

FIELD 








YES 








ENflBE^ 










SET THE NEW 
LAST ELEMENT 











ENgNMTY, t 



LINK THIS 

ELEMENT TO THE 

PREVIOUS LAST 

ELEMENT 



f \ 

I RETURN 1 



( """ ) 



•SET SCBQTYPE X 
CTO MAIN STORAGES 
X QUEUING / 




•SET SCBQTYPE 
(TO NONREUSABLE 
X DISK 



» 



c ^ 

I RETURN 1 
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CzlD 



FA2-2.G4 
FA2-I3.EI 



BUILD THE WRITE 

KEY AND DATA 

CCWS 



SET CPBADDR = 

CURRENT RECORD 

NUMBER IN THE 

PREFIX 




SET THE AREA 
ADDRESS; PUT A 
WRITE DATA AND 
NOOP IN THE CPB 




SETD SFLG t 



5ETDS] 



•SET THE CPB^ 
/ FLAG FOR 
< REUSABLE OR 
\ NONREUSABLE 
DISK J 



ENOUFUE 



PUT THE ELEMENT 
FIRST ON THE 
NO-CPB QUEUE 



(EXIT TO \ 
IGG0I9RC J 






( \ 

I RETURN 1 
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Chart FA2-1 8 CPB INITIALIZATION -DISK ONLY QUEUING 




GET THE LCB 
ADDRESS, NO. OF 

THE CURRENT 

CPB, AND COUNT 

OF DATA MOVED 



ADD ONE TO 

SCBCPBNO; CLEAR 

THE WORK AREA 



SET INTO THE 
SCBSCSEG FIELD 

THE NUMBER OF 

THE RECORD JUST 

READ 



FA2-)ft A3 



ADD A CPB TO 

THE CHANNEL 

PROGRAM 



/ SET CPBFLAG ^ 
ITO REUSABLE OR 
\ NONREUSABLE > 



( ^ 

I RETURN 1 




ENQUEUE t 



PUT THE ELEMENT 
FIRST ON THE 
NO-CPB QUEUE 






GET THE 

DESTINATION 

FROM THE BUFFER 

PREF I X 



TERMENTR t NT A3 



IEDQTNT 



GET THE 

TERMINAL ENTRY 

OFFSET 



( \ 

I USELCB 1 



FA2-8, J2 



© 




USELCB 





SET UP TO BUILD 

THE SAME BUFFER 

SIZE 



I RETURN 1 



Proqram Orqanization 603 



Chart FA2-1 9 CPB INITIALIZATION - DISK ONLY QUEUING 



c ^ 

I LAST 1 



FA2-8.D2 



GET THE KEY 

LENGTH « THE 

FIRST BUFFER 

ADDRESS 




GET THE ADDRESS 
OF THE NEXT 

BUFFER 



HFBW.IT it 



SUBTRACT THE 
KEY LENGTH FROM 
THE BUFFER SIZE 




GET THE ADDRESS 

OF THE NEXT 

UNIT 



/ > * 

H RETURN I 



RETURN 




f ADDNBUNT ) f 



FA2-8.H2 
FA2-I I ,D2 



SETMNTfiT J i 

SET THE 
REMAINING SIZE 
= COUNT OF DATA 
IN THE NEW UNIT 



iUITREM ! ,, ,., ,, 

PUT THE COUNT 

NEEDED TO FILL 

THE UNIT IN 

TOUNT 



f RETURN J 



ADD THE KEY TO 

THE REMAINING 

SIZE 



J 



FA2-9.DI 




SUBTRACT I FROM 
THE AVAILABLE 
BUFFER COUNT! 

UNLINK A BUFFER 



I RETURN j 



DECREMENT THE 
NO. OF UNITS IN 
BUFFER IF ENTRY 
WAS AT ADDNBUNT 




PUT THE ERB ON 
THE BUFFER 
RETURN QCB 



F'A2-5 
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Chart FA2-20 CPB INITIALIZATION - DISK ONLY QUEUING 



f >i 

I SETEOM 1 



FA2-I I ,H3 




( ^ 

I RETURN J 



( ^ c 

I LINKTIC I I 



FA2-9.E5 
FA2-1 1 ,D3 



LINK THE UNIT 

INTO THE TIC OF 

THE BUFFER 



CLEAR AND 

INITIALIZE THE 

OP CODE 



( N 

I RETURN J 



^ ( ^ 

1 I FINDESTQ 1 



FA2-I ,EI 
FA2-2.A2 



FA2-3.E3 
FA2-8.B5 



GET THE 
DESTINATION QCB 
ADDRESS AND THE 
PRIORITY LEVEL 



FJNPESTS t 



GET THE ADDRESS 
OF THE FIRST 
PRIORITY QCB 




PRIORITY QCB 

ADDRESS = SIZE 

OF PRIORITY QCB 

X PRIORITY 

LEVEL 



f RETURN 1 
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Chart FA2-2 1 CPB INITIALIZATION - DISK ONLY QUEUING 




f CPBFREE J 



PUT THE 

APPQEMTY 

ADDRESS 

(FA2-5.G2) IN 

REGISTER 14 



nfiREUS , FAe-16,.0' 



ENQMGRC 



ENQUEUE THE 

BUFFER IN THE 

CHANNEL PROGRAM 



•4 RETURN J 



v 
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Chart FA2-22 CPB INITIALIZATION - DISK ONLY QUEUING 



I FREECPBA j 



FA2-6.E3.F4 
FA2-7.AI 
FA2-I0.B2 
FA2-I I ,EI 



SUBTRACT 1 FROM 

THE SCB CPB 

COUNT 




ADD I TO 

SCBNXCPB; 

SUBTRACT I FROM 

DISK COUNT 




,ff£7J2 





C£B£fi££A_ 



PUT THE CPB IN 

THE CPB FREE 

POOL 



f \ 

I RETURN I 



SET THE SCB 

UNIT COUNT = 

CPB WORK COUNT 



} 



Proqrai Orqanization 607 



Chart G A- 1 BUFFER MANAGEMENT MODULE 




.INITIAL t SA-,4 A3 



SETRSVD 



GET RESERVED 
DISK AND RE- 
QUEST COUNT 



t fiA-4 FS 



GET THE BUFFER 

UNIT COUNT FROM 

THE DCB 





PR1NSSRT I 



GET THE ADDRESS 

OF THE BUFFER 

RETURN QCB 



tEXIT TO DSPPRIOj 



GET THE ADDRESS 

OF THE LAST 
BUFFER ASSIGNED 



PUT THE INITIAL 

ADDRESS 

(GA-1.EI) IN 

REGISTER 14 



PUT THE SETCT 

ADDRESS 
(GA-4.B5) IN 
REGISTER 9 



SET REGISTER 8 

EQUAL TO 

REGISTER 14 



t„,SA-lA,l 





,fiA-4 Ai 



SET UP TO TPOST 

THE BUFFERS TO 

THE ACTIVATE 

QCB 



(BRANCH ON A 
REGISTER 9 1 



SET UP TO TPOST 

THE BUFFERS TO 

THE QCB 

SPECIFIED IN 

LCBRCQCB 



PHSTA 



SET THE QCB 

ADDRESS AND THE 

PR I OR I TY 



(exit to dsppostJ 
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Chart GA-2 BUFFER MANAGEMENT MODULE 
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Chart GA-3 BUFFER MANAGEMENT MODULE 



CUflGD ^ 
ENTER J 



SET BASE REG: 

GET LCB & DCB 

ADDRESS? SET 

RETURN TO 

DISPATCHER 




SETUSPCI 



A5S0C3 



SA-6,M 




fiQAHEAP 



fift-S Al, 



COMPLETE 

BUILDING THE 

CCWS 



GET THE ADDRESS 

OF THE 

PREVIOUSLY 

ASSIGNED BUFFER 




PUT THE ADDRESS 
OF THE BUFFER 

IN THE LCBLSPCI 

FIELD OF THE 

LCB 



-5EI- 



'SET THE FLAG 
FOR THE LAST 
V BUFFER 



> 




SET THE 

PREVIOUS LAST 

UNIT TO TIC TO 

THE FIRST 








RESET THE 

CHANNEL PROGRAM 

CHECK FLAG 



SFTRg , 

SET THE ADDRESS 

OF THE LAST 

UNIT TO BE THE 

LCBCPA 



(BRANCH ON ^ 
REGISTER S 1 
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Chart GA-4 BUFFER MANAGEMENT MODULE 



FRSEUST, 



UNlTft 



LINK THE 

PREVIOUS UNIT 

TO THIS ONE 



REMOVE ONE UNIT 



>^ET THE 'TSO*^ 

< FLAG IN THE 
^UFFER PREFIXy 





f RETURN J 



SET THE RETURN 

ADDRESS TO LINK 

(GA-1 ,HI ) ; GET 

THE NUMBER OF 

UNITS 




[ SETRSVD J f ASSOC I AT 1 



RECHftl 



GA-I ,E1 
GA-2.C3 



GET THE COUNT 

RESERVED FOR 

THE DISK AND 

THE REQUEST 

COUNT 



f RETURN J 



FIND JT 


S. N0 






IS THIS THeN 
LAST BUFFER 


GET THE ADDRESS 

OF THE NEXT 

BUFFER 









CLEAR THE 
PREVIOUS LINK 
FIELD TO ZERO 



t RB-£ M 



PUT UNIT FIRST 

IN BUFFER UNIT 

POOL 




f RETURN J 



I NEXTONE 1 



GA-2.C1 



GET THE ADDRESS 

OF THE NEXT 

UNIT 



GA-1 ,J4 



PUT THE 

PR INSERT 

ADDRESS 

(GA-l.JI) IN 

REGISTER 8 



SET THE 
LCBLSPC1 FIELD 
OF THE LCB AND 

THE RESERVE 
CHARACTER COUNT 




SETCT 



(BRANCH ON \ 
REGISTER 14 1 



JQIEB. 



fift-6 At 



SAVE THE 

ADDRESS OF THE 

FIRST BUFFER 



SA.-5 A 



COMPLETE 

BUILDING THE 

CCWS 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



( °" CT ) 




GA-1 ,F1 
GA-2.E3 



GET THE ADDRESS 

OF THE DCB AND 

THE NUMBER OF 

UN1T5 PER 

BUFFER 




GET THE NUMBER 

OF UNITS FROM 

THE ERB 



r \ 

I RETURN 1 
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Chart GA-5 BUFFER MANAGEMENT MODULE 



f BLDCCWS J 





GA-3.GI 




GA-4.H4 






GET THE KEY 
LENGTH 








eabretry 



GET THE TEXT 

PREFIX SIZE AND 

THE 

START-OF-DATA 
ADDRESS 




SK1PBCT t 



PUT A WRITE 

IDLE CCW IN THE 

BUFFER 




CALCULATE THE 

I/O ADDRESS = 

ADDRESS OF THE 

UNIT + 12 + EOB 

COUNT 



GET THE ADDRESS 

OF THE NEXT 

UNIT 



SUBTRACT THE 

KEY LENGTH FROM 

THE EOB COUNT 



HPRSZ, 



GET THE HEADER 

PREFIX SIZE AND 

THE 

START-OF-DATA 

ADDRESS 



FUGS, t, fifrrinKa 



GET THE NUMBER 
OF RESERVED 
CHARACTERS 



APPSIZE 



SET THE CCW I /O 

ADDRESS AND 

TEST FOR THE 

FIRST UNIT 



.ELAfiSS.,! 



SET THE COUNT, 

THE OP CODE AND 

THE FLAGS IN 

THE CCW 




AQPUMT5 



SET THE CCW I /O 
ADDRESS AND 

TEST FOR 

ADDITIONAL 

UNITS 



-BEAU 




GET THE BUFFER 

SIZE FROM THE 

DCB 




SUBTRACT THE 

TSO PREFIX SIZE 

FROM THE BUFFER 

SIZE 



SUBTRACT THE 

IDLE SIZE AND 

THE TEXT PREFIX 

SIZE FROM THE 

BUFFER SIZE 



LUSL 



PUT NEW COUNT 

IN CCW OF THE 

LAST UNIT. SET 

AN INVALID TIC 

IN LAST UNIT 
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Chart GA-6 BUFFER MANAGEMENT MODULE 




ADD THE NUMBER 

OF IDLES TO THE 

HEADER SIZE 



suam, 



FIND THE SIZE 

OF THE LAST 

UNIT 



ADD THE NUMBER 

OF IDLES TO THE 

TEXT SIZE 




SET THE NUMBER 

OF RESERVED 

CHARACTERS IN 

THE BUFFER = 

ZERO 



f S I Z I DLE 1 




RCYIPLE 



( \ 

I SETCCWS I 



GA-3.E1 
GA-4.E4 



/ SET X 

/ 'ADDITIONAL X 

CUNIT' FLAGS (D,> 

\ C AND SLI / 

\ BITS) / 



BUI LORD 




SET THE PC 1 , 

DATA CHAINING 

AND SLI BITS IN 

THE CCW 



GET THE NUMBER 

OF TEXT IDLES 

FROM DCBRESER+t 

IN THE DCB 



GET THE NUMBER 
OF IDLES FROM 

THE LCBISZE 

FIELD OF THE 

LCB 



■NOFCI 



SET THE DATA 

CHAINING AND 

SLI BITS IN THE 

CCW 



f \ 

I RETURN J 
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Chart GT- 1 TRANSPARENT TRANSMISSION CCW BUILDING ROUTINE 



Coosa . 
ENTER J 



GET THE ADDRESS 

OF THE LCB, THE 

SCB, AND THE 

DCB 



INITIALIZE THE 

WORK AREA WITH 

THE CCW FLAGS 




( \ 

I SETWRETB 1 



RUT I BLANK AT 

THE UNIT 

ADDRESS + 12 + 

THE SIZE OF THE 

DATA 




FJ.RSIONS, 



GET THE ETB 

SIZE REMAINING 

FROM THE LAST 

BUFFER 



PUT A WRITE DLE 

ETB, READ 

RESPONSE IN THE 

LCB CHANNEL 

PROGRAM AREA 



GET THE BUFFER 

SIZE, KEY 

LENGTH, AND 

NUMBER OF UNITS 



fiETETB, 



GET THE BLOCK 

SIZE FOR 
TRANSMISSION 




SUBTRACT ONE 

FROM THE COUNT 

AND MOVE THE 

DATA 



ADD THE COUNT 
OF BLANKS TO 
THE COUNT OF 
DATA STILL IN 
THE UNIT 



ADD THE COUNT 

OF BLANKS TO 

THE COUNT TO 

WRITE NEXT TIME 



CALCULATE THE 
NUMBER OF BYTES 
NOT TO WRITE = 

PREFIX SIZE + 
IDLES 



SET THE NEW CCW 

COUNT AND OP 

CODE 



GT-2.J4 
GT-3.G5 



GET THE ADDRESS 

OF THE LAST 

UNIT BEING 

WR I TTEN 



SAVE THE 

REMAINING SIZE 

OF DATA IN THE 

UNIT FOR LINE 

END APPENDAGE 



MAKE THE UNIT 

TIC TO THE 
WRITE DLE ETB 



( \ 

I RETURN 1 



4 RETURN 1 




GET THE COUNT 

OF DATA ALREADY 

WRITTEN 




-5£L 



FIND THE UNIT 
THAT HAS THE 
FIRST BYTE OF 
DATA TO WRITE 



KETBRT , t . 

SUBTRACT NUMBER 
OF BYTES NOT TO 

WRITE FROM 
PREFIX SIZE AND 
FROM KEY LENGTH 



614 
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Chart GT-3 TRANSPARENT TRANSMISSION CCW BUILDING ROUTINE 




GET THE SIZE OF 

THE DATA IN 

THIS UNIT 



SKBLK I 



SUBTRACT THE 

AMOUNT OF DATA 

IN THIS UNIT 

FROM THE KEY 

LENGTH 




STr I A3, 



MOVE DATA LEFT 

TO BE MOVED IN 

THE UNIT 



SUBTRACT THE 
AMOUNT OF DATA 
MOVED FROM THE 

REMAINING ETB 
SIZE 



GET A UNIT FROM 

THE BUFFER UNIT 

POOL AND LINK 

IT TO THIS 

BUFFER 



,ST-,I A3 




.0 .. 

V_X NOFLAG 
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Chart HG-2 TIME DELAY SUBTASK 



/ FLAG THE \ 
'ACTIVE ST1MER\ 
ELEMENT ADDRESSJ 
W AS INACTIVE / 



RESUME, t 



UNLINK FROM THE 
TIME QUEUE THE 

FIRST ELEMENT 
WITH AN EXPIRED 

TIME INTERVAL 






'TURN OFF THE 

1 12-HOUR 
^REQUEST' BIT 



r FLAG THE 
ELEMENT AS 
•NOT ON THE 
TIME QUEUE 




GET THE QCB 

ADDRESS TO 

RECEIVE THIS 

ELEMENT 



LINK THE 

RECEIVE 

SCHEDULER ONTO 

THE STCB CHAIN 



♦ RB-2 A I 




SET THE TIME 

INTERVAL TO 12 

HOURS 



PUT THE ADDRESS 
OF THE ELEMENT 
INTO REGISTER I 




FLAG THE 
ELEMENT AS 

NOT ON THE 
TIME QUEUE 



/ INDICATE 
/•QCB POSTED* „ 
[IN THE QCBPOSTO> 
\ FIELD / 






J QSTLCB 

REQUEST THAT 
THE LCB BE 
► TPOSTED TO 
ITSELF 



RESTORE THE TSO 

DATA INTO THE 

OLD TIME DELAY 

LINK FIELD 



' FLAG THE ^ 
ELEMENT AS 
•NOT ON THE 
TIME QUEUE' 





san 



Hfi-a llll fi£ 



TPOST THE 

ELEMENT TO THE 

INDICATED QCB 



618 



Chart HG-3 TIME DELAY SUBTASK 




CZD 



HG-1 ,CI ,C2 
HG-3, CI ,C2 



SET REGISTERS; 
SAVE REGISTER 
13, AVT BASE, 

AND DISPATCHER 
BASE 



/ N 

I RETURN 1 



r FLAG THIS 
ELEMENT AS 
HAVING AN 
INACTIVE 
V STIMER 



PflSTSXIT 



PASS THE DELETE 

REQUEST ELEMENT 

TO BE TPOSTED 



JSB-Li. 



REQUEST TIME 

QCB BE TPOSTED 

TO ITSELF 



PASS THE 

ADDRESS OF 

SAVE2 TO THE 

DISPATCHER IN 

REGISTER 13 



SET THE ELEMENT 
TO GO TO THE 
INDICATED QCB 



/ > l 

*i RETURN TO I OS 1 



f \ 

f EXIT TO DSPPOST) 
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Chart HI- 1 SYSTEM DELAY SUBTASK 




ANQTLCB 



„t ilQ: 



PUT SYSTEM DE- 
LAY QCB ON TIME 
DELAY QUEUE 



CEXIT TO \ 
DISPATCHER I 



1 I JLL-r i u 

•PRILNFRE* 
PRIORITY 



QP.CTL , 



CLEAR LCB COUN- 
TER;' TURN ON 

•SYSTEM DELAY- 

BIT X* 10' IN 

AVTBITI 



GET THE TCB 

ADDRESS FROM 

THE AVT 



GET THE START 

OF THE DCB 
CHAIN ADDRESS. 
FROM THE TCB 




620 



Chart HI-2 SYSTEM DELAY SUBTASK 





Hfi-3, A 



REMOVE THE LCB 

FROM THE TIME 

DELAY QUEUE 






STOPPED HI -2 A4 


YES 


DECCOUNT 


DO NOT COUNT 
THIS LCB 


' 




YES 


* 






~2 



AUTQFOLL 



OVERRIDE AUTO 

POLL WITH NO-OP 

CCWS AT 

LCBCPA+32 AND 

LCBCPA+56 



STARSTP 



WPRLOTPS. 



^ 



PUT THE RECEIVE 

SCHEDULER BACK 

INTO THE STCB 

CHAIN 



t RB-S.A1, 



HANCLSBX,, 



c 



Hl-SiAS 



PUT THE LCB ON 
THE SYSTEM 
DELAY QUEUE 



GET THE ADDRESS 

OF THE DATA 

AREA FROM THE 

SENSE CCW AT 

LCBCPA+32 



GET THE ADDRESS 

OF THE DATA 

AREA FROM THE 

SENSE CCW AT 

LCBCPA+24 



B I SYNC _ 
*C PREPARE CCW > 




^ f ^ 

1 I HANGLCB ) 



HI-2.D2 



HI-I ,E1 
HI-2.F3 



HANG THE LCB 

ONTO THE FRONT 

OF THE SYSTEM 

DELAY QUEUE 



DECREMENT THE 

COUNT OF 

OUTSTANDING 

LCBS 



( RETURN J 



IflHALI. 



USING THE UCB 
INDEX IN THE 
LCB, GET UCB 
ADDRESS FROM 
DEB OF THE LCB 



IOHALT - 

STOP THE 

LINE 
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Chart HK STOP LINE I/O SUBTASK 



C DQHK 
\ 
ENTER I 



REMOVE THE LCB 

FROM THE TIME 

DELAY QUEUE 



PUT THE RECEIVE 

SCHEDULER BACK 

ON THE QUEUE 




© 
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Chart HM-1 DESTINATION SCHEDULER 



igPQHM ^ 

f ENTER J 



GET THE ADDRESS 

OF THE BUFFER, 

OF THE LCB, AND 

OF THE SCB 



OUT 



REPLACE THE SCB 

PRIORITY WITH 

THE OFFSET TO 

CURRENT PRIOR- 
ITY LEVEL QCB 



GET THE ADDRESS 

OF THE MASTER 

QCB AND OF THE 

FIRST PRIORITY 

QCB 




TXTBFR 



PRTY QCB ADDR 

PRTY OFFSET X 
PRTY QCB SIZE 
FIRST PRTY QCB 
ADDR 



FIND THE 

HIGHEST 

PRIORITY LEVEL 

QCB 




HM-a Aa 



REMOVE ELEMENT 
FROM TIME DELAY 
QUEUE, IF THERE 



PUT THE LCB 

ADDRESS IN THE 

INSRCE QCB 

CHAIN 



GET THE ADDRESS 

OF THE NEXT 

PRIORITY LEVEL 

QCB 



SETSIgS 




GET THE ADDRESS 

OF THE NEXT 

UNIT; ADD ONE 

TO THE COUNTER 



SET THE NUMBER 

OF UNITS = THE 

COUNTER 





S^NO 








HM-6 A3 


THE^S. 
NAL NO> 
ITS = 
COUN- s> 

er y^ 


SET UP TO TPOST 

THE NEXT UNIT 

TO THE BUFFER 

RETURN QCB 




POSTSUB 


TPOST THE 
BUFFER 






|YES 
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Chart HM-2 DESTINATION SCHEDULER 




NODIAL 





REPLACE THE QCB 

HIGHEST 
PRIORITY LEVEL 



HM-6, Al, 



TEST FOR 
INITIATE MODE 
NOW ACTIVE 



TPOST THE ERB 



NOCHECK 



POSTCOPY 



SET UP TO TPOST 

THIS BUFFER TO 

THE COPY QCB 



UPDATE REUSABLE 

DISK DATA SET, 

IF NECESSARY 




COUNT BUFFER 
UNITS & UPDATE 
AVT ADDR VALUE 




CflREOUPL. HM-IQ A.2 

DUPLCORE 



TEST FOR A 
SINGLE UNIT 

HEADER 



jNITRTN 



GET THE ADDRESS 

OF THE BUFFER 

RETURN QC8 



HM-C A3 



J 



t HM-lft-.M 



hm-8 A4 



MM- 10 *i 



SET THE QCB AND 
SCB FEFO 
POINTERS 




EXIT TO DSPDI! 
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Chart HM-3 DESTINATION SCHEDULER 




NONR£U5_ 



USE 
AVTNADDR; SET 
SCBQTYPE AND 
THE TIC FLAGS, 




pTXTBFR 



MOVE SCBDNSEG 

TO PRFCRCD AND 

SCBDCHDR TO 

PRFCHDR 



USE \ 

, AVTRADDR; SET> 
< SCBQTYPE AND 
\THE TIC FLAGS/ 




SET THE NEW 

QCBFHTZ AND 

QCBFHLZ FIELDS 



MOVE QCBDNHDR 

TO PRFCRCD AND 

PRFCRCD TO 

SCBDCHDR 



MOVE QCBQBACK 

TO PRFHQBCK AND 

PRFCRCD TO 

QCBQBACK 



MOVE THE AVT 

ADDRESS FIELD 

TO QCBDNHDR AND 

TO PRFNHDR 




♦ HM-10 F3 



ADD I TO THE 

AVT VALUE OF 

ADDRESS 




DUPLHDR 



HM-IQ A 4 



GET THE 

ADDITIONAL 

RECORDS ADDRESS 



TXTSAME ♦ 




MOVE THE AVT 

ADDRESS VALUE 

TO PRFXTRA 



ADD Y TO THE 

AVT VALUE OF 

ADDRESS 




GET THE 

TERMINAL ENTRY 

ADDRESS 



MOVE AVT VALUE 

OF ADDRESS TO 

SCBDNSEG AND TO 

PRFNTXT 



HM-IQ F,3 



ADD I TO THE 

AVT VALUE OF 

ADDRESS 



HM-8 A 




MOVE QCBQBACK 

TO PRFTQBCK AND 

PRFCRCD TO 

QCBQBACK 



SMOCK, 



EXAMINE THE 

MESSAGE AND THE 

LCB 



iHIH-fl, ,A1 
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Chart HM-4 DESTINATION SCHEDULER 




ISKPQST ■ 



SET UP TO TPOST 

THE BUFFER TO 

THE DISK I/O 

QCB 



NflfiQUKI, 



REMOVE ONE UNIT 



C ABEND ^ 
(S045.W007) I 




RESTORE \ 
REGISTERS AND\ 
SET REGISTER 1 53 



PQSIB „t 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



I RETURN 1 



CALCULATE Y = 

AVTRADDR 

DIVIDED BY 

TOTAL NUMBER OF 

RECORDS 



CALCULATE X = 

TOTAL NUMBER OF 

RECORDS DIVIDED 

BY 4 




REPLACE 
AVTRADDR WITH Y 
- MODULO VALUE 



(exit TO DSPPOSt} 




SET UP TO TPOST 

THE ELEMENT TO 

THE SPECIFIED 

QCB (LCBRCQCB) 




SET THE ^ 
•REUSABILITY 
FIRST TIME' 
SWITCH 



CALCULATE LOAD 

POINT = LOAD 

POINT + I /4 THE 

TOTAL NUMBER OF 

RECORDS 
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Chart HM-5 DESTINATION SCHEDULER 




ACTIVATED BY THE 
REUSABILITY-COPY 
SUBTASK 



SET THE NUMBER 

OF UNITS PER 
BUFFER EQUAL TO 



C QPYUNIT t 



GET THE ADDRESS 

OF THE LAST 

SEGMENT 



MAKE THE LAST 

UNIT TIC TO 

THIS UNIT 




RESTORE 
^REGISTERS: SET 
REGISTER 15 



t HM-6 AS 



COUNT ONE UNIT 




GET THE ADDRESS 

OF THE LAST 

PREF 1 X 



f \ PI 

I RETURN 1 \ H V 




GET THE ADDRESS 
OF THE DCB AND 

OF THE FIRST 

LCB IN THE LINE 

GROUP 



GET THE ADDRESS 

OF THE RIGHT 

LCB AND SCB 



/ ^ 

►I RETURN I 



GET THE ADDRESS 

OF THE WORK 

AREA AND OF THE 

SCB 




flIALLCB 



FIND THE SCB 
ADDRESS AND THE 

LCB WITH THE 
DIAL SCHEDULER 




Proqram Orqanization 627 



Chart HM-6 DESTINATION SCHEDULER 



f ^ c ^ c > i ( > i f ^ 

( SEND1NIT J I POSTSUBA J I POSTSUB 1 I CNTUNITS J I UNITCNT J 




f \ 

I RETURN +4 I 



HM-1 ,K5 
HM-2.G5 



PUT THE BUFFER 
ADDRESS IN 
REG I STER I 



PflSTSUBlV f, 



GET THE NUMBER 

OF UNITS IN A 

BUFFER 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 




t, RB-S A. 



UNITCNT t 



ADD THE NUMBER 

TO THE AVT 

VALUE OF 

ADDRESS 



f RETURN J 




CHAIN ONE UNIT 

TO THE PREVIOUS 

UNIT 








/ s * 

►I RETURN I 
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Chart HM-7 DESTINATION SCHEDULER 




RESTORE X 
REGISTERS AND\ 
SET REGISTER 153 



HM-fi AL 



SEE IF AN INI- 
TIATE MESSAGE 
IS BEING SENT 



SUBTRACT I FROM 

THE MESSAGE 

COUNT 



SEE IF AN INI- 
TIATE MESSAGE 
IS BEING SENT 



QUEUE ONE UNIT 




SETBUFAP 



HM-? A4 



QUEUE THE UNIT 



FREE THE 

BUFFER: GET THE 

ADDRESS OF THE 

NEXT BUFFER 




THM-JOmA' 



PUT THE FEFO 

POINTERS IN THE 

QCB AND SCB 



t MMT8 A, 



hm-b A4 



EXAMINE THE 

BUFFER AND THE 

LCB 




(IT TO DSPDISP 
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Chart HM-8 DESTINATION SCHEDULER 



/ ^ 

I FINDSTCB J 



HM-2.KI RP-II.E5 

HM-3,J2,K5 

HM-7.G5 CONTINUE 





CALCULATE THE 

ADDRESS = VTO X 

2 + AVTDISP - 



CALCULATE 
REGISTER 15 
ADDRESS + 
OFFSET AT 
ADDRESS-2 



8ALR 14,15 



EXECUTE THE 

SCHEDULER AT 

REGISTER 15 



RESTORE THE 
ADDRESS OF THE 

LCB, OF THE 

SCB, AND OF THE 

QCB 



( \ 

I RETURN 1 



REPLACE THE 

SEND SCHEDULER 

STCB 



f RETURN J 



NOTE: THE BALR 14,15 IN BLOCK E2 CAN ACTIVATE 
THE SUBROUTINE AT BZ-I.A4! EW-3.F5; R4-2,Alj 
Q6.A3; Q7-2.AI! OR RD-2.A3. 



TEST FOR A LOCK 

RESPONSE 

MESSAGE 




SET UP TO TPOST 

THE LCB FOR A 
SEND OPERATION 



SET X = QCB 

ADDRESS AND Y 

SEARCH VALUE 




MOVE THE LCB 
INSRCE VALUE TO 



J 
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Chart HM-9 DESTINATION SCHEDULER 
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Chart HM-10 DESTINATION SCHEDULER 




PISKALi 
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Chart HM 1 - 1 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 






GET THE ADDRESS 

OF THE BUFFER, 

OF THE LCB, AND 

OF THE SCB 



GET THE ADDRESS 

OF THE MASTER 

QCB AND OF THE 

FIRST PRIORITY 

QCB 




TXJB.FR, 



PRTY QCB ADDR = 

PRTY OFFSET X 

PRTY QCB SIZE + 

FIRST PRTY QCB 

ADDR 



=© 



FIND THE 

HIGHEST 

PRIORITY LEVEL 

QCB 



_flUJ_ 



REPLACE THE SCB 
PRIORITY WITH 
THE OFFSET TO 

CURRENT PRIOR- 
ITY LEVEL QCB 




HMI-6 A3 



REMOVE ELEMENT 
FROM TIME DELAY 
QUEUE, IF THERE 



PUT THE LCB 

ADDRESS IN THE 

INSRCE QCB 

CHAIN 



NO IN1T T 



' RESET THE ^ 
1 INITIATE MODE' 
k. FLAG > 



©■ 



GET THE ADDRESS 

OF THE NEXT 

PRIORITY LEVEL 

QCB 



fiSTSUE t 



PARE it 


\NO 










' IS KEY ^ 
LENGTH < OR = 
V X ^ 


GET THE ADDRESS 

OF THE NEXT 

UNIT; ADD ONE 

TO THE COUNTER 




SUBTRACT 
AVTKEYLE FROM X 











ALL t 



SET THE NUMBER 

OF UNITS = THE 

COUNTER 




SET UP TO TPOST 

THE NEXT UNIT 

TO THE BUFFER 

RETURN QCB 



HMI-4, A3 
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Chart HM 1-2 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 






REPLACE THE QCB 

HIGHEST 
PRIORITY LEVEL 



NflPIAL 



TEST FOR 
INITIATE MODE 
NOW ACTIVE 





HMI-4 A2 



TPOST THE ERB 



NQCHECK am 



CNTUNITS 



COUNT BFR UNITS 

i UPDATE AVT 

ADDR VALUE 




J MIRTH 



GET THE ADDRESS 

OF THE BUFFER 

RETURN QCB 



CflREQUPL 



ifliL 



CHECK FOR A 

SINGLE UNIT 

HEADER 



HQCQUNT t 



HMI-4 A3 



REMOVE ONE UNIT 

FROM THE BUFFER 

TRANSFER DATA 



UNITflUS, 



HMI-T Al 



HM1-7 A3 



ASSIGN THE 

QUEU I NG 

POINTERS 



HMI-fl A' 



SET FEFO 
POINTERS IN THE 
QCB AND THE SCB 




SET UP TO TPOST 

THE SPECIFIED 
QCB AT LCBRCQCB 



HMIr8 Ai 



♦ HMI-fe A4 



■f HMl.,-6 A' 



PBSTB 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



(exit TO dsppostJ 




RESTORE > 
[REGISTERS! SET 
REGISTER 15 J 



/ ^ 

►Iexit to dspdispI 

/ > i 

•A RETURN I 
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Chart HM 1 -3 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 



lE^SJtlMfliS ' 

f ENTER J - 



ACTIVATED BY THE 
REUSABILITY-COPY 
SUBTASK 



/ SAVE \ 

/ REGISTERS: \ 
< SET THE BASE > 
\REG 1 STER AND / 




SET THE NUMBER 

OF UNITS PER 
BUFFER EQUAL TO 



CfgYUNIT 



GET THE ADDRESS 

OF THE LAST 

SEGMENT 



MAKE THE LAST 

UNIT TIC TO 

THIS UNIT 



t HMIM AS 



COUNT ONE UNIT 




GET THE ADDRESS 

OF THE LAST 

PREFIX 



v 




GET THE ADDRESS 
OF THE DCB AND 

OF THE FIRST 

LCB IN THE LINE 

GROUP 




►f RETURN J 



GET THE ADDRESS 

OF THE WORK 

AREA AND OF THE 

SCB 



PlftLLCB 



FIND THE SCB 
ADDRESS AND THE 

LCB WITH THE 
DIAL SCHEDULER 



GET THE ADDRESS 

OF THE RIGHT 

LCB AND SCB 



IS THE 
LINE SEND- 
ING FROM THE 
SAME PRTY 
LEVEL 



C N 

I RETURN +4 1 



►f RETURN ) 
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f POSTSUB J f CNTUNITS J f UNITCNT j 



HMI-I ,K5 
HMI-2.F3 



PUT THE BUFFER 
ADDRESS IN 
REGISTER I 



PB5T5UBA , t 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



♦ RB-a A I 



f RETURN J 



HMI-2.D3 



GET THE NUMBER 

OF UNITS IN A 

BUFFER 




IS THIS 
'A DUPLICATE\YES 
HEADER BUFFER 



JNITCNT t 



ADD THE NUMBER 

TO THE AVT 

VALUE OF 

ADDRESS 



v 








SET A NEW AVT 

VALUE OF 

ADDRESS 



IS THE 

CURRENT \YES 
ADDRESS VALUE 
> AVTCMAX 




ARE THERE \NO 
ANY UNITS 
AVAILABLE 



CHAIN ONE UNIT 

TO THE PREVIOUS 

UNIT 





v 



/ ^ 

A RETURN 1 
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Chart HM 1 -5 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 




RESTORE 

REGISTERS AND 

SET REGISTER 15, 



NQTHPR HMI 



SENDUN1T 



SEE IF INITIATE 

MODE MSG BEING 

SEND 



SUBTRACT I FROM 

THE MESSAGE 

COUNT 



SEE IF AN INI- 
TIATE MESSAGE 
IS BEING SENT 



MM I - C 









f-QUNDMSS. 



FLAG THE HEADER 

LOST; SET UP TO 

FREE THE REST 

OF THE BUFFER 



QUEUE ONE UNIT 






SETSJZE, 



FREE THE 

BUFFER; GET THE 

ADDRESS OF THE 

NEXT BUFFER 




JJMi 



PUT THE FEFO 

POINTERS IN THE 

QCB AND SCB 



HMI -6 



t HMI.-6 \* 



EXAMINE THE 

BUFFER AND THE 

LCB 
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Chart HM1-6 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 




t ,HM|-fe A3 



REMOVE ELEMENT 
FROM TIME DELAY 
QUEUE, IF THERE 




CALCULATE THE 

ADDRESS - VTO X 

a + AVTDISP - 

24 



CALCULATE 
REGISTER 15 
ADDRESS + 
OFFSET AT 
ADDRESS-2 



BALR 14,15 



EXECUTE THE 

SCHEDULER AT 

REGISTER 15 



RESTORE THE 
ADDRESS OF THE 

LCB, OF THE 

SCB, AND OF THE 

QCB 



( \ 

I RETURN J 




NOTE: THE BALR 14,15 IN BLOCK E2 CAN ACTIVATE 
THE SUBROUTINE AT BZ-I.A4; EW-3,F5{ R4-2.AI; 
Q6.A3-, Q7-2.AI; OR RD-2.A3. 



SET X = QCB 

ADDRESS AND Y 

SEARCH VALUE 




MOVE Y TO X: 
MOVE THE LCB 
INSRCE VALUE TO 




SET UP TO TPOST 

THE LCB FOR A 
SEND OPERATION 



f \ 

I RETURN 1 
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Chart HM 1 -7 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 
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Chart .HM 1 -8 DESTINATION SCHEDULER - MAIN STORAGE QUEUING ONLY 



CEED 



HMI-2.J2 
HMI-2.F4 
HMI-5.E5 



.HMI.-3.A* 



SEE IF ONLY MSG 
IN FEFO CHAIN 
IS BEING SENT 





ADD I TO THE 

DUPLICATE 
HEADER COUNT 



( \ 

I RETURN 1 




UPDATE THE.SCB 
WITH THE NEW 
FEFO POINTER 



MQSfiBUP t 



( N 

I RETURN J 



6U0 



Chart HM2-1 DESTINATION SCHEDULER - DISK QUEUING ONLY 



I ENTER 1 



GET THE ADDRESS 

OF THE BUFFER, 

OF THE LCB, AND 

OF THE SCB 



GET THE ADDRESS 

OF THE MASTER 

QCB AND OF THE 

FIRST PRIORITY 

QCB 




TXTBFR 



PRTY QCB ADDR = 

PRTY OFFSET X 

PRTY QCB SIZE + 

FIRST PRTY QCB 

ADDR 



10 



FIND THE 

HIGHEST 

PRIORITY LEVEL 

QCB 



J2UX. 



REPLACE THE SCB 
PRIORITY WITH 
THE OFFSET TO 

CURRENT PRIOR- 
ITY LEVEL QCB 




HMS-7 A3 



REMOVE ELEMENT 
FROM TIME DELAY 
QUEUE, IF THERE 



PUT THE LCB 

ADDRESS IN THE 

INSRCE QCB 

CHAIN 







/ RESET THE \ 

V INITIATE MODE'> 

\ ^ / 



GET THE ADDRESS 

OF THE NEXT 

PRIORITY LEVEL 

QCB 



SETS US 




GET THE ADDRESS 

OF THE NEXT 

UNIT! ADD ONE 

TO THE COUNTER 



-ALL- 



SET THE NUMBER 

OF UNITS = THE 

COUNTER 




SET UP TO TPOST 

THE NEXT UNIT 

TO THE BUFFER 

RETURN QCB 



HMg-fi A.3 
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Chart HM2-2 DESTINATION SCHEDULER - DISK QUEUING ONLY 



.T 



./is THIS A^S^ 

C DIAL QCB 1 


YES 


/IS THISX 

s^ the last > 

•< segment of a 

xl message v 

Jno 


VYES 


^/iS THISX 

yT MESSAGE ^» 

-C PRTY > LAST 

\ MESSAGE y 

X. PRTY S^ 

JNO 


yYES 


REPLACE THE QCB 

HIGHEST 
PRIORITY LEVEL 










NO 






NOP ! At- 


HM2-6 A 


1 












SENDINIT 




TEST FOR 
INITIATE MODE 
NOW ACTIVE 






ppsTcgpr 



HMS-6 



UPDATE REUSABLE 

DISK DATA SET, 

IF NECESSARY 



SET UP TO TPOST 

THIS BUFFER TO 

THE COPY QCB 




v 



6U2 



Chart HM2-3 DESTINATION SCHEDULER - DISK QUEUING ONLY 




USE 
AVTNADDR; SET 
SCBQTYPE AND 
THE TIC FLAGS. 




flIXIBER 



MOVE SCBDNSEG 

TO PRFCRCD AND 

SCBDCHDR TO 

PRFCHDR 



SET THE NEW 

QCBFHTZ AND 

QCBFHLZ FIELDS 



flUESAME t 



MOVE QCBDNHDR 

TO PRFCRCD AND 

PRFCRCD TO 

SCBDCHDR 



MOVE QCBQBACK 

TO PRFHQBCK AND 

PRFCRCD TO 

QCBQBACK 



MOVE THE AVT 

ADDRESS FIELD 

TO QCBDNHDR AND 

TO PRFNHDR 



MM5-6 fi2 



ADD I TO THE 

AVT VALUE OF 

ADDRESS 





flURUHPR, 



GET THE 

ADDITIONAL 

RECORDS ADDRESS 




IXTSftME 




MOVE THE AVT 

ADDRESS VALUE 

TO PRFXTRA 



ADD Y TO THE 

AVT VALUE OF 

ADDRESS 




NT, ,A,3, 



GET THE 

TERMINAL ENTRY 

ADDRESS 



MOVE AVT VALUE 

OF ADDRESS TO 

SCBDNSEG AND TO 

PRFNTXT 



' HMS-6 ,fi2 



ADD I TO THE 

AVT VALUE OF 

ADDRESS 



MOVE QCBQBACK 

TO PRFTQBCK AND 

PRFCRCD TO 

QCBQBACK 



.CKLQCK.LHMgTM* 

SAMELAST 



EXAMINE THE 

MESSAGE AND THE 

LCB 



.HMSr.L.iV 



v 
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Chart HM2-4 DESTINATION SCHEDULER - DISK QUEUING ONLY 



w.,, a y NONREUSABLE\YES 
HM2-4 C DISK QUEUI" ' 
\B\J ^V SPEC IF IE 




CALCULATE Y = 

AVTRADDR 

DIVIDED BY 

TOTAL NUMBER OF 

RECORDS 



CALCULATE X x 

TOTAL NUMBER OF 

RECORDS DIVIDED 

BY 4 




REPLACE 
AVTRADDR WITH Y 
- MODULO VALUE 




CALCULATE LOAD 

POINT = LOAD 

POINT + I /4 THE 

TOTAL NUMBER OF 

RECORDS 



V 
HM2-4 



I SIMMS! , 



5ET UP TO TPOST 

THE BUFFER TO 

THE DISK I/O 

QCB 



\JT 



(ABEND ^ 
(S045.W007) 1 





RESTORE \ 

„ REGISTERS AND\ 
[SET REGISTER 153 



■ POSTS, 



PUT THE QCB 

ADDRESS IN THE 

BUFFER 



( \ 

I RETURN 1 



(exit to dsppost! 
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Chart HM2-5 DESTINATION SCHEDULER - DISK QUEUING ONLY 



EDfltlMJLS ,. 

( ENTER \ 



ACTIVATED BY THE 
REUSABILITY-COPY 
SUBTASK 



• SAVE ^ 

r REGISTERS; 

SET THE BASE 
^REGISTER AND 
\ FLAG > 



v 




/ "\ 

*\ RETURN j 



GET THE ADDRESS 

OF THE WORK 

AREA AND OF THE 

SCB 



GET THE ADDRESS 
OF THE DCB AND 

OF THE FIRST 

LCB IN THE LINE 

GROUP 




ALLCB 



FIND THE SCB 
ADDRESS AND THE 

LCB WITH THE 
DIAL SCHEDULER 



GET THE ADDRESS 

OF THE RIGHT 

LCB AND SCB 




/ ^ 

*\ RETURN 1 



RETURN + 4 
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Chart HM2-6 DESTINATION SCHEDULER - DISK QUEUING ONLY 




D C """" ) 



HM2-3.H2 



GET THE 

ADDITIONAL 

RECORDS ADDRESS 



f "\ 

I RETURN 1 



1 ADDONE J 




HM2-3.H1 
HM2-3.H4 


ADD ONE TO THE 

AVT VALUE OF 

ADDRESS 






f RETURN J 
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Chart HM2-7 DESTINATION SCHEDULER - DISK QUEUING ONLY 




HMg-7 A3 



REMOVE ELEMENT 
FROM TIME DELAY 
QUEUE, IF THERE 



CALCULATE THE 

ADDRESS = VTO X 

2 + AVTDISP - 

24 



CALCULATE 
REGISTER 15 
ADDRESS + 
OFFSET AT 
ADDRESS-2 



8ALR 14,15 



EXECUTE THE 

SCHEDULER AT 

REGISTER 15 



RESTORE THE 
ADDRESS OF THE 

LCB, OF THE 

SCB, AND OF THE 

QCB 



f RETURN 1 



NOTE: THE BALR 14,15 IN BLOCK E2 CAN ACTIVATE 
THE SUBROUTINE AT BZ-I.A4; EW-3.F5; R4-2.AI; 
Q6.A3; Q7-2.A1; OR RD-2.A3. 
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Chart JC-1 START/STOP ERP CONTROL MODULE 




CEXIT TO \ 
IGE0504G I 



^ AS THE ^o 
RETRY COUNT = 

C o ^S 


^YES 




SAVE THE CCW 

AND THE SENSE 

BYTE 






|no 







CEXIT TO \ 
IGE0304G h 




) 



6«*8 



Chart JC-2 START/STOP ERP CONTROL MODULE 




C EX IT TO ^ 

IGE0304G 1 



f EXIT TO \ 

[ IGE0504G 1 












SVC 15 - 
EXECUTE 
CHANNEL 
PROGRAM 








) 


[exit (SVC 3) 
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Chart JD-1 READ/WRITE UNIT CHECK AND UNIT EXCEPTION ERP MODULE 



f ENTER J 



INITIALIZE THE 

REGISTERS FOR 

AN INTERRUPT 

CHECK 
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Chart JD-2 READ/WRITE UNIT CHECK AND UNIT EXCEPTION ERP MODULE 




RESTART AFTER 
THE DIAL LINE 
CCW SEQUENCE 
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Chart JE NON-OPERATIONAL CONTROL UNIT ERP MODULE 



C -j" ; 

i ■ 

/initialize \ 
<the registers > 



WTO - 'LINE 
ID CONTROL 
UNIT NOT 
OPERA- 
TIONAL' 



/ RE! 

V 

/ — ^v 

/ INDICATE A X 
^PERMANENT ERROR> 



/return TO the\ 

I I/O SUPERVISOR I 
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Chart JF UNIT CHECK FOR NON-READ, NON- WRITE, AND NON-POLL CCW'S ERP MODULE 




(BRANCH TO THE \ 
INDICATED ) 
MODULE 1 



SET A 

•CHANNEL ERROR 

INDICATOR 



SET A 

•PERMANENT 

ERROR' 

INDICATOR 




© 



EXCP - 

RETRY THE 

LINE 



^RETURN TO THE \ 
Hl/O SUPERVISOR 1 
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Chart JG AUTO-POLL AND READ-RESPONSE-TO-POLL UNIT CHECK AND UNIT EXCEPTION ERP 

MODULE 

»2»3*4. »5 



'CEjJWfi,, ^ 

f ENTER J ► 




GET THE ADDRESS 

OF THE 
INVITATION LIST 







, IflOR, ♦ 



INCREMENT THE 

POINTER TO THE 

FIRST/NEXT 

ENTRY 




SETLIST 



GET THE 

INVITATION LIST 

ADDRESS 



GET THE ADDRESS 

OF THE FAILING 

CCW 



.CBMMQlt I, 




IS THERE \YES • INDICATE A 

BUS -OUT >-"— 1 < CONTROL UNIT 

ERROR 



/SET A RETURN \ 
< INDICATOR > 



CHApgRR,, „ 

YES X>NDICATE A \ 

»— J ►< CHANNEL ERROR > 







EXCP - 

RETRY THE 

LINE 



/RETURN TO THE \ 
I I/O SUPERVISOR 1 



654 



Chart JH ERROR POST AND SECOND LEVEL CCW RETURN MODULE 



f ENTER J »■ 



SOURCE 




r SET -UNDE- \ 

'FINED ERROR' > 

AND 'NO RETRY 

POSSIBLE' y 
.INDICATORS / 






GET THE NUMBER 

OF OPTION 

ENTRIES 



/ IN 



, INDICATE AN 
< ADDRESSING 
ERROR 







SET THE NUMBER 

OF ADDRESSING 

CHARACTERS 



© © 



© 



USFUCB 



GET THE 

STATISTICS 

TABLE OFFSET 




LOAF'S t, 




GET THE ADDRESS 
OF THE CURRENT 
INVITATION LIST 




(IT I V.^ 



OPCTL t 



GET THE ADDRESS 

OF THE OBR 

ROUTINE 



IS THIS 

OPERATOR 

CONTROL 



5TSCPN t 



GET THE ADDRESS 

OF THE MESSAGE 

WR I TER 



NEXTLQAP t 



GET THE ADDRESS 

OF THE XCTL 

ROUTINE 



( ^ 

I LINK TO XCTL J 
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Chart JI UNIT CHECK AND UNIT EXCEPTION ON READ/WRITE CCW'S FOR AUDIO AND 2260 LOCAL 
DEVICES ERP MODULE 



( \ / INITI 

[ ENTER 1 »<THE RE 




\ 

7 



EXCP - 

RETRY FROM 

THE 

APPENDAGE 






NO 






NO 




INCREMENT THE 
RETRY COUNT 




EXCP - 

RETRY FROM 

THE 

APPENDAGE 

















/RETURN TO THE A 
I I/O SUPERVISOR J 



/returjto the\ 
i i /o supervisor 1 
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Chart JJ START/STOP CHANNEL CHECK ERP MODULE 




SQNTCHK 



GET THE ADDRESS 

OF THE ERP IB 

TABLE 



FBUNC 




STORE THE 

STARTING 

ADDRESS 



BUILD A WTO 

MESSAGE,- SET 

THE STATUS BYTE 

IN THE CSW 



■Q- 



_£*££. 



EXCP - 

RETRY THE 

EXCP 



/RETURN TO THE A 
I I /O SUPERVISOR 1 
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Chart JK CLOSEDOWN TERMINAL STATISTICS RECORDING MODULE 




GET THE ADDRESS 

OF THE TERMINAL 

TABLE ENTRY 




FOUND, , 



GET THE 

TERMINAL 

ADDRESS 



NOT I, ST 



GET THE COUNT 

OF THE 

REMAINING 

ENTRIES 




( ^ 

I XCTL J 



EXCP - 

RETRY THE 

EXCP 



/RETURN TO THE A 
I I/O SUPERVISOR J 
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Chart JL- 1 BSC ERP CONTROL MODULE 




© 



NOTE: EACH BRANCH TO 'LOAOMOD' LOADS 
A UNIQUE VALUE IN AN INDEX REGISTER! 
THIS VALUE IS USED TO LOCATE THE 
NEXT MODULE TO GET CONTROL. 
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Chart JL-2 BSC ERP CONTROL MODULE 




U5EUCB, 



GET THE ADDRESS 

OF THE 

STATISTICS 

TABLE 




LOOPS 



■TCQMMON , 



GET THE SjbZE OF 
THE NAME 



TERM 



MNPTERM t 



GET THE 

TERMINAL 

ADDRESS 



_£££&) 



GET THE ADDRESS 

OF THE LINE 

NAME 



GET THE ADDRESS 

OF THE NEXT 

ENTRY 



INCREMENT THE 

TEMPORARY ERROR 

HANDLER 




«N° 


EXCP - 

RETRY THE 

EXCP 















L.QAPSUR , 



GET THE ADDRESS 

OF THE SDR 

MODULE 



^) 




ADJUST THE 
FLAGS FOR THE 
TERMINAL MASK 




/return to theT\ 
[i/o supervisor 1 



GQSPR 



< 



© 
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Chart JM-1 BSC READ/WRITE EQUIPMENT CHECK, LOST DATA, INTERVENTION REQUIRED, AND UNIT 
EXCEPTION ERP MODULE 



f ENTER J 




SET THE 
•SHOULD NOT 
OCCUR * 
\ INDICATOR 



INDICATE THAT' 
.THE RETRY COUNTJ 
IS EXHAUSTED 



I JMI I 



| QAHMnp ♦ 



GET THE ADDRESS 

OF THE XCTL 

ROUTINE 




INCREMENT PAST 
THE DIAL 
SEQUENCE 




WRENO t 



f XCTL 1 



/ SET THE X 
' RETURN > 

INDICATOR AND 
^TIC ADDRESSES> 



EXCP - 

RETRY THE 

EXCP 



/return TO THE\ 

•il/O SUPERVISOR 1 
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Chart JM-2 BSC READ/WRITE EQUIPMENT CHECK, LOST DATA, INTERVENTION REQUIRED, AND UNIT 
EXCEPTION ERP MODULE 



N°TRESP 



REftPEXIT t 
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Chart JN-1 BSC READ/WRITE DATA CHECK, OVERRUN, AND COMMAND REJECT ERP MODULE 



TSCMDRJ 




© 
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Chart JN-2 BSC READ/WRITE DATA CHECK, OVERRUN, AND COMMAND REJECT ERP MODULE 



/IS THIS THE\ 
C FIRST INPUT J 
^S. RECORD S^ 


NO 




YES 


.JJIRMAK 






REBUIL 
CHANNEL 


.D THE 
PROGRAM 












664 



Chan JO BSC SECOND LEVEL CCW RETURN MODULE 



f RETURN TO THE \ 
I I /0 SUPERVISOR I 





J5ETLIST ♦ 












.OftOSCR t 



GET THE ADDRESS 

OF THE XCTL 

ROUTINE 








i X " L ) 
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Chart JP BSC ERROR POST MODULE 




NT A3 



GET THE 

TERMINAL ENTRY 

ADDRESS 



INITIALIZE THE 

REGISTERS FOR 

THE OBR ROUTINE 



INCREMENT TO 

THE NEXT 

STATISTICS 

TABLE ENTRY 




GET THE DIAL 
DIGITS FROM THE 
TERMINAL ENTRY 



INITIALIZE THE 

REGISTERS FOR 

THE IEDQTNT 

ROUTINE 




GET THE CURRENT 

INVITATION LIST 

ENTRY INDEX 




INITIALIZE THE 

ERROR PARAMETER 

POINTER 



/ \ 

I RETURN ) 





SET THE 
ADDRESSING 
CHARACTERS 
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Chart JQ BSC CHANNEL CHECK ERP MODULE 




SQNTCHK 



( <CTL ) 



GET THE ADDRESS 

OF THE FIRST 

ERP IB 



FOUND 




GET THE ADDRESS 

OF THE NEXT 

ERP IB 




VERIFY THE CCW 

ADDRESS; SAVE 

THE ENDING 

STATUS 



SOOD T 



EXCP - 

RETRY FROM 

THE 

APPENDAGE 



/return to theN 
i i 10 supervisor 1 
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Chart K A- 1 ACTIVATE-I/O GENERATOR SUBTASK 



ENTER V 



R0-8.G5 
R0-9.F2 
Q2-8.G5 



/ INITIALIZE \ 
< THE REGISTERS > 



Q3-6.G5 
Q3-7.F2 
Q4-5.G5 
Q5-6.G5 



THIS CHART ALSO 
APPLIES TO MODULES 
I EDQKB , I EDQKC , 
IEDQKU, AND IEDQKE 



CALCULATE THE 

TERMNAME TABLE 

OFFSET 




/ii> 



, initialize 
•the registers 
-<for the expand 
\ subroutine 






•INITIALIZE \ 
r THE REGISTERS^ 

TO BUILD A 
V WRITE > 
\ RESPONSE / 



•INITIALIZE 
r THE REGISTERS 

FOR A READ 
V INITIAL 



•INITIALIZE 
'THE REGISTERS 

FOR A WRITE 
V INITIAL 






EXECUTE THE 

EXPAND 
SUBROUTINE 



Kftrg A3 

ND / 

/ RE 

r THE . *f f 

ND V 

TINE X 




EXCP - 

EXECUTE THE 

CHANNEL 

PROGRAM 



< RESTORE THE \ 
REGISTERS > 



f 

f EX I T TO THE \ 

Itcam DISPATCHERl 
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Chart KA-2 ACTIVATE-I/O GENERATOR SUBTASK 



( N 

I EXPAND J 



SET THE ADDRESS 

OF THE MODEL 

CHANNEL PROGRAM 

TABLE 




/ GET THE ^ 
r OFFSET FOR 

THE EXPANDER 
^ SUBROUTINE 



t.KA-S AS 



EXECUTE THE 

EXPANDER 
SUBROUTINE 



SET THE OP CODE 



/ SET THE X 

^PROVIDED FLAGS > 



POINT TO THE 

NEXT ENTRY IN 

THE MODEL TABLE 



/ ^ 

•i RETURN 1 



f EXPANDER J 



KA-2.E3 



f RETURN J 
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Chart LA OPEN ERROR HANDLER 




SAVE AND 

RESTORE THE 

REGISTERS 



SPECIFY THE 

OPTIONS 

AVAILABLE 



SYNCH - GO 

TO THE USER 

EXIT 



Z> 




670 



Chart LB DISK MESSAGE QUEUES OPEN ROUTINE - LOAD 1 




INITIALIZE THE 
DEB 






1 XCTL TO > 
I IGG0I93I J 
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Chart LC DISK MESSAGE QUEUES OPEN ROUTINE - LOAD 2 



/ SET THE ^ 

/ APPROPRIATE 
< ERROR RETURN 
X CODE 




SET THE QUEUING 

CONSTANTS FOR 

REUSABLE AND 

NONREUSABLE 

DISK QUEUING 



DETERMINE THE 

SIZE OF THE IOB 

AREA 



GETMAIN 

MAIN 

STORAGE FOR 

AN IOB AREA 






CXCTL TO \ 
IGG01933 I 



CXCTL TO \ 
I GG 10934 J 
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Chart LD DISK MESSAGE QUEUES OPEN ROUTINE - LOAD 3 




LOAD TCAM 

DISPATCHER 

WITH 

SUBTASK 

TRACE 



LOAD THE 

REGULAR 

TCAM 

DISPATCHER 

( IGG0I9RB) 
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Chart LE LINE GROUP OPEN ROUTINE - LOAD 1 



CGfl 1,935 , ^ 

C ente " ) 



Xbuffers^v 
for receive^ 
operations 


S.NO 




ASSIGN BUFFERS 
FOR RECEIVE 
OPERATIONS 






|YES 









/buffers\. 

FOR SEND ^ 
OPERAT I ONS 


S.NO 




ASSIGN BUFFERS 

FOR SEND 

OPERAT I ONS 






JYES 









^BUFFERS FOrS 
DATA TRANSFER 


v NO 




ASSIGN BUFFERS 
FOR DATA 
TRANSFER 






[YES 









IS A PCI 

VALUE 

SPECIFIED 



MAKE BUFMAX x 

THE LARGER OF 

BUFIN OR BUFOUT 



CALCULATE THE 

NUMBER OF LINE 

UNITS IN A 

BUFFER 



CALCULATE THE 

NUMBER OF LINES 

IN THIS LINE 

GROUP 



GETMA I N 

MAIN 

STORAGE FOR 

THE DEB 




INITIALIZE THE 

DEB AND THE DEB 

EXTENTS 




JE\ ( XCTL TO ^ 

JE >— M IGG0I933 J 



CALCULATE THE 
ADDRESS OF A 
TYPICAL ENTRY 
. IN THE DCT 



CLEAR A 

REGISTER FOR 

THE CHANNEL 

PROGRAM SIZE 



/ 

CXCTL TO , > 
IGG0I936 ' 1 
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Chart LF LINE GROUP OPEN ROUTINE - LOAD 2 





SET THE SIZE OF 

THE CHANNEL 

PROGRAM 



ALLOW 2 CCWS 

FOR THE 

READ/SKIP LOOP 

AND THE BRANCH 

TO DEVICE TEST 



SET THE CHANNEL 
PROGRAM SIZE 

FOR THE DEVICE 
BEING OPENED 



2741 


, 1050 


, 1030 


TWX, 


2740, 


1 15A, 


BSC, 


2260 


LOCAL, 


OR 7770 





DETERMINE THE 

SIZE OF THE LCB 

AREA 



GETMA 1 N 

MAIN 

STORAGE FOR 

THE LCB 




GET THE ADDRESS 

OF THE 

DESTINATION QCB 

FOR THIS LINE 



PUT THE SEND 

SCHEDULER 5TCB 

IN THE STCB 

CHAIN OF THE 
DESTINATION QCB 




CXCTL TO \ 

IGG0I933 I 
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Chart LG LINE GROUP OPEN ROUTINE - LOAD 3 



CLEAR AN LCB 




GET THE 

DESTINATION QCB 

ADDRESS FOR 

THIS LINE 



SEND ^ 

RITY 

1 F I ED^- 


yes 




MOVE THE SEND 

SCHEDULER STCB 

TO THE STCB 

CHAIN OF THE 

LCB 






JNO 
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Chart LH LINE GROUP OPEN ROUTINE - LOAD 4 



C ewt5b ; 



> 



MODIFY THE UCB 

ERRORTAB AND 

ATTENTION 

FIELDS 
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Chan LI LINE GROUP OPEN ROUTINE - LOAD 5 



LOAD THE 

TCAM 

DISPATCHER 




LOAD THE 

STARTUP 

MESSAGE 

ROUT I NE 

( IGG0I9R6) 



LOAD THE 

2260 LOCAL 

RECE I VE 

SCHEDULER 
( IGG0I9Q1 ) 



LOAD THE 
BUFFERED 
TERMINAL 
SCHEDULER 
( IGG0I9RD) 
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Chart LJ LINE GROUP OPEN ROUTINE - LOAD 6 



f ENTER J 



LOAD THE 

SEND 
SCHEDULER 
UGG0I9R4) 




LOAD THE 

PCI 
APPENDAGE 
( IGG0I9RN) 



LOAD THE 

APPROPR I ATE 

LINE END 

APPENDAGE 



LOAD THE 

SPEC I AL 

CHARACTERS 

FOR THE 
LINE GROUP 



EXCP - 
START 1 /O 
ON A LINE 




LOAD THE 

DIAL 
SCHEDULER 
( IGG0I9RI ) 
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Chart LK . LINE GROUP OPEN ROUTINE - LOAD 7 



TIME - GET 
THE CURRENT 
TIME OF DAY 




INITIALIZE THE 

APPROPR I ATE 

ENTR I ES 



TIME - GET 
THE CURRENT 
TIME OF DAY 




HAVE 28 ^S.NO 

SECONDS 

ELAPSED 



'SET THE DELA 

COMPLETED 
V INDICATOR 



^> 






WTO - WRITE 

AN ERROR 

MESSAGE 




/XCTL TO SYSTEM^ 
I OPEN 1 
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Chart LM RETURN INTERFACE ROUTINE 



CU2LM 
ENTER J 



/ RESTORE \ 
/ REGISTERS 2 ^ 
[THROUGH 12 AND 



/ SET THE ^ 

[RETURN BYTE IN 
\THE SAVE AREA> 



c ^ 

I RETURN I 
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Chart LI DISK MESSAGE QUEUES CLOSE ROUTINE 



IGGflapgQ ^^ 

f ENTER J 



GET THE FIRST/ 

NEXT DEB 

ADDRESS FROM 

THE TCB CHAIN 



GET THE DCB 

ADDRESS FROM 

THE DEB 




^ET A FLAG 

• TO INDICATE 

< MORE MESSAGE 

\QUEUES to be 

X CLOSED 





ZERO THE AVT 

POINTER IN THE 

DISPATCHER 

PREFIX 



FREEMAIN 

ALL TRACE 

TABLES 



FREEMAIN 

THE MSG 

QUEUES AND 

LINE 

BUFFERS 



FREEMAIN 

THE CROSS 

REFERENCE 

TABLE 



r SET THE ID ^ 
AND TTR FOR 

XCTL TO 
CHECKPOINT 
CLOSE > 



FREEMAIN 
IOBS FOR 
THIS DCB 



<z 



Zto\ 
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Chart L4 LINE GROUP CLOSE ROUTINE - LOAD 1 



f ENTER J 



IS THE MCP 

SCHEDULED FOR 

ABEND 



ARE 

THERE ANY 

APPL I CAT 1 ON 

PROGRAMS 



IS THE 

APPL 1 CAT I ON 

PROGRAM 

ACTIVE 



IS THE 

r PGM ALREADY 

SCHEDULED FOR 

ABEND 




ARE _ 
THERE MORE ^VNO 
APPLICATION 
PROGRAMS 



ISSUE EXCP 

ON THE 
FIRST LINE 



WAIT FOR 

EXCP TO 

COMPLETE 



CXCTL TO ^ 
IGG02036 I 
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Chart L5 LINE GROUP CLOSE ROUTINE - LOAD 2 



f ENTER J 





INCREMENT THE 

COUNT OF TCAM 

DEBS 





ZERO THE AVT 

POINTER IN THE 

DISPATCHER 

PREF I X 



FREEMA 1 N 

THE CROSS 

REFERENCE 

TABLE 



GET THE ADDRESS 

OF THE CURRENT 

DEB 



v^IS THERE A^s 
C TYPE III ^ 
^S^ ADAPTER ^S 


YES 




FREEMA IN 

THE LCBS 

FOR LINES 

IN THIS 

LINE GROUP 










|NO 




' 


DISABLE ALL 

LINES IN THE 

LINE GROUP 






REMOVE THE 

LINES FROM THE 

CROSS REFERENCE 

TABLE 












WAIT FOR 
THE DISABLE 
TO COMPLETE 






RECHAIN THE 

CROSS REFERENCE 

ENTR 1 ES 










1 






I 


IOSGEN - TO 
RESET THE 
ERROR AND 
ATTN TABS 

IN THE UCB 




'XCTL TO SYSTEM^ 
CLOSE 
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Chart L6 CHECKPOINT CLOSE ROUTINE 



I ENTER J 



GET THE AVT, 

CVT. AND 

CHECKPOINT WORK 

AREA 




SET THE FLAG IN 

THE CONTROL 

RECORD; SET UP 

THE CCW 



GET THE 

CONVERSION 

ROUTINE 



CONVERT 

REAL TTR TO 

MBBCCHHR: 



GET THE ADDRESS 

OF THE 
CHECKPOINT WORK 

AREA FROM 

AVTCKELE 



DELETE - 

DELETE THE 

CHECKPOINT 

DISK END 

APPENDAGE 



/ DETERMINE 
f THE NEXT 

ENTRY IN THE 
V WHERE-TO-GO 
\ TABLE 




GET THE LENGTH 

OF THE 

CHECKPOINT WORK 

AREA 



> 



/ UPDATE THE \ 
< PARAMETER > 
X REGISTERS / 



CXCTL TO THE \ 
NEXT CLOSE I 
MODULE I 



FREEMAIN - 

FREE UP THE 

CHECKPOINT 

WORK AREA 




EXCP - 

WRITE THE 

CONTROL 

RECORD 



WAIT - FOR 

I/O TO 

COMPLETE 
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Chart L7 GET/PUT AND READ/WRITE OPEN EXECUTOR - LOAD 1 



«ifl !„?.*&. „.. ^ 

f ENTER j 







PROCESS FOR 

ABNORMAL 
TERMINATION 



SET UP TO XCTL 

TO IGG0I933 FOR 

ERROR 

PROCESSING 




GET THE AVT 

ADDRESS FROM 

THE CVT 



© 



GET THE QNAME 

ADDRESS FROM 

THE OPEN WORK 

AREA 



BUILD A 

TERMNAME TABLE 

SCAN PARAMETER 

FOR THE USER 

INTERFACE RTN 



t VILAS 



ACTIVATE IEDQAI 

TO SEARCH THE 
TERMNAME TABLE 




GETMA I N 

MAIN 

STORAGE FOR 

THE DEB 



INITIALIZE THE 

DEB AND PLACE 

IT IN THE TCB 

CHAIN 



GETMA I N 
STORAGE FOR 

ACCESS 

METHOD WORK 

AREA 



INITIALIZE THE 

ACCESS METHOD 

WORK AREA 



LINK THE ACCESS 

METHOD WORK 
AREA TO THE DEB 



DETERMINE THE 

ACCESS METHOD 

ROUTINE 

REQUIRED 



LOAD THE 
APPROPR I ATE 

MODULE * 

PUT ADDR IN 

THE DCB 



LOAD THE 

POINT 

MODULE « 

PUT ITS 

ADDR IN DCB 



LOAD THE 

CHECK 

MODULE S 

PUT ITS 

ADDR IN DCB 





BUILD A SPECIAL 

ELEMENT FOR THE 

OPEN /CLOSE 

SUBTASK 



t SB, ft) 



ACTIVATE THE 

OPEN /CLOSE 

SUBTASK 



WAIT FOR 

THE 

OPEN /CLOSE 

SUBTASK TO 

TERMINATE 




SAVE THE 
REGISTERS FOR 
LOAD 2 IN THE 

WORK AREA 



SET UP THE 

WHERE-TO-GO 

TABLE 




GET THE ADDRESS 

OF THE OPEN 

WORK AREA 



© 



SET UP TO XCTL 

TO THE NEXT 

ROUTINE 



C <CTL ) 
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Chart L8 GET/PUT AND READ/WRITE OPEN EXECUTOR - LOAD 2 




3 



INITIALIZE 

REGISTERS 

FROM THE OPEN 

WORK AREA 



7 



COMPLETE THE 
DEB AND PROCESS 
ENTRY WORK AREA 
INITIALIZATION 



NO^/lS THIS ANNs. 
— — C INPUT DCB J 

|YES 

,/lS A ^S. 

./message on ^s^yes 

cthe destina- ~> ' 

^s. tion qcb s^ 




INITIALIZE THE 
ERB AND THE SCB 
FOR READ-AHEAD 












BUILD THE AQCTL 
PARAMETER LIST 






NO 






EB Al 




MOVE THE GET 
SCHEDULER STCB 

TO THE 
DESTINATION QCB 




1GC102 


TPOST THE ERB 

TO THE DISK 1 10 

QCB 
















^ 


^ 












GETMAIN FOR 

THE LOCATE 

MODE WORK 

AREA 



STORE THE WORK 

AREA ADDRESS IN 

THE DEB 



t.NB-S.A, 



COMPUTE UNITS 

PER BUFFER AND 

STORE THE 

RESULT IN THE 

PCB 




GET THE ADDRESS 

OF THE OPEN 

WORK AREA 



SET UP THE 

WHERE-TO-GO 

TABLE 



SET UP TO XCTL 

TO THE NEXT 

ROUTINE 



( >CTL ) 
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Chart L9 GET/PUT AND READ/WRITE CLOSE EXECUTOR - LOAD 1 



iGGjiaua 

C "- ) 







LS&L 




' INITIALIZE ^ 

THE CONTROL 

BLOCK BASE 

REGISTERS 



SET THE EOM 

INDICATOR IN 

THE BUFFER 

PREF I X 



PUT THE MH 

ADDRESS IN THE 

BUFFER PREFIX 




BUILD A SPECIAL 
ELEMENT FOR 
OPEN /CLOSE 



NQPEQ 



i . AND ■ 
TPOST THE AQCTL 
PARAMETER LIST 



SPECELEM 



BUILD A SPECIAL 
ELEMENT FOR 
OPEN/CLOSE 



JtfU£. 



MOVE THE 

ELEMENT ACROSS 

THE PARTITION 

BOUNDARY 



SET UP 
PARAMETERS TO 
POST THE MCP 
ECB COMPLETE 
WITH SVC 102 



ROSIER., 



SB, At 



SVC 102 TO POST 

THE MCP ECB 

COMPLETE 



WAIT FOR 
OPEN/CLOSE 
SUBTASK TO 

COMPLETE 



mGnmmJmh 



DETERMINE THE 

LOADED ACCESS 

METHOD MODULES 



DELETE THE 
LOADED 
MODULES 



pEEWA.T 

FREEMAIN 

THE ACCESS 

METHOD WORK 

AREA 




L.0.QPX 



PREPARE TO 

TPOST BUFFERS 

TO BUFFER 

RETURN QCB 



EREEPEB, f 



REMOVE THE DEB 

FROM THE TCB 

DEB CHAIN 





V ES 




DEO 




GET ^< 

LER ON 

QCB yl> 




REMOVE GET 
SCHEDULER STCB 
FROM THE CHAIN 






NO 
























FREEMAIN 

THE LOCATE 

MODE WORK 

AREA 





S. YES , 


XlS THIS AN^ 

output dcb 
Jyes 


S^NO 






NB-2 Al 




IEDQNB05 


=01 NT 
FIED^ 


TAKE A 
CHECKPOINT 






NO 






















EB' A I 



POST THE 

CLOSEDOWN ECB 

COMPLETE 



RESTORE THE DCB 

TO ITS PRE-OPEN 

STATUS 



CXCTL TO \ 
IGG02047 1 
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Chart L 1 GET/PUT AND READ/WRITE CLOSE EXECUTOR - LOAD 2 



'Gtfrflgflt? ^ 

f ENTER J 



SHLCK81 




INCREMENT TO 

THE NEXT LCB 

AND TO THE NEXT 

WHERE-TO-GO 

TABLE ENTRY 




RESET THE WTG 

AND DCB LIST 

POINTERS TO THE 

START OF THE 

LISTS 




INCREMENT TO 

THE NEXT DCB 

AND TO THE NEXT 

WHERE-TO-GO 

ENTRY 



• SAVE THE \ 
riNPUT REGISTERS) 
X 5 THROUGH 8 / 



GET TCB, DEB, 
OPEN WORK AREA, 

PROCESS DCB, 
AND THE PROCESS 

DEB ADDRESSES 




CHLGKQ6I 



JMO 


GET THE DCB 
ADDRESS 









NT A3, 



GET DESTINATION 

QCB ADDRESS AND 

RESET THE 

PROCESS ENTRY 

USE FLAG 



< RESTORE \ 
REGISTERS 5 > 
THROUGH 8 / 



CHlCKOfeg t 



CLEAR THE ID IN 

THE WHERE-TO-GO 

TABLE 




SHUCttflS, 



GET THE NEXT 

DEB FROM THE 

CHAIN 



CHICKQ8 t 



GET THE ADDRESS 

OF THE LCB AND 

OF THE SCB 




SET UP THE SVC 

103 PARAMETER 

LIST TO TPOST 

THE LCB TO 

ITSELF 



Laauu 



TPOST LCB TO 
ITSELF i PUT IT 
ON READY QUEUE 




© 



Program Organization 689 



Chart MA CHECKPOINT OPEN ROUTINE 






GET THE AVT 

ADDRESS FROM 

THE DC6 



GET THE DCB 

ADDRESS FROM 

THE PARAMETER 

LIST 



GET CKREQS AND 

CPRCDS FROM THE 

INTRO MACRO 



CALCULATE THE 

SIZE NEEDED FOR 

THE CHECKPOINT 

WORK AREA 



GETMAIN - 

PUT THE 

WORK AREA 

•ADDRESS IN 

AVTCKGET 



INITIALIZE THE 

CHECKPOINT WORK 

AREA 



SET UP THE I OB 

AND THE CHANNEL 

PROGRAM 



FILL IN THE 

APPENDAGE TABLE 

IN THE DEB 

PREF I X 



LOAD - THE 

CHECKPOINT 

DISK END 

APPENDAGE 



• G>— 



CHECKPOINT 
CONTROL 
RECORD 




.YES 


WTO - 


SEND 






MESSAGE 















SET UP THE ID 
AND TTR FOR A 
WARM RESTART 



GET THE LENGTH 

OF AN 

ENVIRONMENT 

RECORD 



.© 



^VT 



CLEAR THE ^ 

AVTCKGET FIELD 

TO ZERO j 



SET UP THE ID 
AND TTR FOR A 
COLD RESTART 



GETMAIN - 
PUT THE I/O 

AREA AD- 
DRESS INTO 
CKPEXCP 



(XCTL TO NEXT \ 
MODULE IN THE I 
WTG TABLE V 




MOVE THE 

CHECKPOINTED 

VALUE FROM THE 

CONTROL RECORD 

TO AVTNCKPR 




MOVE THE 

CHECKPOINTED 

VALUE FROM THE 

CONTROL RECORD 

TO AVTCPRCD 



•RESTORE THE^ 
'CHECKPO I NTED 
VALUE OF BIT 
< X'04* IN 
\ AVTBIT3 > 




r TURN ON THE^ 1 
•RESTART' 
tFLAG BIT X'Oa- 
IN AVTBIT2 
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Chart MB- 1 CHECKPOINT DISK INITIALIZATION ROUTINE 



IGGJU212 

f ENTER J 



GET THE 

INITIALIZED 

REGISTERS FROM 

THE CHECKPOINT 

' WORK AREA 




MB-£ ft4 



GET ABSOLUTE 
DISK ADDRESS OF 
CONTROL RECORD 



■MB-e„Aa 



CALCULATE THE # 
OF ENVIRONMENT 
RECORD SEGMENTS 
THAT CAN BE PUT 
IN THE DATA SET 



CALCULATE THE 
RELATIVE SIZE 
OF ENVIRON REC- 
ORD SEGMENTS S 
INCIDENT RECS 



GET NUMBER OF 
CKREQ RECORDS 

REQUIRED 

(CKREQS ON THE 

INTRO MACRO) 



CALCULATE THE # 
OF RECORDS THAT 
CAN BE USED FOR 

ENV I RONMENT 
RECORD SEGMENTS 



DIVIDE * OF 
RECORDS BY # OF 
SEGMENTS NEEDED 

FOR ONE ENVI- 
RONMENT CKPOINT 




SAVE THE 

MAXIMUM NUMBER 

OF ENVIRONMENT 

CHECKPO 1 NT 

RECORDS 



SAVE THE VALUE 

SPECIFIED IN 

CPRCDS 




INITIALIZE THE 

COUNT AREA OF 

THE RECORD 



WTO - SEND 

THE IED009I 

MESSAGE 



GET THE NUMBER 

OF RECORDS PER 

TRACK 



SUBTRACT I FROM 

THE NUMBER OF 

RECORDS PER 

TRACK (FOR 

CONTROL RECORD) 



PUT THE TTR OF 

THE ENVIRONMENT 

CHECKPOINT IN 

THE CONTROL 

RECORD 



t.MBr.S,, A,l 



WRITE ALL SEG- 
MENTS FOR ONE 
ENVIRON CKPT 



INCREMENT TO 

THE NEXT TTR 

SLOT 



SUBTRACT I FROM 

THE NUMBER OF 

ENVIRONMENT 

CHECKPOINTS 



GET THE NUMBER 

OF CKREQ 

RECORDS PER 

TRACK 




INITIALIZE # OF 
RECORDS TO BE 

WRITTEN ON THIS 
TRACK TO U OF 

CKREQ RECS/TRK 



SAVE THE TTR OF 
FIRST CKREQ 

RECORD AND # OF 
CKREQ RECORDS 
ON 1ST TRACK 



GET THE 

BEGINNING 

ADDRESS OF THE 

CKREQ-TTR TABLE 



A 



GET THE TOTAL 

NUMBER OF CKREQ 

RECORDS TO BE 

WR I TTEN 



INITIALIZE THE 

COUNT AREA OF 

THE RECORD 



MBrS lA 




SAVE THE TTR OF 

THE FIRST 
INCIDENT RECORD 



SAVE THE NUMBER 

OF RECORDS ON 
THE FIRST TRACK 



t, MB-fSnft 



WRITE INCIDENT 

RECORDS ON 
REMAINING SPACE 



PUT THE NUMBER 

OF INCIDENT 
RECORDS IN THE 
CONTROL RECORD 



CLEAR THE 

SECTION OF THE 

CHECKPOINT WORK 

AREA USED BY 

OPEN 



CLEAR THE 

WHERE-TO-GO 

ENTRY 



(XCTL TO THE ^ 
NEXT ENTRY IN I 
THE WTGTABLE/ 
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Chart MB-2 CHECKPOINT DISK INITIALIZATION ROUTINE 



MB-I ,G3,J4,F5 




MB-S rtfl 



SUBTRACT I FROM 

THE NUMBER OF 

RECORDS PER 

TRACK 



MOVE THE 

ABSOLUTE DISK 

ADDRESS FROM 

THE COUNT AREA 

TO THE I OB 



MBTS Ai 



UPDATE ABSOLUTE 

DISK ADDRESS IN 

COUNT AREA 



SUBTRACT ONE 

FROM THE TOTAL 

NUMBER OF 

RECORDS TO BE 

WR I TTEN 



MOVE THE TTR TO 

THE CKREQ-TTR 

TABLE 



GET THE ADDRESS 

OF THE NEXT 
CKREQ-TTR SLOT 




GET THE TTR OF 

THE FIRST 

RECORD ON THE 

NEXT TRACK 



INITIALIZE THE 

NUMBER OF 

RECORDS PER 

TRACK 





CLEAR THE \ 

ADDRESS OF ^ 

THE CHECKPOINT 

WORK AREA > 

AVTCKGET / 



CLEAR THE 

SECTION OF THE 

CHECKPOINT WORK 

AREA USED BY 

OPEN 



CLEAR THE 

WHERE-TO-GO 

ENTRY 



(XCTL TO THE ^ 
NEXT ENTRY IN I 
THE WTG TABLeV 



r I 3 I Cn 3 ■ UELt 

ADDR OF CONVER- 
,S I ON ROUT I NE J 
FROM CVT / 



POSITION THE 

TTR IN REGISTER 





IECPCNVT - 
PUT ABSO- 
LUTE DISK 
ADDRESS IN 
COUNT AREA 



B 
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Chart ME-1 CHECKPOINT/RESTART FROM ENVIRONMENT RECORD ROUTINE 



1GGJUS43 . 



/ GET IN IT- \ 

/IALIZED REGS ^ 

[FROM CKPT WORK 

\AREA; TURN ON/ 

\RESTART SW / 



GET VALUE OF 

INTRO OPERAND 

•CPRCDS'j GET 

CURRENT ENVIRON 

CKPT RECORD 



GET DOWN LEVEL 

FOR RESTART 

( INTRO OPERAND 

RESTART) 



SUBTRACT DOWN 

LEVEL VALUE 

FROM NUMBER OF 

CURRENT RECORDS 




GET THE ADDRESS 

OF THE TTR FOR 

THE RECORD 




SAVE THE 

ADDRESS OF THE 

TTR 



SUBTRACT FROM 

OF AVAILABLE 

RECORDS; SET 

DOWN LEVEL 

VALUE TO I 




TURN ON 

CKPFLAGS BIT 

X'08' ; SET UP 

ID FOR IGG01942 

IN WTG TABLE 



(XCTL TO THE ^ 
NEXT ENTRY IN I 
THE WTG TABLE/ 
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Chart ME-2 CHECKPOINT/RESTART FROM ENVIRONMENT RECORD ROUTINE 



GET THE # OF 

TERMNAME TABLE 

ENTRIES: GET 

THE LENGTH OF 

THE NAMES 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



UPDATE THE 
STATUS FIELDS 

MOVE TO THE 

NEXT FIELD IN 

THE DISK RECORD 



ME-3 A I 



CHECK FOR THE 

END OF THE DISK 

RECORD 




SUBRACT ONE 

FROM THE NUMBER 

OF TERMNAME 

ENTRIES 




•PUT THE I 
f AND TTR FOR 

THE NEXT LOAD 
VI N THE WHERE 

VTO^GO TABLE. 



OR \ 
OAD > 

RE-X 

y 



(XCTL TO THE \ 
NEXT ENTRY IN I 
THE WTG TABLE^ 



t ME-3 A 



CHECK FOR THE 

END OF THE DISK 

RECORD 




t ME-3 At. 



CHECK FOR THE 

END OF THE DISK 

RECORD 




UPDATE MASTER 
QCB AND SEGMENT 
FIELDS; MOVE TO 

NEXT FIELD IN 
DISK RECORD 



ME-3 A I, 



CHECK FOR THE 

END OF THE DISK 

RECORD 



UPDATE PRIORITY 

LEVEL QCB; ADD 

LENGTH; MOVE TO 

THE NEXT DISK 

RECORD FIELD 



t ME-3 A 



CHECK FOR THE 

END OF THE DISK 

RECORD 



UPDATE THE LCB 
FIELDS; MOVE TO 
THE NEXT FIELD 



UPDATE THE DCB 
FIELDS; MOVE TO 
THE NEXT FIELD 



ME-3 Al, 



CHECK FOR THE 

END OF THE DISK 

RECORD 




GET THE NEXT 

PRIORITY LEVEL 

QCB 



TURN ON THE 
•CHKPT' SWITCH; 
GET THE LENGTH 

OF THE LIST; 
UPDATE THE LIST 



t ME-? A I 



CHECK FOR THE 

END OF THE 

RECORD 



O 



694 



Chart ME-3 CHECKPOINT/RESTART FROM ENVIRONMENT RECORD ROUTINE 




ME-2 , B2 , E2 , F3 , E4 , G4 , F5 , K5 



C excp ) 



/ GET THE X 
/ ADDRESS OF > 
Cthe CONVERSION 
\ROUT 1 NE FROM J 

X THE CVT / 



/ SAVE 

/ ISTER 
[ADDRESS 
X AND RESULT 
X POSI 




IECPCNVT - 
GET ABSO- 
LUTE DISK 
ADDRESS 4 

PUT IN I OB 



EXCP - READ 

A RECORD 

SEGMENT 



WAIT - FOR 

I/O TO 

COMPLETE 



ADD ONE 


TO THE 


NO_, 














SET THE TTR TO 

THE FIRST 

RECORD ON THE 

NEXT TRACK 



ADDRESS AND 
BREAK ADDRESS 



PUT LATEST 
INCIDENT TTR 

(FROM ENVIRON- 
MENT REC) IN 

CONTROL RECORD 




WTO - SEND 

THE IED083I 

MESSAGE 



CLEAR THE TTR 
IN THE CONTROL 

RECORD TO 

INDICATE A DISK 

ERROR 



/ ^ 

►I RETURN I 
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Chart MG- 1 CHECKPOINT/RESTART FROM INCIDENT AND CKREQ RECORDS ROUTINE 






/ GET THE \ 

/ INITIALIZA- ^ 
IT I ON REGISTERS 
\ FROM CKPT > 
\ SAVE AREA / 




GET TTR OF THE 
LAST INCIDENT 
RECORD AT THE 

TIME OF THE EN- 
VIRON CKPOINT 



GET THE TTR OF 

THE LAST 

INCIDENT RECORD 

ON THE SAME 

TRACK 



t„„Mfi-,rt,M 



GET THE TTR OF 
NEXT SEQUENTIAL 
INCIDENT RECORD 



G 



■t, .MS-LAS 



GET THE VALUE 

OF THE INTRO 

OPERAND 



© 



GET THE DDNAME 

AND RELATIVE 

LINE NUMBER 

FROM THE 

INCIDENT RECORD 



INITIALIZE FOR 

A LOOP THROUGH 

THE TERMNAME 

TABLE 



© 




GET THE TTR OF 

THE FIRST CKREQ 

RECORD 



GET THE 

ADDRESSES OF 

THE TERMINAL 

ENTRY, THE QCB, 

AND THE DCB 



V 



MOVE IN THE^ 
ID AND TTR 
FOR THE NEXT 
CHECKPOINT 
PPEN MODULE; 









jr DO ^N. 

^^DDNAME AND ^"v, 

C RLN = THE J 

^V CKPT / 

^N. VALUE^^ 


NO 


GET THE NEXT 
TERMNAME ENTRY 








YES 








PUT THE LINE 
STATUS IN 




X^IS THIS THEV. 
C LAST ENTRY IN > 
^S,. THE TABLE>^ 


LINE 


OPEN 





Q 



XCTL TO THE 
NEXT ENTRY 
THE WTG TABLE 



D 
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Chart MG-2 CHECKPOINT/RESTART FROM INCIDENT AND CKREQ RECORDS ROUTINE 



GET THE NUMBER 

OF CKREQ 

RECORDS ON THE 

FIRST TRACK 



<^. 



• TURN ON THE^ 
/•CKREQ* FLAG \ 
[lN THE CONTROL > 
\ RECORD / 






' GET THE ^ 

FIRST ENTRY 

IN THE 

CKREQ-TTR 

k TABLE > 



MS- 4 A& 



MOVE THE TTR 

AND TERMNAME 

OFFSET TO THE 

CKREQ-TTR TABLE 



GET THE NEXT 

ENTRY IN THE 

TABLE 




GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



MQ-^ h\ 



GET THE TTR OF 

THE NEXT CKREQ 

RECORD 



SUBTRACT ONE 

FROM THE NUMBER 

OF CKREQ 

RECORDS 





UPDATE THE 

SEQUENCE 

NUMBERS , D I SK 

POINTERS, AND 

MESSAGE COUNT 



GET THE ADDRESS 

OF THE OPTION 

FIELD IN THE 

DISK RECORD 



MQ-,3 ft! 
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Chart MG-3 CHECKPOINT/RESTART FROM INCIDENT AND CKREQ RECORDS ROUTINE 



f OPTIONS J 



MG-2..J4 



GET THE NUMBER 

OF OPTION 

ENTRIES; GET 

THE ADDRESS OF 

THE FIRST ENTRY 



GET THE ADDRESS 
OF THE OPTION 

ENTRY j GET THE 
LENGTH OF THE 
OPTION ENTRY 




GET THE ADDRESS 

OF THE NEXT 

OPTION 

CHARACTERISTICS 

TABLE 



ADD 1 TO THE 
INDEX FOR ENTRY 

OFFSETS: SUB- 
TRACT I FROM # 
OF ENTRIES 




MOVE THE ENTRY 

TO THE OPTION 

TABLE 



GET THE ADDRESS 

OF THE NEXT 

ENTRY IN THE 

DISK RECORD 



( TEB " ) 



MG-2.HI 



[SAVE REGISTERS 



GET THE ADDRESS 

OF THE TERMNAME 

TABLE 



* NT A3 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



f RETURN J 
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Chart MG-4 CHECKPOINT/RESTART FROM INCIDENT AND CKREQ RECORDS ROUTINE 



CEZ) 



MG-I ,GI 
MG-2.DI 



[SAVE REGISTERS 



GET ADDRESS OF 

CONVERSION 

ROUTINE FROM 

CVT{ POSITION 

TTR IN REGISTER 



GET THE ADDRESS 

OF THE DEB; GET 

THE ADDRESS FOR 

CONVERSION 

RESULT 



IECPCNVT - 

CONVERT TTR 

TO ABSOLUTE 

DISK ADDR 




MOVE '1ED0851 
CHECKPOINT DISK 

ERROR' INTO 
MESSAGE BUFFER 



( ™ ) 




MG-I ,FI 
MG-2.G2 


ADD ONE TO THE 
TTR 




K NO 


EXCP - 


- READ 
















WAIT - FOR 

1 /O TO 

COMPLETE 













SET THE TTR TO 

THE FIRST 

RECORD ON THE 

NEXT TRACK 



INITIALIZE THE 

TTR OF THE LAST 

RECORD ON THE 

TRACK 



[ RETURN J 





MOVE 'CKREQ 

RECORD IGNORED' 

INTO MESSAGE 

BUFFER 



MOVE ' INCIDENT 

RECORD IGNORED' 

INTO MESSAGE 

BUFFER 



/ > l 

►I EXIT TO TTR 1 



MG-4.A4 
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Chart MJ- 1 CHECKPOINT CONTINUATION RESTART ROUTINE 




LOAD - LOAD 

THE 

IGG0I9Q8 

MODULE 



,08 fit, 



IGG0I9Q8+I6 



INITIALIZE 

REGISTERS FOR 

IGG0I945 



. © 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



.oa-ju 



■MJ.-3.iM, 



CLEAR THE 

MESSAGE COUNT 

IN THE QCB TO 

ZERO 



MOVE THE RECORD 

NUMBER FROM 

QCBINTLF TO THE 

CPB 



CLEAR THE 

INTERCEPT FEFO 

CHAIN POINTERS 

IN THE QCB TO 

ZERO 




t.„ HU-3. AS 



TO CHAIN FEFO 

QUEUE TO 

INTERCEPT QUEUE 



MOVE THE RECORD 

NUMBER FROM 

QCBLFEFO TO THE 

CPB 



CLEAR THE FEFO 

QUEUE POINTERS 

TO ZERO 



MOVE THE RECORD 

NUMBER OF FIRST 

HEADER IN THE 

FIFO CHAIN TO 

THE CPB 



GET THE NEXT 

ENTRY IN THE 

TERMNAME TABLE 



DECREMENT THE 

NUMBER OF 

ENTRIES BY ONE 




MW-3 AS 



TO INDICATE END 

OF UNSER VICED 

FEFO CHAIN 





GET THE ADDRESS 

OF THE NEXT 

PRIORITY QCB 



Restore the\. 
/ avtea and \ 
ovtsave2 fields^ 



RETURN THE CPB 

TO THE CPB FREE 

POOL 



CLEAR THE 
PRIORITY IN THE 
CPB CLEANUP QCB 



CLEAR THE 

WHERE-TO-GO 

ENTRY FOR THIS 

MODULE 



©/^xctl-totheN 
i next entry in j 
VjHE WTG table/ 



88 A3 



IGG0I9Q8+8 



UPDATE INPUT 

SEQUENCE » IN 

TERMINAL ENTRY 



MJ-3 A£ 



UPDATE THE DES- 
TINATION QUEUE - 
BACK POINTER 



SAVE THIS 

RECORD NUMBER 

N THE QCBINTFF 

FIELD 




MOVE THE RECORD 

NUMBER OF THE 

NEXT UNIT TO 

QCBINTFF 



© 
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Chart MJ-2 CHECKPOINT CONTINUATION RESTART ROUTINE 




QB A3 



UPDATE OUTPUT 

SEQUENCE U IN 

TERMINAL ENTRY 



MOVE THE 

MESSAGE NUMBER 

FOR THE NEXT 

HEADER TO 

QCBDNHDR 




MJ.-3 M 





RECORD # WITH 

AVTRADDR OR 

AVTNADDR 



MOVE THE RECORD 

NUMBER FROM 

QCBDNHDR TO 

CPBADDR 



GET THE SOURCE 

FROM THE BUFFER 

PREF 1 X 



t NT A3 



GET THE 

TERMINAL ENTRY 

ADDRESS 



MW-3 , AS 



UPDATE QBACK 

FOR SOURCE WITH 

LAST BUFFER 




PUT THE MESSAGE 

ON THE FEFO 

QUEUE 



ADD I TO THE 

COUNT OF 

MESSAGES ON THE 

QUEUE 



NO 
















v^IS THISN. 
S^ THE FIRST ^-vYES 

C UNSER VICED > 1 

V. MESSAGE y^ 






NO 






MJ-3 A5 




QMJ92 




WRITE THE FEFO 
CHAIN IN PRE- 
VIOUS MESSAGE 

















© 
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Chart MJ-3 CHECKPOINT CONTINUATION RESTART ROUTINE 



[ CHECK J 




MJ-I ,A3 
MJ-2,Fa 


ADD ONE TO THE 

VALUE OF 

CPBADDR 




08 A4 


IGG0I9Q8+I2 


UPDATE AVTRADDR 
OR AVTNADDR 






[ RETURN J 
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Chart MM-1 CHECKPOINT DISK ALLOCATION ROUTINE 





^NO 








MM-2 A4 


' \% THIS A^S 
PROCESS ENTRY 


ADD THE LENGTH 
OF THE STATUS 
FIELD TO THE 
RECORD LENGTH 




CHECK 


CHECK FOR A 

COMPLETED 

RECORD SEGMENT 






|YES 











W&-M 



CHECK FOR A 

COMPLETED 

RECORD SEGMENT 




GET THE NEXT 

PRIORITY LEVEL 

QCB 
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Chart MM-2 CHECKPOINT DISK ALLOCATION ROUTINE 



DETERMINE THE 

NUMBER OF 

TRACKS IN THE 

CHECKPOINT DATA 

SET 



DETERMINE THE 

SIZE OF THE 
INCIDENT RECORD 
AND SAVE IN THE 
CONTROL RECORD 



( > l ( > * 

I TRACK 1 I CHECK 1 



MM-2, CI 
MM-2.FI 
MM-2, HI 



MM- I, F3 MM- I, 85 
MM-I.H2 MM-I.H5 
MM- I ,A4 



GET THE ADDRESS 

OF THE DEVICE 

CHARACTERISTICS 

TABLE FROM 

CVTZDTAB 




YES 



ADD ONE TO THE 
NUMBER OF 
SEGMENTS 



MM-e <\a 



DETERMINE THE 
NO OF INCIDENT 
RCDS PER TRACK 



USE THE OFFSET 
IN THE UCB TO 

FIND THE PROPER 

ENTRY IN THE 

DCT 



' 

/RETURN TO THE \ 
I ADDRESS IN THE I 
\BRANCH REGISTER/ 



INITIALIZE THE 

RECORD LENGTH 

TO ZERO 



SAVE THE COUNT 

OF INCIDENT 

RECORDS PER 

TRACK IN THE 

CONTROL RECORD 



GET THE COUNT 

OF BYTES PER 

TRACK 



/return TO ADDRA 
I IN BRANCH REG 1 
V^ MINUS 8 I 



DETERMINE THE 
SIZE OF CKREQ 

RECORDS AND 

SAVE THE THE 

CONTROL RECORD 



ADD OVERHEAD TO 
ACTUAL RECORD 
LENGTH TO GET 
RECORD COUNT 
FOR ONE TRACK 



MM-2, A3 



DETERMINE THE 
NUMBER OF CKREQ 
RCDS PER TRACK 



1 

(RETURN TO THE \ 
ADDRESS IN J 
REGISTER \\J 



SAVE THE COUNT 
OF CKREQS PER 
TRACK IN THE 

CONTROL RECORD 



mm- a fta 



FIND THE NUMBER 
OF ENVIRONMENT 
SEGS PER TRACK 



SAVE THE COUNT 

OF ENVIRONMENT 

SEGMENTS ON ONE 

TRACK 



PUT THE ID OF 

IGG0I942 IN THE 

WHERE-TO-GO 

TABLE 



(XCTL TO THE \ 
NEXT ENTRY IN J 
THE WTG i TABLEy 



704 



Chart NA RESIDENT CLOSEDOWN COMPLETION ROUTINE 



(BRANCH TO \ 
DSPDISP H 



f ENTER J 




RESTORE THE 

REGISTERS FROM 

THE SAVE AREA 

POINTED TO BY 

REGISTER 13 



(RETURN TO OS \ 
TERMINATION 1 
ROUTINE / 



SAVE REGISTERS 
(USE REGISTER 
13) ; NEGATE 
REGISTER I 



RESTORE THE 

REGS ITERS FROM 

AVTSAVEI 




I RETURN TO READY 1 
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Chart NA2 NONRESIDENT CLOSEDOWN COMPLETION ROUTINE 




WAIT ON 
MCPS ECB 
(AVTOSECB) 



RB-S ft 



TPOST CLOSEDOWN 

COMPLETION ELEM 

TO READY Q 




/ ^ 

•1 ISSUE ABEND J 



GET THE ADDRESS 

OF THE REUSABLE 

DISK I OB FROM 

THE AVT 

(AVTIOBR) 



GET THE DCB 
ADDRESS FROM 
THE FIRST I OB 



• PUT A X'OO' ^ 

-*-<RETURN CODE IN 

\ REGISTER 15 > 




WTO 

INDICATE 

TASK WHICH 

HAS ABENDED 



f RETURN TO \ 

►I IEDQNA WITH 4 I 

\IN REGISTER 15/ 




(RETURN TO \ 
I EDQNA 1 



© 





TURN ON CLOSE- 
DOWN COMPLETION 
BIT IN CHECK- 
POINT REQUEST 
ELEMENT 



POST - ECBS 

FOR ALL 

ATTACHED 

TASKS 



WAIT - FOR 

TERMINATION 

OF ATTACHED 

TASKS 



• PUT A X'08* ^ 
CRETURN CODE IN 
\ REGISTER 15 > 



C RETURN TO ^ 
IEDQNA I 



GET ADDRESS OF 

THE NONREUSABLE 

DISK I OB FROM 

THE AVT 

(AVTIOBN) 
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Chart NB-1 APPLICATION PROGRAM/CHECKPOINT INTERFACE ROUTINE 



igfiflUB . lEDQjfifl* N M1UP ^ 

f ENTER 1 f ENTER J f ENTER J 



NB-,1 A3 




PUT X'60' IN 

THE KEY FIELD 

OF THE REQUEST 

ELEMENT 



PUT THE ADDRESS 

OF THE DEB 

CHAIN IN THE 

REQUEST ELEMENT 



NB-1 fti 



PUT X ' I ' IN 

THE KEY FIELD 

OF THE REQUEST 

ELEMENT 



PUT THE 
TERMNAME OFFSET 

INTO THE 
REQUEST ELEMENT 



PUT THE CHECK- 
POINT QCB ADDR, 

PRIORITY, AND 
ECB ADDR IN THE 
REQUEST ELEMENT 



SET UP THE 
PARAMETER LIST 
FOR AN SVC 102 



.EEUU 



TPOST REQUEST 

ELEM FOR CKPT 

TO READY QUEUE 



WAIT - FOR 
CHECKPOINT 

TO BE 
WRITTEN TO 

DISK 



/ — V 

/ RESTORE X 
< REGISTERS > 



(RETURN TO THeA 
ADDRESS IN I 
REGISTER 14 J 



NB-1 ,BI ,B2 
NB-2.BI 



r SAVE REGS: 



/QX.1 DEB CHAIN> 

C ADDRESS FOR 

X APPLICATION 

X PROGRAM > 



/GET THE AVTX 
/ADDRESS; GET ^ 
(THE CHECKPOINT 
X WORK AREA > 




GET THE NEXT 

DEB IN THE DEB 

CHAIN 




f RETURN J 
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Chart NB-2 APPLICATION PROGRAM/CHECKPOINT INTERFACE ROUTINE 



EDgNBOS ^ 



L8.K2 
L9.G5 

NB-S A3 



LOCATE THE 

TABLES AND WORK 

AREAS 



GET THE ADDRESS 

OF THE DEB FOR 

THE DCB BEING 

OPENED OR 

CLOSED 



♦ NT A3, 



GET THE ADDRESS 

OF THE PROCESS 

ENTRY 




GET THE NUMBER 

OF CKREQ 
RECORDS ON DISK 



(RETURN TO THeA 
ADDRESS IN J 
REGISTER 14 1 




GET THE 

BEGINNING OF 

THE CKREQ-TTR 

TABLE 




GET NEXT ENTRY 
IN THE TABLE; 
SUBTRACT ONE 

FROM THE COUNT 
OF ENTRIES 



SET UP THE 
PARAMETER LIST 
FOR SVC 1 02 TO 
MARK CKREQ-TTR 
ENTRY INACTIVE 



5B Al 



MOVE THE STATUS 

FIELD TO THE 
CKREQ-TTR ENTRY 
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Chart ND-1 READY ROUTINE 




GETMAIN - 

GET MINIMUM 

STORAGE FOR 

ON-LINE 

TEST 



FREEMAIN - 

FREE 
MINI MUM 

MAIN 
STORAGE 



COND I T I ONAL 
GETMAIN FOR 
USER'S MAIN 

STORAGE 
REQUIREMENT 



FREEMAIN - 

FREE 

REQUESTED 

MAIN 

STORAGE 




WTO - MAIN 

STORAGE FOR 

ON-LINE 

TEST NOT 

AVAILABLE 




GET THE FIRST 

OR NEXT 

TERMINAL ENTRY 





CHAIN THE ENTRY 

TO THE PREVIOUS 

ENTRY 




r 



GET THE FIRST 
OR NEXT BLOCK 
IN THE CHAIN 




PUT IT IN THE 

TIME DELAY 

QUEUE 



/ SET THE \ 
/ ' INVITATION \ 
IL1ST' SWITCH IN) 
\THE CKPT workx 

\ AREA TO 0/ 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 14/ 
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Chart ND-2 READY ROUTINE 





ATTACH - 

THE 

CHECKPOINT 

EXECUTOR 

I IEDQNF) 



PUT THE ENVI- 
RONMENT CHECK- 
POINT REQUEST 
ELEMENT ON TIME 
DELAY QUEUE 



<5H 



FREEMAIN - 
FREE THE 
I/O AREA 



CLEAR THE OPEN 

WORK AREA IN 

THE CHECKPOINT 

WORK AREA 




LOAD - THE 
IEDQNX 
MODULE 



GET THE TTR OF 

THE FIRST 
INCIDENT RECORD 



GET THE TTR OF 

THE NEXT 
INCIDENT RECORD 



IECPCNVT - 

CONVERT THE 

TTR TO AN 

MBBCCHHR 





EXCP - READ 

AN INCIDENT 

RECORD 



WAIT - FOR 

I/O TO 

COMPLETE 




WTO - SEND 

THE IED085I 

MESSAGE 



,MT A3 



GET THE TER- 
MINAL ENTRY FOR 
THE CKPT RECORD 



MOVE THE DATA 

TO THE OPERATOR 

CONTROL WORK 

AREA 



POST - THE 

OPERATOR 
CONTROL ECB 



WAIT - FOR 
OPERATOR 

CONTROL TO 
COMPLETE 



UPDATE THE TER- 
MINAL STATUS, 

SEQUENCE 
NUMBERS, AND 
OPTION FIELDS 




710 



Chart NF CHECKPOINT EXECUTOR ROUTINE 




DELETE - 
THE MODULE 
JUST LOADED 



USE THE RETURN 

CODE FOR THE 

OFFSET 



DELETE - 
THE MOCULE 
JUST LOADED 



WAIT - FOR 
THE DISK 

I 10 ECB TO 
BE POSTED 



© 



© 



MODULES 


LOADED BY THIS ROUTINE 


OFFSET 


MODULE NAME 





1 EDQNG 


8 


IEDQNH 


32 


I EDQN J 


40 


IEDQNK 


48 


1 EDQNM 


56 


IEDQNK 


64 


1 EDQNO 


72 


IEDQNP 


80 


1 EDQNQ 


88 


IEQDNR 


96 


1EDQNS 
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Chart NG BUILD INCIDENT RECORD FOR MH ROUTINE 



ENTER J 



GET TERMINAL 
OFFSET FOR. TER- 
MINAL CURRENTLY 
ASSOCIATED WITH 
THE LCB 




GET THE ADDRESS 

OF THE TERMNAME 

TABLE FROM THE 

AVT 



NT A3 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 




/ PUT THE \ 

/offset of THE> 

< NO INCIDENT 

\rcds routine y 

X IN REG 15 • 



(RETURN TO THE ^ 
ADDRESS IN I 
REGISTER «47 



SUBTRACT ONE 
FROM. THE COUNT 
OF RECORDS! GET 



GETMAIN - 

FOR DISK 

RECORD; PUT 

ADDRESS IN 

CKPLDRB 




PUT THE 

OFFSET OF THE 

k NO CORE ROUTINE, 

IN REGISTER 




PUT A KEY OF 
X*0' AND THE 

TERMNAME OFFSET 
IN TRMSTATE 

INTO THE RECORD 



• SET BIT IN \ 
'CKPLREB FIELD^ 
TO INDICATE NO 
^RECORD BUILT > 




/ PUT THE \ 

'OFFSET OF THE^ 
NOTIFICATION 
V ROUTINE IN J 
\REGISTER 15/ 



GET THE START 
AND COUNT OF 

OPTION ENTRIES; 

GET THE OPTION 
LENGTH TABLE 



(RETURN TO THE \ 
ADDRESS IN 1 
REGISTER 14 t 




GET THE LENGTH 

OF THE OPTION 

FIELD AND MOVE 

IT TO THE DISK 

RECORD 



MOVE TO THE 

NEXT FIELD IN 

THE D 1 SK RECORD 



GET NEXT OPTION 

OFFSET AND NEXT 

LENGTH; 

SUBTRACT ONE 

FROM THE COUNT 




PUT THE \ 

OFFSET OF THE^ 

I /O QUEUE 

MANAGER IN / 

.REGISTER 15/ 



(RETURN TO THE \ 
ADDRESS IN 1 
REGISTER 14 I 
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Chart NH BUILD INCIDENT RECORD FOR TCHNG ROUTINE 




•PUT OFFSET 
r OF NO I NCI 

DENT RECORDS 
V ROUTINE 
\REGISTER 



i> 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 14-V 



SUBTRACT ONE 

FROM THE COUNT 

OF RECORDS 



GET TERMNAME 
OFFSET FROM 
REQUEST ELEMj 
GET TERMNAME 
TABLE ADDRESS 



♦ NT A3 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



GET THE LENGTH 

OF THE INCIDENT 

RECORD 



GETMAIN - 

FOR DISK 

RECORD; PUT 




PUT KEY FIELD 
OF X'04', TERM 
OFFSET, SEQ #S, 

4 TERM STATUS 
FIELD IN RECORD 




GET START OF 
OPTION ENTRIES; 
GET COUNT; GET 

OPTION LENGTH 
TABLE 




/ PUT THE X 

/OFFSET OF THE\ 
(NO CORE ROUTINE} 
\ IN REGISTER / 



GET THE LENGTH 

OF THE FIELD 
AND MOVE IT TO 
THE DISK RECORD 



MOVE TO THE 

NEXT POSITION 

IN THE DISK 

RECORD 



GET THE NEXT 
OPTION ENTRY 

OFFSET; 

SUBTRACT ONE 

FROM THE COUNT 




PUT THE \ 

OFFSET OF THE^ 

I /O QUEUE 

MANAGER IN > 

REG I STER I 5/ 



(RETURN TO THE \ 
ADDRESS IN ) 
REGISTER 14 I 



(RETURN TO THE \ 
ADDRESS IN 1 
REGISTER 14 1 
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Chart NJ INCIDENT CHECKPOINT FOR OPERATOR CONTROL ROUTINE 




PUT THE 

OFFSET OF THE 

INCIDENT 

ROUTINE IN 

REGISTER I: 




SUBTRACT ONE 

FROM THE COUNT 

OF INCIDENT 

RECORDS 



GETMAIN FOR 

AREA TO 

BUILD A 

RECORD IN 




PUT THE 

OFFSET OF NO 

MAIN STORAGE 

ROUTINE IN 

EGISTER I 




GET THE 

OPERATOR 

CONTROL WORK 

AREA ADDRESS 

FROM THE AVT 



PUT A X' 10' IN 

THE KEY FIELD 

OF THE DISK 

RECORD 



MOVE INFORMA- 
TION FROM OPER- 
ATOR CONTROL 
WORK AREA TO 
DISK RECORD 




CONVERT THE UCB 

ADDRESS TO 

DDNAME AND 

RELATIVE LINE 

NUMBER 



/ PUT THE X 

'OFFSET OF THE> 

I /O QUEUE 
V MANAGER IN J 
\REGISTER I5X 



(RETURN TO THE \ 
ADDRESS IN J 
REGISTER 14/ 
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Chart NK-1 ENVIRONMENT CHECKPOINT ROUTINE 



CBQNIS , , ^ 
ENTER J 



GET THE LENGTH 

OF THE 

ENVIRONMENT 

RECORD SEGMENT 




GETMAIN 

MAIN 

STORAGE FOR 

THE DISK 

RECORD 






I "A'CH 

XPR 



PUT THE RECORD 

ADDRESS IN 

CKPLDRB 



/ ADD ENTRY X 
/POINT ADDRESSX 
CtO THE RELATIVE) 
\ ADDRESS IN / 

XREG I STER I 3/ 



SET THE ^ 
CHECKPOINT IN 
PROGRESS' BIT> 



' TURN OFF ^ 

THE 

•CHECKPOINT 

REQUESTED* 

k BIT J 



(RETURN VIA \ 
REGISTER 13 1 




MOVE THE AVT 

DATA INTO THE 

DISK RECORD 



/ PUT THE ■ \ 

•OFFSET TO THE\ 
(NO CORE ROUTINE) 
\ IN REGISTER / 



UPDATE THE 

POINTER IN THE 

DISK RECORD 



(RETURN VIA ^ 
REGISTER 14 J 



GET THE 

TERMNAME TABLE 

ADDRESS FROM 

THE AVT 



GET THE COUNT 
AND LENGTH OF 
THE TERMNAME 
TABLE ENTRIES 



GET THE ADDRESS 

OF THE FIRST 

TERMINAL TABLE 

ENTRY 



INVERT THE 

CONTROL 

SWITCHES FOR 

THE QCB AND 

INVITATION LIST 



GET THE 

TERMINAL ENTRY 

ADDRESS 




GET THE LENGTH 

OF THE STATUS 

FIELD 



GET THE NEXT 

TERMNAME TABLE 

ENTRY 



' NK-3 a; 



CHECK THE 

REMAINING DISK 

RECORD SPACE 



SUBTRACT ONE 

FROM THE COUNT 

OF ENTRIES 



MOVE THE 

TERMINAL STATUS 

FIELD TO THE 

DISK RECORD 




UPDATE THE 

POINTER TO THE 

NEXT DISK 

RECORD 



PUT X • I C • IN 

THE DISK RECORD 

KEY FIELD 
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Chart NK-2 ENVIRONMENT CHECKPOINT ROUTINE 




GET THE LENGTH 

OF THE SEQUENCE' 

NUMBER FIELDS 



,.NlJJr,3, A2 



CHECK THE 

REMAINING DISK 

RECORD SPACE 



MOVE THE 

SEQUENCE 

NUMBERS TO THE 

RECORD 



GET THE LENGTH 
OF THE LCB 
INFORMATION . 



♦ NK-3 A? 



CHECK FOR THE 

END OF THE 

RECORD 



MOVE THE LCB 

INFORMATION TO 

THE RECORD 



GET THE LENGTH 
OF THE DCB 
INFORMATION 



NK-3 A2 



CHECK FOR THE 

END OF THE 

RECORD 



MOVE THE DCB 

INFORMATION TO 

THE RECORD 




GET THE LENGTH 

OF THE 
INVITATION LIST 



CHECK THE 

REMAINING DISK 

RECORD SPACE 



f NK-3 A2 



CHECK THE 

REMAINING DISK 

RECORD SPACE 



t,MK-a,Al 



MOVE THE OPTION 

FIELD TO THE 

DISK RECORD 



UPDATE THE 

OPTION FIELD 

AND DISK RECORD 

POINTERS 





INVERT THE 

CHECKPOINT BIT 

IN THE QCB 






GET THE 


LENGTH 






QCB FIELDS 










NK-3 A? 


GET THE LENGTH 

OF THE MASTER 

QCB FIELDS 






CHECK 


CHECK THE 

REMAINING DISK 

RECORD SPACE 




NK-3.A? 










CHECK 






MOVE THE 

PRIORITY QCB 

FIELDS TO THE 

DISK RECORD 


CHECK THE 

REMAINING DISK 

RECORD SPACE 














MOVE THE MASTER 

QCB FIELDS TO 
THE DISK RECORD 






UPDATE THE 
POINTER TO THE 

NEXT DISK 
RECORD POSITION 














UPDATE THE 
POINTER TO THE 

NEXT DISK 
RECORD POSITION 




>XlS THIS A^v 
CZERO PRIORITY > 
^C QCB Jr 










NO 










1 






GET THE NEXT 

PRIORITY QCB 

ADDRESS 
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Chart NK-3 ENVIRONMENT CHECKPOINT ROUTINE 



f MOVE J f CHECK 1 



COUNT THE 

NUMBER OF 

256-BYTE BLOCKS 

IN THE DATA 



MOVE THE DATA 



UPDATE THE 
ADDRESSES OF 
THE DATA AND 

DISK RECORD 




NK-1 ,G5 

NK-2.D1 ,GI ,H2,A3,G3,G4,F5 



SUBTRACT THE 

LENGTH OF THE 

FIELD FROM THE 

LENGTH OF THE 

DISK RECORD 




SUBTRACT EIGHT 

FROM THE RETURN 

ADDRESS 



(RETURN TO THE A 
ADDRESS IN I 
REGISTER 13 I 



C N 

I WR I TE I 



SUBTRACT THE 
ENTRY POINT 

ADDRESS FROM 

THE BRANCH 

ADDRESS 



PUT A X'20' IN 
THE KEY FIELD 
OF THE RECORD 



SAVE THE 

REGISTERS 1 

CKPSAVE1 




PUT THE OFFSET 

OF THE DISK I/O 

ROUTINE IN 

REGISTER 15 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER I4y 



PUT THE ADDRESS 

OF THE DISK I/O 

QUEUE MANAGER 

IN REGISTER 15 
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Chart NM BUILD CKREQ DISK RECORD ROUTINE 




GETMAIN FOR 

DISK 

RECORD! PUT 

ADDRESS IN 

CKPLDRB 



PUT OFFSET \ 
FOR NO MAIN \ 
STORAGE ROUTINE) 
IN REGISTER / 




(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 14 J 



GET THE FIRST 

REQUEST ELEMENT 

ON THE QCB 

ELEMENT CHAIN 



/• INCOMPLETE- X 
< FLAG IN THE > 
X DISK RECORD / 



GET THE NUMBER 

OF MESSAGES ON 

THE READ-AHEAD 

QCB 



MOVE QCB FIELD 
AND SEQUENCE 

NUMBERS TO 
CKREQ RECORD 




GET THE ADDRESS 

OF THE NEXT DEB 

IN THE CHAIN 




PUT X • I 8 • IN 

KEY FIELD OF 

THE RECORD; PUT 

TERMINAL OFFSET 

IN RECORD 





TURN OFF ^ 

THE 

INCOMPLETE' 

FLAG IN THE 

.DISK RECORD/ 



GET THE ADDRESS 

OF THE NEXT DEB 

IN THE CHAIN 



PUT THE ADDRESS 

OF THIS DEB IN 

THE REQUEST 

ELEMENT 



t NT A3 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



GET THE COUNT 

OF OPTION 

ENTRIES 



GET THE NEXT 

PRIORITY LEVEL 

QCB 



SAVE THE 

MESSAGES ON THE 

READ-AHEAD QCB 

IN QCBINTLF 



MOVE THE QCB 

FIELDS TO CKREQ 

RECORD 




YNC=YES 


>^NO 


SET THE 

TERMINAL IN THE 

DISK RECORD TO 

ZERO 




|YES 










. 





GET THE ADDRESS 

OF THE OPTION 

FIELD 




MOVE THE OPTION 
FIELD TO THE 
CKREQ RECORD 



SUBTRACT FROM 

THE NUMBER OF 

OPTION ENTRIES 





/ PUT THE \ 

'OFFSET OF THE^ 

DISK I/O 
V ROUTINE IN > 
\REGISTER 15/ 



(RETURN TO THE ^ 
ADDRESS IN I 
REGISTER 14 y 



/ PUT THE \ 

'OFFSET OF THE^ 

I /O QUEUE 
V MANAGER IN J 
\REGISTER 15/ 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 14/ 



© 
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Chart NO CHECKPOINT QUEUE MANAGER ROUTINE 



ENTER J 



GET THE ADDRESS 

OF THE LAST 

RECORD ON THE 

I /O QUEUE 



CLEAR THE LINK 

FIELD OF THE 

NEW RECORD 




(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 1 4 + 47 




PUT ADDRESS OF 
LAST RECORD IN 

LINK FIELD OF 
THE LAST RECORD 

IN THE QUEUE 



PUT THE ADDRESS 

OF THE NEW 

RECORD IN 

CKPIOQF 



PUT THE ADDRESS 

OF THE NEW 

RECORD IN 

CKPIOQL 




GET THE FIRST 

REQUEST ELEMENT 

ON THE QCB 

ELEMENT CHAIN 



INITIALIZE 
COUNT OF INCI- 
DENT RECORD; 
GET RECORD ON 
I /O QUEUE 




(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 1 4 + 47 



GET THE NEXT 

RECORD ON THE 

I/O QUEUE 



UPDATE THE LAST 

REQUEST ELEMENT 

WITH THE DISK 

RECORD 

(CKPLREB) 




SAVE THE 

ADDRESS OF THIS 

RECORD 




GET THE NEXT 

REQUEST ELEMENT 

IN THE CHAIN 




/ SET I NCI- \ 
r DENT OVERFLOW^ 

IN ENVIRON- 
MENT REQUEST > 
X ELEMENT / 



/ SET ^ 

r 'INCIDENT 

OVERFLOW Bll 
V IN INCIDENT 
\ REQ ELEM > 



REMOVE THE 

INCIDENT RECORD 

FROM THE I /O 

QUEUE 



FREEMAIN - 
FREE THE 
I NC I DENT 

DISK RECORD 
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Chart NP- 1 CHECKPOINT DISK I/O ROUTINE 




REMOVE THE 

FIRST DISK 

RECORD FROM THE 

I/O QUEUE 



SET UP THE 

COMMAND CODE 

AND THE DATA 

ADDRESS IN THE 

CCW 



PUT THE ADDRESS 

OF THE FIRST 

DISK RECORD IN 

CKPEXCP 



GET THE LENGTH 

OF AN INCIDENT 

RECORD 








GET THE 


LENGTH 






RECORD 










YES 




GET THE ADDRESS 

OF THE 
CKREQ-TTR TABLE 










GET THE COUNT 
OF THE ENTRIES 


(Z) 












SAVE THE 

ADDRESS OF THIS 

ENTRY 



MOVE TO THE 

NEXT ENTRY IN 

THE CKREQ-TTR 

TABLE 



SUBTRACT FROM 

THE COUNT OF 

ENTR I ES 



GET THE ADDRESS 

OF THE 

CONVERSION 

ROUTINE 




©— 



PUT THE RECORD 

LENGTH IN THE 

CCW 



IECPCNVT - 
CONVERT TTR 
TO MBBCCHHR 
PUT IN I OB 



EXCP - 

WRITE THE 

RECORD 



■ 

(RETURN TO THE > 
ADDRESS IN I 
REGISTER !4 + 4y 



I NPI I 
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Chart NP-2 CHECKPOINT DISK I/O ROUTINE 



TIME- GET 

DATE AND 

TIME OF DAY 



STORE IN FIRST 

TWO WORDS OF 
THE DISK RECORD 




GET LENGTH OF 
ENVIRONMENT RCD 
SEG; SAVE TTR 
OF LAST INCI- 
DENT WRITTEN 




GET THE TTR OF 

THE LAST 
SEGMENT WRITTEN 



GET THE COUNT 

OF ENVIRONMENT 

SEGMENTS ON ONE 

TRACK 



GET THE TTR OF 

THE LAST 

INCIDENT RECORD 

WRITTEN 



© 




GET THE TTR OF 

THE FIRST 
INCIDENT RECORD 
IN THE DATA SET 







^Xttr On\. 
yT I ST TRACK \ 
C OF INCIDENT J 
X. RECORDS S^ 


NO 


GET COUNT OF 
INCIDENT REC- 
ORDS ON TRACK 
OF ONLY INCI- 
DENT RECORDS 






YES 






GET COUNT OF 
INCIDENT REC- 
ORDS ON FIRST 
TRACK OF INCI- 
DENT RECORDS 






) 








' 












GET THE TTR OF 

THE NEXT 

SEQUENTIAL 

RECORD ON THIS 

DISK 





CLEAR THE 

CKPTTRLT FIELD 

TO ZERO 



GET THE TTR OF 

THE FIRST 

RECORD ON THE 

NEXT TRACK 
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Chart iNP-3 CHECKPOINT DISK I/O ROUTINE 



GET THE INDEX 

TQ THE CURRENT 

ENVIRONMENT 

RECORD 



GET THE COUNT 

OF ENVIRONMENT 

RECORDS 




MOVE 'CKREQ' TO 

THE WTO MESSAGE 

BUFFER 



SET COUNT OF 
ENTRIES EQUAL 

TO INDEX TO 
CURRENT ENVI- 
RONMENT RECORD 



GET THE ADDRESS 

OF THE FIRST 

TTR 




GET THE ADDRESS 

OF THE 

•ENVIRONMENT 

DISK ERROR' 

MESSAGE BUFFER 



MARK THE DISK 

RECORD AS 'LAST 

SEGMENT' (XMC 

IN KEY) 



MOVE THE NAME 

TO THE WTO 

MESSAGE BUFFER 



MOVE 

•CHECKPOINT 

DISK ERROR' 

INTO THE WTO 

MESSAGE BUFFER 



WTO - WRITE 

THE ERROR 
MESSAGE TO 
THE CONSOLE 




PUT THE NEW 

INDEX IN THE 

CONTROL RECORD 



MARK THE DISK 
I/O ECB AS 
COMPLETE 



GET THE TTR OF 

THE NEW 

ENV I RONMENT 

RECORD 



SUBTRACT ONE 

FROM THE COUNT 

OF ENTRIES 
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Chart NQ-1 CHECKPOINT NOTIFICATION AND DISPOSITION ROUTINE 




REMOVE THE 

REQUEST ELEMENT 

FROM THE QCB 

ELEMENT CHAIN 



GET THE LAST 

DISK RECORD 

WRITTEN FROM 

CKPEXCP 






S IT AN ^S 
I DENT DISK 
RECORD >* 


..NO 


INDICATE A DISK 

ERROR IN THE 

RECORD JUST 

WRITTEN 




[YES 







MOVE THE 
CONTROL RECORD 

TO THE WTO 
MESSAGE BUFFER 



MOVE THE 

CHARACTERS 

♦RECOVERED' T 

THE ERROR 

MESSAGE 



RETURN TO 
ADDRESS 
REGISTER 



REMOVE REQUEST 
ELEMENT FROM 
THE QCB CHAIN 



REMOVE REQUEST 
ELEMENT FROM 
THE QCB CHAIN 




WTO - WRITE 

THE ERROR 
MESSAGE TO 
THE CONSOLE 



/ PUT THE \ 

/offset of the> 

< DISK I/O 

\ rout i ne in j 
Register 15/ 



NQ-3 Al, 



FREEMAIN - 
FREE AREA 
USED FOR 

DISK RECORD 



(RETURN TO THE \ 
ADDRESS IN 1 
REGISTER 14/ 



r CLEAR THE 

CKPEXCP FIELD 
V TO ZERO 



' CLEAR THE 

•UNSATISFIED 
yREQUEST' 




(RETURN TO THE \ 
ADDRESS IN I 

REG I STER t 4/ 
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Chart NQ-2 CHECKPOINT NOTIFICATION AND DISPOSITION ROUTINE 




GET THE REQUEST 
ELEMENT CHAIN 
FROM THE QCB 




GET THE 

CLOSEDOWN 

COMPLETION 

ELEMENT 



/Tl 



, turn of the 
►< 'mcpclose 
Request* bit 






REMOVE THE 

REQUEST ELEMENT 

FROM THE QCB 

CHA I N 



t NQ-3 A I 



DETERM I NE 
REQUESTOR AND 
POST COMPLETE 



GET ENVIRONMENT 

REQUEST ELEMENT 

FOR THE TIME 

DELAY QUEUE 



T,,NQ-3mIH 



TPOST ELEMENT 
TO DISABLED 
READY QUEUE 



/ TURN OFF 
r "CHECKPOINT 

IN PROGRESS 
l BIT IN ENV 
\REQ ELEMENT 



GET THE NEXT 

REQUEST ELEMENT 

IN THE CHAIN 




GET THE CHAIN 

OF PCBS FROM 

THE AVT 




• TURN ON THE\ 
/•CHECKPOINT' > 
[BIT IN THE PCB 



GET THE LENGTH 

OF THE 

ENV I RONMENT 

RECORD SEGMENT 
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Chan NQ-3 CHECKPOINT NOTIFICATION AND DISPOSITION ROUTINE 



( P ° ST ) 



NQ-I ,J3 
NQ-2.GI 



GET THE LENGTH 

OF THE INCIDENT 

DISK RECORD 




GET THE ECB FOR 

OPERATOR 

CONTROL 



' TURN OFF 

THE 
•CHECKPOINT' 

BIT IN THE 
V SCB 



GET THE ADDRESS 

OF THE BUFFER 

DISPOSITION 

ROUTINE 

( IEDQBDI 



♦ N°-3 A4 



TPOST LCB TO 

THE READY QUEUE 

FOR BUF D1SP 



SET UP THE 
PARAMETER LIST 
TO POST THE ECB 
FOR THE APPLI- 
CATION PROGRAM 



Nfl-3 A3 



POST THE ECB 
ANOTHER 
PARTITION 




c 



3 C tpost ) 



GET THE LENGTH 

OF THE CKREQ 

RECORD 



C 



RETURN TO 
ADDRESS I 
REGISTER 



THE > 
N J 



NQ-2.F2 
NQ-3.GI 



BUILD THE 

PARAMETER LIST 

WITH X'OC* IN 

THE FIRST BYTE 



£&. 



TPOST ELEMENT 

TO THE DISABLED 

READY QUEUE 



(RETURN TO THE \ 
ADDRESS IN I 
REGISTER 11/ 




CLEAR CKPLREB 

TO ZERO (LAST 

REOUEST 

PROCESSED) 



MOVE THE LINK 

FIELD FROM THE 

ELEMENT TO THE 

QCB ELEMENT 

CHAIN 



' CLEAR THE 
•TEST-AND-SET 
k. SWITCH 




> 



(RETURN TO THE \ 
ADDRESS IN I 

REGISTER 13 J 
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Chart NR CHECKPOINT - NO AVAILABLE CORE ROUTINE 




SET HIGH ORDER 
BIT OF LAST 
ELEMENT FOR 
WHICH A REC- 
ORD WAS BUILT 



GET THE LENGTH 

OF THE GETMAIN 

REQUEST FROM 

THE PARAMETER 

LIST 



CONVERT THE 

LENGTH TO 

EBCDIC 




MOVE CKREQ AND 

PROCESS ENTRY 

NAME TO THE 

MESSAGE BUFFER 



MOVE INCIDENT 

TO THE WTO 

MESSAGE BUFFER 



WTO - 
•CHECKPOINT 
NOT TAKEN' 



/ SET A ^ 

' RETURN CODE 

FOR THE 
^NOTIFICATION 
X ROUTINE > 



(RETURN TO THE \ 
ADDRESS IN J 
REGISTER 14/ 



MOVE 

ENVIRONMENT TO 

THE WTO MESSAGE 

BUFFER 
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Chart NS CHECKPOINT - NO INCIDENT RECORDS ROUTINE 




GET THE ELEMENT 
CHAIN FROM THE 
CHECKPOINT QCB 



SET UP 

PARAMETERS FOR 

SVC 102 



FR A I 



TPOST TIME DE- 
LAY REMOVAL ELM 
TO READY QUEUE 





GET THE NEXT 

ELEMENT IN THE 

CHAIN 



' SET THE ^ 
•TEST-AND-SET' 
V SWITCH j 




HG-3 Al, 



REMOVE ANY 
REQUEST ELEMENT 
FROM THE CHAIN 



/ C 



CLEAR THE 
<• TEST-AND-SET' 
X SWITCH 



INSERT THE EN- 
VIRONMENT REQ 
ELEMENT AFTER 
THE LAST PRO- 
CESSED ELEMENT 



PUT THE ENVI- 
RONMENT REQUEST 
ELEMENT AT THE 
TOP OF THE QCB 

ELEMENT CHAIN 



r CLEAR THE 
•TEST-AND-SET* 
k SWITCH 



SET THE INCI- 
DENT OVERFLOW 
REQUEST BITS IN 
THE ENVIRONMENT 
REQUEST ELEMENT 



(RETURN VIA \ 
REGISTER 14+4 1 
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Chart NT TERMNAME TABLE CODE 



IEB8TMT ^ 

C "" ) 



MULTIPLY THE 

TERMNAME TABLE 

OFFSET BY THE 

SIZE OF AN 

. ENTRY 



PUT THE ADDRESS 

OF THE TERMINAL 

ENTRY IN 

REGISTER I 



f RETURN j 
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Chart NX-1 OPERATOR AWARENESS MESSAGE ROUTER 



Cosm 
ENTER J 



f CONVERT J 



SET UP CHAIN OF 

ELEMENTS FROM 

IEDQBD TO PUT 

ON THE READY 

QUEUE 



GET THE MESSAGE 

WORK AREA AND 

MOVE IN THE 

FIXED TEXT 



GET THE LINE 
ADDRESS FROM 

THE UCB AND 
MOVE IT INTO 

THE MESSAGE 



CONVERT COMMAND 

CODE OF FAILING 

CCW 



NX- I A4 



NX- I A4 



MOVE IN ZEROS 

FOR I OB SENSE 

BYTE t 



LNX-,,1 Al 



CONVERT TP OP 

CODE FOR LAST 

RETRY 



t NX- I A4 



CONVERT TP OP 

CODE FOR 

FAILING CCW 



NX- I fti 



FIRST HALF OF 
ADDRESSING S. 
POLLING CHAR 



NX-I ,EI ,FI ,GI ,J1 ,KI 
NX-I ,B2,C2 



SAVE HEX BYTE, 

SHIFT OUT RIGHT 

HALF, PRESET 

2ND BYTE OF 

RESULT TO CO' 



MX' I A4 



2ND HALF OF 
ADDR & POLLING 
CHAR, DIAL DIGS 



GET THE LENGTH 
OF THE ERROR 
MESSAGE; GET 
THE AVAILABLE 
BUFFER COUNT 



REMOVE THE UNIT 

FROM THE BUFFER 

FREEPOOL 



MOVE THE 

MESSAGE TO THE 

BUFFER UNIT 



NT ft3 



GET TERM ADDR 

FOR PRIMARY 
CONTROL TERM 




PUT DESTINATION 

QCB ADDRESS IN 

THE FIRST WORD 

OF THE BUFFER 

PREFIX 



PUT THE QCB 

ADDRESS AND 

PRIORITY INTO 

THE SCB 



PUT THE ADDRESS 
OF THE LCB INTO 
THE LINK FIELD 
OF THE BUFFER; 
SET PRIORITY 




USE ADDRESS OF 

BUFFER AS THE 

FIRST ELEMENT 

IN CHAIN TO PUT 

ON READY QUEUE 



r SET THE ERRORS 
tBIT IN THE LCB 
TO ZERO J 



OR THE HEX 

DIGIT WITH A 

MASK OF 

X'OOOOOOFO' 



OR THE HEX 

DIGIT WITH A 

MASK OF 

X'OOOOOOCO' 



STORE THE 
RESULTING BYTE 
IN THE MESSAGE 

WORK AREA 




ADD I TO THE 

ADDRESS FOR THE 

RESULT IN THE 

MESSAGE WORK 

AREA 



MASK OUT THE 

LEFT HALF OF 

THE ORIGINAL 

BYTE OF HEX 

INPUT 



SET THE SWITCH 
TO ZERO TO 
INDICATE THE 
SECOND PASS 



CHAIN THE UNITS 

AND ADD I TO 
THE UNIT COUNT 



C EX IT TO \ 
DSPCHAIN I 
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Chart NX-2 OPERATOR AWARENESS MESSAGE ROUTER 



NX-1 ,E2,J2 



_y/\'. S THE^S. /IS THE^s. 
V^ AVAILABLE \ YES y* PARTIAL X. 

C BUFFER UNIT J +C BUFFER J 

X COUNT = y^ > S^ ALREADY y^ 
X Zy ^s^BUILTX^ 


YES 


PUT THE BUFFER 

RETURN QCB 
ADDRESS IN THE 
PARTIAL BUFFER 






NO 






NO 






SUBTRACT ONE 

FROM THE 

AVAILABLE 

BUFFER UNIT 

COUNT 




PUT THE ADDRESS 

OF THE LCB IN 

REGISTER 1 




PUT THE ADDRESS 

OF THE FIRST 

UNIT IN 

REGISTER 1 






















1 


REMOVE THE UNIT 
FROM THE 
FREEPOOL 


Inxi I 

v 








/RETURN TO THE 1 

ADDRESS IN 
^REGISTER 15^ 
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Chart NZ TCAM COMMAND SCHEDULER - SVC 34 



GCJM2H . 

[ ENTER J 



GET THE AVT 

POINTER FROM 

THE CVT 




YES 


SET UP THE 
PARAMETERS IN 

XSA FOR AN 
ERROR MESSAGE 




















v NO 


SET UP THE 

PARAMETERS FOR 

AN ERROR 

MESSAGE 




,/ 






\ 



CXCTL TO > 
IGC0503D I 



MOVE TO THE 

NEXT CHARACTER 

IN THE OPERAND 

FIELD 




PUT THE LENGTH 

OF THE GETMAIN 

REQUEST INTO 

CIB IN 

DOUBLEWORDS 



MOVE THE VERB 

CODE FROM XSA 

TO CIB 



MOVE THE 

OPERAND FROM 

THE BUFFER TO 

CIB 



QEDIT - 

PASS COMM 

PARAMETER 

LIST & CIB 

TO CHAIN 




FREEMAIN - 

FREE THE 

CIB 



POST - THE 

ECB IN COMM 

PARAMETER 

LIST 



SET UP THE 
PARAMETERS IN 

XSA FOR AN 
ERROR MESSAGE 



(RETURN TO THE ^ f XCTL TO \ 

ADDRESS IN I I IGC3I03D I 
REGISTER 14 J V J 
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Chart OA LINK ROUTINE 



CBflflA . ^ 
ENTER J 



/SAVE INTRO \ 
f REGISTERS; ^ 

EXCHANGE SAVE 
V AREA > 
\ ADDRESSES • 



•PRESET THE \ 
' REGISTERS, ^ 

PROGRAM BASE, 
WAND AVT BASE j 



PUT THE AVT 

ADDRESS IN 

PARAMETER 

REGISTER I 



PUT THE 

PASSWORD 

ADDRESS INTO 

PARAMETER 

REGISTER 1 




CONVERT THE 

ERROR CODE TO 

CHARACTERS FOR 

A WTO MESSAGE 



SAVE THE 

SCRAMBLED 

PASSWORD IN THE 

AVT 



PUT THE AVT 

ADDRESS IN 

PARAMETER 

REGISTER I 



WTO - SEND 
THE ERROR 

MESSAGE TO 

THE 

OPERATOR 



PUT THE AVT 

ADDRESS IN 

PARAMETER 

REGISTER I 




PUT THE AVT 

ADDRESS IN 

PARAMETER 

REGISTER I 



/ RESTORE \ 
< REGISTERS FOR > 
\ INTRO • 

f \ 

I RETURN J 
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Chart OB-1 WTOR INTERPRETER ROUTINE 



ifePflOB 



' SAVE 

REGISTERS; 
ESTABLISH 
ADDRESS- 

W ABILITY 




REMOVE CPB= AND 

D= FROM THE 

LIST OF 

KEYWORDS 




• PRESET \ 

' REGISTERS - > 

CVT, TCB, AND 
k T 1 OT > 



PREPARE WTO 
MESSAGE WITH 

JOBNAME. 

STEPNAME, 
PROCSTEPNAME 



WTO - SEND 
THE 'TCAM 
STARTING* 

MESSAGE TO 
OPERATOR 



GET THE TCAM 

WORD FROM THE 

CVT+240 




PRESET \ 

REGISTERS TO ^ 

MSG PROMPTING 

FOR MISSING J 

REPLIES / 



JOBS. 



WTOR - SEND 

MESSAGE TO 

OPERATOR, 

REQUEST 

REPLY 



TRANSLATE THE 

LOWER CASE 

REPLY TO UPPER 

CASE, 'BAR' TO 

•COMMA* 



KEYWORD, t 



SEARCH THE 

KEYWORD TABLE 

FOR A MATCH 



/ RESTORE THE X 
[CALLING ROUTINE) 
\ REGISTERS / 



f PRESET \ 
'REGISTERS FOR" 

• INVALID 
V KEYWORD' J 
\ MESSAGE / 




(RETURN TO \ 
IEDQOA J 



ADJUST SCAN 

POINTER PAST 

KEYWORD TO 

OPERAND 



^BRANCH TABLE ^ 



I 0B4| 

S7 T 
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Chart OB-2 WTOR INTERPRETER ROUTINE 



CRQSSRFmT ,QB-5 ,F£ 



TRACE TQB-S FS 



HALF NO 




-BACK. 



LNUNITS f OB-5 F? 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 



HALFNO 



miYM T II QB-5,.F£ 



HALFNO 



PTRAC6 



0B-5.F& 



RlMftRY, 



DIRECT THE 
RESULT TO 
AVTDOUBX 



,,06,-5 AS 



•ERASE 

REQUESTED' , 

DEFAULT TO 

•SYSCON' 



A55WRP 



DIRECT THE 
RESULT TO 
AVTPASWD 



t, OB-5, AS, 



•ERASE 

REQUESTED* , 

DEFAULT TO 'NO 

PASSWORD 

NEEDED ' 



JgA£K_ 



CONTROL t 



DIRECT THE 
RESULT TO 
AVTCTLCH 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 



t QB-5 AS, 



•ERASE 

REQUESTED', 

DEFAULT TO 'NO 

CONTROL 

REQUESTED • 



, PUQ , t , 



DIRECT THE 

RESULT TO 

AVTDLQ 



♦ OB-5 *5 



•ERASE 

REQUESTED' , 

DEFAULT TO 'NO 

DEAD LETTER 

QUEUE' 
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Chart OB-3 WTOR INTERPRETER ROUTINE 



RESTART 



INSERT THE 
KEYWORD WITH A 

BAD OPERAND 

INTO THE ERROR 

MESSAGE 



PRESET 

Registers to 

INVALID 

OPERAND' 

MESSAGE 
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Chart OB-4 WTOR INTERPRETER ROUTINE 



STARTUP t OB- 5, A2 



SCAN 



SET THE SCAN 
POINTER TO END 
OF THE OPERAND 



gOMWBTE T, .PB-5, ftg 

SCAN 



SET THE SCAN 
POINTER TO END 
OF THE OPERAND 



ERASE PREVIOUS 

'STARTUPS' 

REPLIES 



•PRESET THE X 
/ INDEX \ 

(REGISTER to the) 
\START OF THE / 

X OPERAND / 





PRESET > 

REGISTERS TO 

ERROR MSG 

MSUNITS NOT 

PERMITTED' > 



INDICATE 

•COLDSTART' AND 

•START-UP 

SPECIFIED' 



INDICATE 

•WARMSTART* AND 

•START-UP 

SPECIFIED' 



INDICATE 

' INVITATION 

LIST' 



.BACA. 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 




NOTNUM 



INSERT KEYWORD 

HAVING BAD 

OPERAND INTO 

ERROR MESSAGE 



£££&_ 



PRESET ^ 

^ REGISTERS TO 
' INVALID 
OPERAND' 
MESSAGE J 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 



MOVE THE INDEX 

TO THE NEXT 

CHARACTER IN 

THE OPERAND 



ERROR. ERASE 

ALL 'STARTUPS' 

REPLIES 



NflJNUM 




TQEMSfi I QB-5, Ag, 

SCAN 



SET THE SCAN 
POINTER TO END 
OF THE OPERAND 



INSERT THE 

KEYWORD WITH 

BAD OPERAND I 

THE ERROR 

MESSAGE 



-BACK. 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 



/ PRESET 
^REGISTERS 
• INVALI 
^ OPERAND 
V MESSAGE 



TOX 
" / 



TURN OFF THE 

•TOPOL* BIT IN 

AVTBIT2 FOR 

TOPMSG=YES 



TURN ON THE 

•TOPOL' BIT IN 

AVTBIT2 FOR 

TOPMSG=NO 
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Chart OB-5 WTOR INTERPRETER ROUTINE 



0B-2,G2,G3,G4,G5 



t„QB-,S A2 



INCREMENT THE 

INDEX TO THE 

NEXT CHARACTER 



USE SIZE OF 
OPERAND TO 
PACK. THEN 
CONVERT TO 
BINARY 




( \ 

I RETURN I 



f \ 

I HALFNO I 



OB-2.AI ,A2, A3, A4.A5.FI 
OB-3.AI .A2.A3.A4 

OB-3.F1 ,F2,F3,F4,F5 

0B-4.B4 



ffljj-f) rtS 




.BASS- 



MOVE THE SCAN 

POINTER TO THE 

NEXT KEYWORD 
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Chart OG INTRO GETMAIN ROUTINE 



CUflflfi . 
ENTER J 



/ ESTABLISH ^ 
^ADDRESSABILITY 







PUT THE TCB 

ADDRESS IN THE 

AVT 



CALCULATE THE 

LINE BUFFER 

SIZE 




CALCULATE THE 

SIZE OF THE 

MAIN STORAGE 

QUEUES DATA SET 



t„ Bfi , M 



GETMAIN FOR 

BUFFERS 4 MSG 

QUEUES DATA SET 



CLEAR AND 

INITIALIZE THE 

AREA 



CALCULATE THE 

SIZE OF THE 

REQUESTED AREA 



,Bfi„M„, 



GETMAIN STORAGE 

FOR DISPATCHER 

TRACE AREA 



CLEAR AND 

INITIALIZE THE 

AREA 




CALCULATE THE 

SIZE OF THE CPB 

AREA 



,M M 



CLEAR THE AREA 

AND INITIALIZE 

THE CPBS 



CALCULATE THE 
SIZE OF THE 

REQUESTED I /O 
TRACE AREA 



QQ M 



GETMAIN STORAGE 
FOR THE I /O 
TRACE AREA 



CLEAR AND 
INITIALIZE THE 
I /O TRACE AREA 





CALCULATE THE 

SIZE OF THE 

CROSS REFERENCE 

TABLE 



QG M 



GETMAIN STORAGE 

FOR THE CROSS 
REFERENCE TABLE 



CLEAR AND 

INITIALIZE THE 

AREA 



(RETURN TO \ 
IEDQOA 1 
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Chart OM TERMN AME TABLE SORT ROUTINE 
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Chart OS ATTACH ROUTINE 



Coaos ^ 
ENTER J 



/ establish ^ 
Addressability 




attach 
operator 

CONTROL 



EXTRACT - 
ESTABLISH A 
COMMUNICA- 
TIONS PAR- 
AMETER LIST 



QEDIT - GET 
COMMAND 

INPUT 
BLOCKS 



ATTACH 

ON-LINE 

TEST 



ATTACH FE 

COMMON 

WRITE 




LOAD - THE 
OPERATOR 
AWARENESS 

MSG ROUTINE 
I IEDQNX) 



^ET A RETURN \ ( ^ 

< CODE > » 1 RETURN 1 



PUT THE IEDQNX 

ADDRESS IN THE 

A-VT 
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Chart QO LINE I/O INTERRUPT TRACE ROUTINE 



f ENTER J 



RO-I ,C2 Q4-I ,C2 
Q2-! ,C2 Q5-I ,C2 
Q3-I ,C2 



ENTER I /O SENSE 

INFORMATION 

FROM LCBSENSO 

( I BYTE) IN THE 

TRACE TABLE 



ENTER THE 

CURRENT CSW 

FROM LCBCSW (7 

BYTES) IN THE 

TRACE TABLE 



ENTER THE LAST 

CCW EXECUTED (8 

BYTES) IN THE 

TRACE TABLE 




ENTER THE TP OP 

CODE FOR THIS 
CCW (I BYTE) IN 
THE TRACE TABLE 



ENTER THE FIRST 
CCW IN THE 

CHANNEL PROGRAM 
(8 BYTES) IN 
TRACE TABLE 



,/lS THIS A >v 
C TEXT CCW _J 


NO 




ENTER THE TP OP 

CODE FOR THIS 
CCW (1 BYTE) IN 
THE TRACE TABLE 








YES 


















ENTER CHANNEL 

AND UNITS 

ADDRESSES FROM 

UCB (2 BYTES) 
IN TRACE TABLE 








J2 ) 




ENTER NAME FROM 
THE TERMINAL 

ENTRY TABLE (6 
BYTES MAX) IN 

THE TRACE TABLE 



ENTER THE UCB 

NAME (3 BYTES) 

IN THE TRACE 

TABLE 




AVTREXIT=0 
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Chart Q 1 LOCAL RECEIVE SCHEDULER 



GGS12SU ^ 

f ENTER J 




FREE THE 

ATTENTION 

ELEMENT 




INITIALIZE THE 

LCB TO BE 

TPOSTED TO 

ITSELF 





GET THE ADDRESS 

OF THE NEXT 

SUBTASK 




SET THE 

TERMNAME TABLE 

IN THE LCB FOR 

THIS LINE 



SET THE INITIAL 

PRIORITY AND 

COUNT 



GET THE ADDRESS 

OF THE BUFFER 

REQUEST QCB 



f EXIT TO THE ^ 

Itcam dispatcher! 
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Chart Q2-1 LINE END APPENDAGE FOR BSC LINES 



f ENTER J ► 



/ SAVE AND ^ 

[initialize the 
\ registers > 



GET THE 

MULTIPROCESSOR 

CVT ADDRESS 

FROM THE CVT 



DETERMINE ADDR 
OF TEXT OR CON- 
TROL CCW FROM 

TP CODE FOR 
BRANCH TABLE 



TESTDSP - 

INTERRUPT 

THE OTHER 

CPU 





"VYES 




00 Al 


I S TRACE 
ACTIVE 


1GG019QO 


ACTIVATE I/O 

INTERRUPT TRACE 

ROUT 1 NE 




(NO 










SET THE FAILING 

CCW AS WRITE 

IDLES 



TURN OFF THE > 
.ERROR FLAGS TO 
RESTART / 



RESTORE 

REGISTERS FOR 

THE I/O 

SUPERV 1 SOR 



Z> 



|Q2-7| 
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Chart Q2-2 LINE END APPENDAGE FOR BSC LINES 





•turn off the ^ 
(error flags to 

\ RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



c — — \ 

I RETURN J 



SET UP TO 

RESTART ON THE 

NEXT CCW 
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Chart Q2-3 LINE END APPENDAGE FOR BSC LINES 
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Chart Q2-4 LINE END APPENDAGE FOR BSC LINES 



t, flS-Jg, A4 




CHECK ID AND 

SET A BRANCH 

RETURN 
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Chart Q2-5 LINE END APPENDAGE FOR BSC LINES 



as- is \* 



as- i a M 




SET UP TO 

RESTART ON THE 

NEXT CCW 




/ SET THE \ 

/FLAG FOR THE \ 

[SCHEDULER TO D03 

\ A RECEIVE / 

\ OPERATION / 



"©■ 



• TURN OFF THE ^ 
(ERROR FLAGS TO 

V RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



f RETURN J 
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Chart Q2-6 LINE END APPENDAGE FOR BSC LINES 



XM 



82,-?, A* 



TPOST THE 

BUFFER TO THE 

MH AS EOM 



.0 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



© 






ADJUST PRFSIZE 



fig-? ,M 







9?-|° *i 


1 


YES 




IDCHK 




CHECK THE 
RESPONSE 
















.YES 




RESTART ON THE 
DISABLE 

















SET UP TO 

RESTART ON READ 

LCOUT 



SET UP TO START 

AT WRITE ACK 

(NAK) 



BUILD A WRITE 
NAK, READ TEXT 



r TURN OFF THE ^ 
TERROR FLAGS TO 
RESTART J 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERV I SOR 



( \ 

I RETURN J 



I, ,,9.5,7.12. A 



,as-.ia, \> 



CHECK THE ID; 
SET UP FOR A 
BRANCH RETURN 



© 



© 



SET UP TO 

RESTART ON READ 

ID ENQ 



© 



YESX^ 'S THE ^S. 

r— — C TERMINAL J 

^SwRECE 1 V I HQ^y< 

(NO 






yr IS THIS ^V 

C TRANSPARENT J 
X MODE s^ 


YES 


SET THE TIC 

CHAIN FOR 

TRANSPARENT 

BUFFER 






NO 








02-9 Al 








FINDBUFF 






GET THE CURRENT 
BUFFER 














TPOST THE 
BUFFER TO THE 
MH WITH ERROR 








Q2-9 A4 






ENQUEUE 






PUT THE BUFFER 

ON THE READY 

QUEUE 













© 
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Chart Q2-7 LINE END APPENDAGE FOR BSC LINES 



SET PARAMETER 

LIST TO TPOST 

THE BUFFER TO 

THE BUFFER 

DISPOSITION QCB 




t ge-9 m 



PUT THE BUFFER 

ON THE READY 

QUEUE 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



OS-? fti 



SET UP TO TPOST 

THE ZERO-LENGTH 

BUFFER TO THE 



as-? ftl 



PUT THE BUFFER 

ON THE READY 

QUEUE 



y \ 

/turn off the -^ 
"■<error flags to 

X RESTART y 




' SET THE 

CONTROL FLAGS 
k FOR ERP 



> 



GET THE RETURN 
ADDRESS TO THE 
I/O SUPERVISOR 
TO SCHEDULE ERP 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



r >> 

I RETURN I 



SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 



as-? A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



TPOST THE FIRST 

BUFFER TO THE 

BUFFER RETURN 

QCB 
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Chart Q2-8 LINE END APPENDAGE FOR BSC LINES 






YES 






YES 


BUILD THE 

PREVIOUS ACK TO 

START ON 




BUILD A WRITE 
ACK FOR RESTART 























© 
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Chart Q2-9 LINE END APPENDAGE FOR BSC LINES 



f F I NDBUFF j 



Q2-6.A1 ,C2,H4 
Q2-7.A3 Q2-8.D3 
Q2-I3.DI 



' INITIALIZE ^ 

REGISTERS FOR 
O-OOP CONTROL J 























/IS THIS AN >s.. 
C INTERRUPTED J 
^S. CCW ^r 

|NO 

YES/lS THERE ^V 
1 C ANOTHER UNIT J 

(NO 


YES 


RETURN 












/WILL A PCI \ 
C FREE UP J 
^S. BUFFERS >r 


YES 


INCREMENT THE 
BUFFER COUNT 




GET THE ADDRESS 

OF THE NEXT 

BUFFER 












|NO 














y^ IS THE ^s. 

C TERMINAL J 
^Sy! RECE I V 1 NG ./ 


YES 


SET THE PREFIX 
SIZE; SET THE 
PARAMETERS TO 

TPOST TO THE MH 












NO 








Q2-9 A4 




















. SET THE 

PARAMETER LIST 

FOR BUFFER 

RETURN 




ENQUEUE 








PUT THE BUFFER 

ON THE READY 

QUEUE 





















( \ 

I ENQUEUE 1 



Q2-2.CI ,C2 
Q2-3.F2 



PUT QCB ADDR IN 

THE ELEMENT: • 

GET ADDR OF THE 

LAST ELEMENT ON 

READY QUEUE 



Q2-6.B1 ,E2,K4 
Q2-7,C3,D3,F3,J3 
Q2-8,D5,H3,H4 
Q2-9.G2 



SET THE CURRENT 
ELEMENT AS THE 

LAST IN THE 

DISABLED READY 

QUEUE 




INSERT THE 
CURRENT ELEMENT 
IN THE CHAIN OF 

PREVIOUS 

ELEMENTS 



PUT THE CURRENT 

ELEMENT AT THE 

TOP OF THE 

READY QUEUE 



CLEAR THE LINK 

FIELD OF THE 
CURRENT ELEMENT 




POST - POST 

THE SYSTEM 

WAIT 

COMPLETE 



r >l 

I RETURN 1 
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Chart Q2-10 LINE END APPENDAGE FOR BSC LINES 



f >t 

I I DCHK J 



Q2-4.J4 
Q2-6.H2.G3 



GET THE ADDRESS 

OF THE DCB: GET 

THE ID READ 

AREA 




ADJUST THE 

RESPONSE LENGTH 

BY 2 



ADJUST THE 

RESPONSE LENGTH 

BY I 



PAD THE 

RESPONSE AREA 

WITH BLANKS 



GET # OP INVI- 
TATION LISTS 
AND POINTER TO 
INVITATION LIST 
FOR THIS LINE 







SET UP FOR ,. 
AN ERROR \ 

" __ THE> 



•\RETURN; SET ,, 
ERROR' BIT 



•ERROR' BIT / 
IN THE SCB/ 



") 




ADJUST THE TIC 

CHAIN IN THE 

BUFFERS TO 

TPOST 



r INITIALIZE ^ 

THE REGISTERS 
kFOR THE LOOP J 




ADJUST THE 

COUNT FOR A 

PREVIOUS CCW 



INCREMENT THE 

CCW DATA 
ADDRESS BY I 



f \ 

I RETURN J 
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Chart Q2-1 1 LINE END APPENDAGE FOR BSC LINES 





RESPONSE ^N^YES 
TRANSPARENT 



RESPONSE DLE 



GET THE FIRST 
DATA BYTE FROM 
THE CURRENT CCW 



GET THE SCT 

ADDRESS; POINT 

TO STX-ENQ 







j^KS THIS THE\. 
C FIRST TIME 1 


NO 


y^ IS THE 

Cresponse enq 


(yes 




|NO 


INCREMENT THE 

IDLES COUNT BY 

2 




y^ is the 

C RESPONSE EOT 






[no 








/is THE^N 
yT RESPONSE 
C THE SOH 7. S 
\. SEQUENCE . 










YES 













SET THE 

■VALID START" 

BIT 



f N 

l RETURN I 



SET A FORMAT 

ERROR - INVALID 

START 



/ SET THE 

•STATUS IN THE 
ISCB AS POSSIBLE, 
\ ABORT 




' SET THE 
•ENQ START 
AND 'VALID 
START' BITS 



' SET THE 
•EOT START 
AND 'VALID 
START" BITS 



'SET THE 'OLT 
< AND 'VALID 
START" BITS 



\ S1 





SET THE 

VALID START" 

BIT 




3 
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Chart Q2-12 LINE END APPENDAGE FOR BSC LINES 



IS THE 

RESPONSE DLE 

EOT 



WAS ENTRY 

FROM THE PCI 

APPENDAGE 



SET UP TO 

RESTART ON 

WRITE ID ACK 



/TURN OFF THE ^ 
CERROR FLAGS TO 
\ RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



SET THE 

•VALID START 

BIT 



h 



r SET 'VALID 

START' 4 
•EOT'; FORCE 

DISABLE ON 
V NEXT OP 



> 



r SET THE 
•ERROR STATUS- , 
UNVALID' BIT/ 



^ 






f RETURN 1 



I RETURN J f RETURN V 



/ SET THE \ 

|— < RESPONSE FLAG > 

V FOR ACK-0 / 

»-»RE 



/ SET THE X 
*-C RESPONSE FLAG > 

V FOR ENQ I 

/ SET THE \ 
■*-< RESPONSE FLAG > 

V FOR NAK / 



SET THE V YES 
RESPONSE FLAG >* 
FOR ACK- I 



HSET THE \ 
RESPONSE FLAG > 
FOR RVI / 



/ SET THE 
-C RESPONSE FLAG 

\ FOR DLE EOT 




SET THE X YES, 

RESPONSE FLAG >• ■ C RESPONSE 

FOR EOT 



SET THE X YES 

RESPONSE FLAG >-> — C RESPONSE WACK 

FOR WACK 
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Chart Q2-1 3 LINE END APPENDAGE FOR BSC LINES 




BUILD THE 

PARAMETER L15T 

FOR FINDBUFF 



OS-? A I, 







SET UP TO 

RESTART ON THE 

NEXT BLOCK 



ADJUST THE 
BUFFER COUNT 
THE ERB 




WRITE AN EOT TO 
RESET THE 
TERMINAL 




TURN OFF THE ^ 

.ERROR FLAGS TO 

RESTART y 



RESTORE THE 

REGISTERS FOR 

THE 1 10 

SUPERVISOR 



4 RETURN 1 



SET THE OFFSET 
IN THE SCB FOR 
POSSIBLE RECALL 




BUILD A WRITE 
EOT TO RESET 
THE TERMINAL 



TREAT THE 

INTERRUPT AS A 

PROGRAM CHECK: 

START ON WRITE 

IDLES SYNS 




GET THE ADDRESS 

OF THE NEXT 

UNIT 



© 



r SET THE FLAG 
FOR THE NEXT 
W ENTRY 



> 



© 
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Chart Q3- 1 LINE END APPENDAGE FOR START/STOP LINES 




GET THE. RETURN 
ADDRESS TO THE 
I /O SUPERVISOR 
TO SCHEDULE ERP 



© 
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Chart Q3-2 LINE END APPENDAGE FOR START/STOP LINES 
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Chart Q3-3 LINE END APPENDAGE FOR START/STOP LINES 



BUILD A BREAK 
COMMAND AND 

SAVE THE 
CURRENT CSW 



LUUt = a i c ' : 

SET THE START 

ADDRESS 




c \ 

I RETURN 1 



' Q3-fl h\ 



PUT THE BUFFERS 

ON THE READY 

QUEUE 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP TO 

RESTART ON THE 

NEXT CCW 



/TURN OFF THE^ 
CERROR FLAGS TO 
X RESTART y 



RESTORE THE 

REGISTERS FOR 

THE I 10 

SUPERVISOR 



jT ^ 

►I RETURN 1 
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Chart Q3-4 LINE END APPENDAGE FOR START/STOP LINES 




aa-a ft 



oa-a fti 



TPOST THE 

BUFFER TO THE 

MH AS EOM 



• G> 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP TO 

RESTART ON THE 

WRITE IDLES 

LOOP 



r TURN OFF THE ^ 

ERROR FLAG TO 
L RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERV 1 SOR 



( "" ) 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



/ TURN OFF > 
r THE 'PREPARE' 

BIT: SET THE 
V 'ATTENTION' 
\ BIT V 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



YES./ IS THE \ 

I -C TERMINAL J 

^S„RECE I V I NG^^ 

|NO 






/ IS THIS ^S. 

C TRANSPARENT J 
^v. MODE yT 


YES 


SET THE TIC 

CHAIN FOR 

TRANSPARENT 

BUFFER 






NO 










OS-S Al 








FINDBUFF 






GET THE CURRENT 
BUFFER 














TPOST THE 
BUFFER TO THE 
MH WITH ERROR 








Q3-8 A4 






ENQUEUE 






PUT THE BUFFER 

ON THE READY 

QUEUE 

















83-8 h\ 



Program Organization 759 



Chart Q3-5 LINE END APPENDAGE FOR START/STOP LINES 



Q3-?, A 




© 



SET PARAMETER 

LIST TO TPOST 

THE BUFFER TO 

THE BUFFER 

DISPOSITION QCB 



' SET THE ' 

CONTROL FLAGS 
V FOR ERP j 



GET THE RETURN 
ADDRESS TO THE 
I /O SUPERVISOR 
TO SCHEDULE ERP 




t Q3-B Al 



PUT THE BUFFER 

ON THE READY 

QUEUE 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



S3-8 At 



SET UP TO TPOST 

THE ZERO-LENGTH 

BUFFER TO THE 



85-8 A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



ADJUST THE. 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



1 
I RETURN J 




TURN OFF THE ^ 
.ERROR FLAGS TO 
RESTART > 





NO 








SAVE THE FIRST 
BUFFER 














YES 








Q3-8 A4 




>r IS THERE ^S., 




SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 




ENQUEUE 




PUT THE BUFFER 

ON THE READY 

QUEUE 


^S,^ BUFFER >r 












TPOST THE FIRST 

BUFFER TO THE 

BUFFER RETURN 

QCB 
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Chart Q3-6 LINE END APPENDAGE FOR START/STOP LINES 




START ON THE 

INITIAL CONTACT 

SEQUENCE 



"(I) 



E LAST*^ 
A TIC 


V ES 




ADJUST THE CCW 
TO READ /WRITE 






|NO 









COMPUTE THE 

SOURCE OF THE 

RESPONSE FOR 

AUTO POLL 



ADJUST THE 

REGISTERS; FIND 

THE TRUE 

FAILING CCW 



BUILD THE 

PARAMETER LIST 

FOR FINDBUFF 



t 03-8, A1, 




SET UP THE 
CURRENT CCW FOR 

CONTINUE; SET 

THE OFFSETS FOR 

RECALL 



SET UP TO TPOST 

THE BUFFER TO 

THE MH AS THE 

LAST BUFFER 



GET THE OFFSET 

INTO THE 
BUFFER: SET THE 
CURRENT CCW FOR 

CONTINUE 



fla-fl l „A4 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



TPOST THE LAST 

BUFFER TO THE 

BUFFER 

DISPOSITION QCB 



KA-I Al 



BUILD A 
CONT I NUE 
SEQUENCE 



Q3-8 At 



PUT THE BUFFER 

ON THE READY 

QUEUE 



r TURN OFF THE ' 

TERROR FLAGS TO 

RESTART > 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



I RETURN J 
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Chart Q3-7 LINE END APPENDAGE FOR START/STOP LINES 




762 



Chart Q3-8 LINE END APPENDAGE FOR START/STOP LINES 



f FINDBUFF 1 



Q3-4.DI ,H3 

Q3-5.A3 

Q3-6.D3 




J 



SET THE PREFIX 
SIZE; SET THE 
PARAMETERS TO 

TPOST TO THE MH 



SET THE 

PARAMETER LIST 

FOR BUFFER 

RETURN 



f Q3-8 A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



( *\ 

I ENQUEUE J 



PUT QCB ADDR IN 

THE ELEMENT: 

GET ADDR OF THE 

LAST ELEMENT ON 

READY QUEUE 



Q3-2,CI,C2 Q3-5,C3,D3,F3,J3 
Q3-3.E2 Q3-6,D5,H3,A4 
Q3-4,B5,EI ,K3 Q3-7 ,G t ,K3 ,F4 
Q3-8.G2 



SET THE CURRENT 
ELEMENT AS THE 

LAST IN THE 

DISABLED READY 

QUEUE 




INSERT THE 
CURRENT ELEMENT 
IN THE CHAIN OF 

PREVIOUS 

ELEMENTS 



PUT THE CURRENT 

ELEMENT AT THE 

TOP OF THE 

READY QUEUE 



CLEAR THE LINK 

FIELD OF THE 
CURRENT ELEMENT 
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Chart Q3-9 LINE END APPENDAGE FOR START/STOP LINES 



( ""' ) 



THE ID READ 
AREA 




ADJUST THE 

RESPONSE LENGTH 

BY 2 



ADJUST THE 

RESPONSE LENGTH 

BY I 



PAD THE 

RESPONSE AREA 

WITH BLANKS 



GET # OF INVI- 
TATION LISTS 
AND POINTER TO 
INVITATION LIST 
FOR THIS LINE 




SET UP FOR X 
AN ERROR \ 
RETURN: SET THE) 
ERROR* BIT / 
IN THE SCB • 



SET THE SOURCE 

OF THE CALLING 

TERMINAL 



GET THE NEXT 

ENTRY IN THE 

LIST 



r — — n 

I RETURN I 
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Chart Q4-1 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 
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Chart Q4-2 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 




SET THE PARAM- 
ETER LIST TO 
TPOST THE ERB 
TO THE BUFFER 

DISPOSITION QCB 



SET THE LCB TO 
BE TPOSTED TO 

THE QCB ADDRESS 

SPECIFIED IN 

THE LCB 



t Q^-6 A4 



O 



°4-fc A4 



PUT THE ELEMENT 

ON THE READY 

QUEUE 



ADJUST THE 
RETURN REGISTER 
SO THAT THE ECB 
IS NOT TPOSTED 



RESTORE THE 

REGISTERS FOR 

THE I 10 

SUPERVISOR 



I RETURN 1 



,NT A3. ■ 



GET THE 

TERMINAL 

ADDRESS 



GET THE ADDRESS 

OF THE 

INVITATION 

LIST: RESET THE 

RECEIVE LIMIT 



GET THE ADDRESS 

OF THE NEXT 

ENTRY 




UPDATE THE 

INVITATION LIST 

POINTER 





SET UP TO 

RESTART ON THE 

NEXT CCW 




RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



f RETURN J 
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Chart Q4-3 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 




GET THE LIST OF 

BUFFERS FOR THE 

MH 




04-6 A4 


ENQUEUE 


PUT THE BUFFERS 

ON THE READY 

QUEUE 




' 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP TO 

RESTART ON THE 

NEXT CCW 



•TURN OFF THE ^ 
(ERROR FLAGS TO 
X RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



/ ^ 

►I RETURN 1 
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Chart Q4-4 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 






SET THE ^ 

< CONTROL FLAGS 

FOR ERP > 









GET THE RETURN 
ADDRESS TO THE 
I /O SUPERVISOR 
TO SCHEDULE ERP 





ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP TO 

RESTART ON THE 

WRITE IDLES 

LOOP 



/TURN OFF THE ^ 
(ERROR FLAGS TO 
\ RESTART > 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



Qft-fe, M 



SET UP TO TPOST 

THE ZERO-LENGTH 

BUFFER TO THE. 



, Q^-fe M 



PUT THE BUFFER 

ON THE READY 

QUEUE 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 




TURN OFF THE ^ 
ERROR FLAGS TO 
RESTART J 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



f RETURN J 




SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 



Q*-fc M 



PUT THE BUFFER 

ON THE READY 

QUEUE 



TPOST THE FIRST 

BUFFER TO THE 

BUFFER RETURN 

QCB 



G 



768 



Chart Q4-5 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 




START ON THE 

INITIAL CONTACT 

SEQUENCE 



^) 



ADJUST THE 

REGISTERS; FIND 

THE TRUE 

FAILING CCW 



BUILD THE 

PARAMETER LIST 

FOR FINDBUFF 




84-6 ft |, 




SET UP THE 
CURRENT CCW FOR 

CONTINUE: SET 

THE OFFSETS FOR 

RECALL 



^ 



SET UP TO TPOST 

THE BUFFER TO 

THE MH AS THE 

LAST BUFFER 



GET THE OFFSET 

INTO THE 
BUFFER! SET THE 
CURRENT CCW FOR 

CONTINUE 



t 04-fe A4 



SET THE TIC 

CHAIN FOR 

TRANSPARENT 

BUFFER 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



TPOST THE LAST 

BUFFER TO THE 

BUFFER 

DISPOSITION QCB 



_KA; 



BUILD A 
CONTINUE 
SEQUENCE 



Q4-fe At 



PUT THE BUFFER 

ON THE READY 

QUEUE 



TPOST THE 
BUFFER TO THE 
MH WITH ERROR 



r TURN OFF THE ^ 

Terror flags to 

RESTART > 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERV I SOR 



°4-fc A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



( \ 

I RETURN 1 



© 
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Chart Q4-6 LINE END APPENDAGE FOR LEASED & START/STOP LINES WITH NO TSO 




3 



SET THE PREFIX 
SIZE; SET THE 
PARAMETERS TO 

TPOST TO 'THE MH 



SET THE 

PARAMETER LIST 

FOR BUFFER 

RETURN 



„Q4-6 lVt 



PUT THE BUFFER 

ON THE READY 

QUEUE 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



f ENQUEUE J 



Q4-2.C1.C2 Q4-5,D5,H3,H4 
Q4-3.E2 Q4-6.G2 
Q4-4,D3,F3,J3 



PUT QCB ADDR IN 

THE ELEMENT! 

GET ADDR OF THE 

LAST ELEMENT ON 

READY QUEUE 



SET THE CURRENT 
ELEMENT AS THE 

LAST IN THE 

DISABLED READY 

QUEUE 




INSERT THE 

CURRENT ELEMENT 

IN THE CHAIN OF 

PREVIOUS 

ELEMENTS 



PUT THE CURRENT 

ELEMENT AT THE 

TOP OF THE 

READY QUEUE 



CLEAR THE LINK 

FIELD OF THE 
CURRENT ELEMENT 




POST - POST 

THE SYSTEM 

WAIT 

COMPLETE 



f *\ 

I RETURN J 
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Chart Q5-1 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 



iGGjoaaa. 



)/ SAVE AND \ 
-< I N I T I AL I ZE THE > 
X REGISTERS / 
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Chart Q5-2 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 




SET THE PARAM- 
ETER LIST TO 
TPOST THE ERB 
TO THE BUFFER 

DISPOSITION QCB 



SET THE LCB TO 
BE TPOSTED TO 

THE QCB ADDRESS 

SPECIFIED IN 

THE LCB 



QS-ThM 



—0- 



1 05-7 M 



PUT THE ELEMENT 

ON THE READY 

QUEUE 




SET THE LCB TO 

BE TPOSTED TO 

THE BUFFER 

DISPOSITION QCB 



ADJUST THE 
RETURN REGISTER 
SO THAT THE ECB 
IS NOT TPOSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERV I SOR 



( "^ 

I RETURN J 




GET THE ADDRESS 

OF THE 

INVITATION 

LIST; RESET THE 

RECEIVE LIMIT 



GET THE ADDRESS 

OF THE NEXT 

ENTRY 




0— 



UPDATE THE 

INVITATION LIST 

POINTER 



NT A3 



GET THE 

TERMINAL 

ADDRESS 





SET UP TO 

RESTART ON THE 

NEXT CCW 




•TURN OFF THE ^ 
lERROR FLAGS TO 
\ RESTART d 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



f RETURN 1 
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Chart Q5-3 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 




GET THE RETURN 
ADDRESS TO THE 
I/O SUPERVISOR 
TO SCHEDULE ERP 



QS-T M 



PUT THE BUFFERS 

ON THE READY 

QUEUE 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP TO 

RESTART ON THE 

NEXT CCW 



/turn OFF THE ^ 
<ERROR FLAGS TO 
\ RESTART J 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



►f RETURN J 
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Chart Q5-4 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 




,8,5-7 M 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I 10 

SUPERVISOR 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



( \ 

I RETURN I 



( \ 

I RETURN J 




SET THE TIC 

CHAIN FOR 

TRANSPARENT 

BUFFER 



■fflS-i, Al, 



SET UP TO 

RESTART ON THE 

WRITE IDLES 

LOOP 



XTURN OFF THE > 
[ERROR FLAGS TO 
\ RESTART > 



flS-7,, Al, 



tt5-7,Ai 



TPOST THE 

BUFFER TO THE 

MH AS EOM 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



TPOST THE 
BUFFER TO THE 
MH WITH ERROR 



RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERVISOR 



t B5-7 A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



( \ 

I RETURN 1 
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Chart Q5-5 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 



as-8 Al, 



© 




SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



SET UP TO TPOST 

THE ZERO-LENGTH 

BUFFER TO THE 



Q5-7 Al, 



SET PARAMETER 

LIST TO TPOST 

THE BUFFER TO 

THE BUFFER 

DISPOSITION QCB 



Q5-7 A^t 



PUT THE BUFFER 

ON THE READY 

QUEUE 



B5-7 At 






\SET THE ^ 
CONTROL FLAGS 
FOR ERP y 






GET THE RETURN 
ADDRESS TO THE 
I /O SUPERVISOR 
TO SCHEDULE ERP 



QS-7 A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 




TURN OFF THE ^ 
RROR FLAGS TO 
RESTART J 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



( N 

I RETURN 1 





S. YES 






Q5-7 A4 




IS THERE 
ANOTHER 
BUFFER . 


SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 




ENQUEUE 




PUT THE BUFFER 

ON THE READY 

QUEUE 









IS THE 
BUFFER BUSY 
IS IT AN 
ERROR 



© 



TPOST THE FIRST 

BUFFER TO THE 

BUFFER RETURN 

QCB 
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Chart Q5-6 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 



WAS 

PREVIOUS 

RESPONSE AN 

ERROR 



START ON THE 

INITIAL CONTACT 

SEQUENCE 



^> 



E LAST** 
A TIC 


S.YES 




ADJUST THE CCW 
TO READ/WRITE 






Tno 









IS AUTO 
POLL IN 
EFFECT 



COMPUTE THE 

SOURCE OF THE 

RESPONSE FOR 

AUTO POLL 



ADJUST THE 

REGISTERS} FIND 

THE TRUE 

FAILING CCW 



BUILD THE 

PARAMETER LIST 

FOR FINDBUFF 




QS-7 ft 



SET UP THE 
CURRENT CCW FOR 

CONTINUE; SET 

THE OFFSETS FOR 

RECALL 



^) 



SET UP TO TPOST 

THE BUFFER TO 

THE MH AS THE 

LAST BUFFER 



GET THE OFFSET 

INTO THE 
BUFFER: SET THE 
CURRENT CCW FOR 

CONTINUE 



flS-7 A4 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 




TPOST THE LAST 

BUFFER TO THE 

BUFFER 

DISPOSITION QCB 



t, ,85,-7 M 



PUT THE BUFFER 

ON THE READY 

QUEUE 



Q5-T A4 



/tuf 

«iRRC 



r TURN OFF THE ^ 
CERROR FLAGS TO 
RESTART y 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERV I SOR 



f RETURN J 
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Chart Q5-7 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 



c 



Q5-4.H2.F4 

Q5-5.A3 

Q5-6.D3 



' INITIALIZE ^ 

REGISTERS FOR 
VLOOP CONTROL > 




•i RETURN 1 



SET THE PREFIX 
SIZE} SET THE 
PARAMETERS TO 

TPOST TO THE MH 



SET THE 

PARAMETER LIST 

FOR BUFFER 

RETURN 



t Q5-7, h\ 



PUT THE BUFFER 

ON THE READY 

QUEUE 



GET THE ADDRESS 

OF THE NEXT 

BUFFER 



f ENQUEUE J 



Q5-2.CI.C2 Q5-5,C3,D3,F3,J3 
Q5-3.E2 Q5-6,H3,H4,D5 
Q5-4,B2,K2,G4 Q5-7.G2 



IN 

i nt :mcm i ; 

GET ADDR OF THE 

LAST ELEMENT ON 

READY QUEUE 



SET THE CURRENT 
ELEMENT AS THE 

LAST IN THE 

DISABLED READY 

QUEUE 




INSERT THE 
CURRENT ELEMENT 
IN THE CHAIN OF 

PREVIOUS 

ELEMENTS 



PUT THE CURRENT 

ELEMENT AT THE 

TOP OF THE 

READY QUEUE 



CLEAR THE LINK 

FIELD OF THE 
CURRENT ELEMENT 




POST - POST 

THE SYSTEM 

WAIT 

COMPLETE 



f RETURN J 
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Chart Q5-8 LINE END APPENDAGE FOR A QTAM-COMPATIBLE SYSTEM 




ADJUST THE 

RESPONSE LENGTH 

BY 2 



ADJUST THE 

RESPONSE LENGTH 

BY I 



PAD THE 

RESPONSE AREA 

WITH BLANKS 



GET # OF INVI- 
TATION LISTS 
AND POINTER TO 
INVITATION LIST 
FOR THIS LINE 




SET UP FOR X 
AN ERROR \ 
.RETURN; SET THE) 
ERROR' BIT / 
IN THE SCB / 



SET THE SOURCE 

OF THE CALLING 

TERM I NAL 



GET THE NEXT 

ENTRY IN THE 

LIST 



c 



} 
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Chart Q6 SEND SCHEDULER FOR LEASED LINES AND NO TSO 




RETURN ON 
I N I T I ATE 
MODE OR EOM 



CEAIE 
EXIT TO \ 
DSPBYPAS 1 



STORE THE 

DESTINATION 

ADDRESS 




_LSfll 



MOVE THE SEND 

SCHEDULER STC8 

TO THE QCB 



I EX IT TO DSPPOST) 



JNIT5ET 



SET UP POINTERS 
FOR INITIATE 
MODE MESSAGES 



PRSPA.RS t 



f LCBSCAN J 



HM-8.E2 AS-2.J5 

HMI-6.E2 

HM2-T.E2 



GET THE LCB 



^SET THE *SENd\ 

►(SCHEDULER wants} 

XjHE LINE' BIT/ 




ISSUE AN 

EXCP ON 

BREAK 







XEAYE T ^ 
(exit to dspunavJ 
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Chart Q7-1 SEND SCHEDULER WITH NO TSO 





Q7-SAL 



GET THE 

DESTINATION LCB 

ADDRESS 



C EX IT TO \ 

DSPBYPAS 1 



/RETURN TO CPE 1\ 
I INITIALIZATION 1 



STORE THE 

DESTINATION 

ADDRESS 




T5Q4, 



MOVE THE SEND 

SCHEDULER STCB 

TO THE QCB 



■ ■ 

(exit TO DSPPOSTJ 



NITSET 



SET UP POINTERS 
FOR INITIATE 
MODE MESSAGES 



FRERAftS t 
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Chart Q7-2 SEND SCHEDULER WITH NO TSO 






RB-? Al 


DSPUNAVR 


LINK THE STCB 
TO THE LCB 




[ RETURN J 
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Chart Q8 CHECKPOINT CONTINUATION RESTART SUBROUTINE 




IGGOIgflfi+fi 



I GG0 l'pQ8+4 I GGO l£ 

J ( enter ) C 



PUT THE CPB ON 

THE EXCP DRIVER 

INPUT QUEUE 



ISAVE REGISTERS 



GET THE EXCP 

DRIVER ADDRESS; 

PUT THE RETURN 

ADDRESS IN 

AVTEA 



t RC-I A I, 



ISSUE I/O ON 

THE MESSAGE 

QUEUES DATA SET 



OS WAIT - 

WAIT FOR 

I/O 

COMPLETION 



REMOVE THE CPB 
FROM THE CPB 
CLEANUP QUEUE 



RESTORE 

CPBXREAF ( I /O 

AREA ADDRESS IN 

THE CPB) 



r — — n 

I RETURN 1 
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Chart RA CHECKPOINT DISK END APPENDAGE 



1G G0I9RA 
J ENTER I 



GET THE ADDRESS 

OF THE DISK 
RECORD FROM THE 
CHANNEL PROGRAM 
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Chart rb-1 TCAM DISPATCHER 



long i gag 



IGGJJ, 






FIRST PASS ENTRY 
POINT INTO THE 
TCAM DISPATCHER 



r SAVE 
REGISTERS; 
ESTABLISH 
ADDRESSA- 
k BILITY 



GET PARAMETERS 

PROM THE SAVE 

AREA IN THE AVT 




ISSTRQ., 



REMOVE AN 

ELEMENT FROM 

THE TOP OF THE 

READY QUEUE 



REMOVE THE 

ELEMENT FROM 

THE TOP OF THE 

DISABLED READY 

QUEUE 



GET THE ADDRESS 

OF THE QCB FROM 

THE ELEMENT 



GET THE ADDRESS 

OF THE READY 

QUEUE 



DSPPRIOR 

PRIQRTR 



GET THE ADDRESS 

OF THE FIRST 

STCB IN THE 

STCB CHAIN OF 

THE QCB 



FIND THE PLACE 

BY PRIORITY IN 

THE READY QUEUE 

CHAIN FOR THE 

ELEMENT 



DSPL I FOR 
UFQR 



DSPBYPAS 

.BYPASS, 



GET THE SUBTASK 

ENTRY CODE FROM 

THE STCB 



ROUTINES 





ATTPflfiT t 




mspwa.it 



-© 



COMPUTE THE 

SUBTASK ENTRY 

POINT 



CEX1T TO THE \ 
SUBTASK J 



PUT THE ELEMENT 

IN THE ELEMENT 

CHAIN OF THE 

QCB 



POST THE 
ATTACHED 
TCAM TASK 
COMPLETE 



• SET THE TSO 
fSWITCH QCBSTVTQ, 
X TO ZERO 
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Chart RB-2 TCAM DISPATCHER 



BRANCH ENTRY 
POINT INTO THE 
TCAM DISPATCHER 



LIST FUNCTION 





DSPLIST 
LIST 

y/\ S THIS THE^ 


S^NO 










V YES 


REMOVE THE 

ELEMENT FROM 

THE LIST 




PUT THE ELEMENT 

ON THE READY 

QUEUE 


' 


^\. LIST S* 
[YES 

1 RBI 






,YES 











POST OR 

POSTR 

FUNCTION 




REMOVE THE 

ELEMENT FROM 

THE ELEMENT 

CHAIN 




DSPUNAVR 



MOVE THE STCB 

TO THE PROPER 

QCB 



DSPDLETE 

DELETE 



DELETE THE 

START-UP 

MESSAGE 

ROUTINE 



TESTQ OR 

TESTQR 
FUNCT I ON 





R 1(?R I TY 



-U£fi 



POINT TO THE 

PRIORITY-FIFO 

CHAIN 
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Chart RC-1 EXCP DRIVER 



f ENTER J 



Q8.E3 
R6-3.DI 



> 




CRANtUT. 



GET THE ADDRESS 
OF THE FIRST 

I OB FOR 
REUSABLE DISK 



IS REUSABLE 



DELIMIT THE 
FIRST CPB FROM 
THE INPUT QUEUE 



READ/WRITE CCW 




IffiCflPE,,. 



CLEAR THE FLAG 

BYTE IN THE 

FIRST 

READ/WRITE CCW 



TURN ON THE 
•SLI' AND 'DATA 
CHAIN' BITS IN 

THE FIRST 
READ/WRITE CCW 



CHANGE THE 

NO-OP TO A 

DUMMY TIC 

( X * FF • ) IN THE 

SECOND CCW 



INSERT •KEYLEN* 

INTO THE LENGTH 

OF THE FIRST 

READ /WRITE CCW 



PUT THE ADDRESS 

OF THE BUFFER + 

12 IN THE CCW 

(ADDRESS OF 

BUFFER KEY) 



SET THE COUNT 

OF THE FIRST 

READ/WRITE CCW 

TO THE DATA 

LENGTH 



GET THE BUFFER 
ADDRESS FROM 

THE SECOND CCW 
TO THE FIRST 



C DISK USED J 
|YES 




RC-4 Al 










GET THE ADDRESS 

OF THE DEB FOR 

REUSABLE DISK 




CHECK I OB 




GET THE ADDRESS 

OF THE FIRST 

I OB FOR 

NONREUSABLE 

DISK 


START UP ANY 
WAITING IOBS 




















GET THE ADDRESS 

OF THE DEB FOR 

NONREUSABLE 

DISK 



MARK THE 

THRESHOLD 

ELEMENT AS 

'TPOSTED* 



( \ 

(exit TO DSPPOSTj 



PASS THE 

THRESHOLD 

CLOSEDOWN 

ELEMENT TO THE 

DISPATCHER 




C N 

I EXIT TO DSPDISPl 
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Chart RC-2 EXCP DRIVER 



PISKCPB 



:£-& 



CONVERT THE 

ADDRESS TO 

MBBCCHHR 



THE CPB^ 1 
•WRITE' 


S^NO 


INCREMENT THE 

COUNT OF 

BUFFERS NEEDED 

FOR A READ 




|YES 










1 



SET THE I OB REG 

TO POINT TO THE 

FIRST REUSABLE 

I OB IN THE 

GROUP 




SET THE I OB REG 
TO POINT TO THE 
FIRST NONREUS- 
ABLE I OB IN THE 
GROUP 



INDEX TO THE 
PROPER I OB FOR 
THIS EXTENT BY 

USING THE *M' 
OF MBBCCHHR 



SAVE THE CYL- 
INDER ID OF THE 
FIRST CPB AS 
HIGHEST PRI- 
ORITY CYLINDER 



ZERQNEWO 





/ SET THE \ 

CSWITCH TO -SKIP) 
\ TEST- / 



ADD A NEW CPB 

TO THE NEW 

QUEUE 



© 



BU1LUCCW 



SAVE THE 

READ/WRITE TIC 

(5 WORDS) 



• PRESET X 
/SECONDARY CPB~ 
[BASE TO 'LARGE' 
X. CPB > 



Q- 



SET THE 
SWITCH TO 
•DOTEST' 



A NOTHCPB 



GET THE 

CYLINDER OF THE 

NEXT CPB ON THE 

NEW QUEUE 






WUL 



CHAIN THE NEW 

CPB TO THE END 

OF THE NEW 

QUEUE 



~5 



1NSNEW 



INSERT A NEW 

CPB BEFORE THE 

NEXT CPB ON THE 

NEW QUEUE 




/ BUMP NEW \ 
' QUEUE INDEX ^ 

TO NEXT CPB; 
kBUMP PREVIOUS> 
\CPB POINTER/ 




/BUMP INDEX 
/TO NEW CPB ON 
(NEW QUEUE j BUMP. 

Xprevious CPB 

X POINTER 
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Chart RC-3 EXCP DRIVER 




RC-5„ AS 



HUNTFF, 



SEARCH THE 
PREVIOUS CPB 

FOR A X'FF' 

PSEUDO TIC OP 

CODE 



SET COMMAND 

CHAIN, SLI, AND 

LEGAL TIC OP 

CODE IN FIRST 

READ /WRITE CCW 




RC-5..AJ. 



/ MODIFY \ 

•secondary cpb\ 
cbase to 'small'* 



f ,BC-5 A3 
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Chart RC-4 EXCP DRIVER 



( >* 

I CHECK I OB J 



RC-I ,G5,D4 



PRESET THE 

COUNTER TO THE 

NUMBER OF 

ELEMENTS 



.0 



OCK t 



/ LOCK TO 
[FORBID DISK END, 
\ TO RETRY 



GET THE FIRST 

CPB ON THE NEW 

QUEUE 




USTCFB..T 



TAKE FIRST 
GROUP OF NEW Q 
CPBS ON I CYL 4 

QUEUE THEM ON 
THE RETRY QUEUE 



HANG THE 
REMAINING CPBS 

FOR OTHER 

CYLINDERS BACK 

ON NEW QUEUE 



© 










< UNLOCK TO \ 
[MIT DISK END. 
TO RETRY / 



UNLOCK TO 

^PERMIT DISK END, 

TO RETRY 





NEXT 1 OB 



INCREMENT THE 

INDEX TO THE 

NEXT I OB, IF 

ANY 



SAVE THE 
CYLINDER ID OF 
THE NEXT CPB AS 
THE TOP PRIOR- 
ITY CYLINDER 




MOVE THE CPBS 
FROM THE RETRY 

QUEUE TO THE 
IOBSTART QUEUE 



CLEAR THE ECB 

AND CLEAR THE 

RETRY QUEUE 



EXCP - ON 

THE 

IOBSTART 

QUEUE OF 

CPBS 



© 



© 
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Chart RC-5 EXCP DRIVER 



c 



3 ( l "° ectb ) c 



RC-3.DI ,F4 



BUILD SEARCH ID 

EQUAL AND TIC 

CCWS 



MOVE THE 

READ /WRITE AND 

TIC CCWS BACK 

INTO THE CPB (5 

WORDS) 



SET THE FINAL 

TIC TO A DUMMY 

(X'FFM 



1 
f RETURN J 



3 
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Chart RC-6 EXCP DRIVER 



( \ 

I 1EDQFP I 



RC-2.A2 
RF.G4 



/ PRESET \ 

(register to cpbJ 
\ dsect base / 




GET THE DATA 
SET DESCRIPTION 
FROM THE AVT OF 
THE NONREUSABLE 

DISK DATA SET 



GET THE DATA 
SET DESCRIPTION 
FROM THE AVT OF 
THE NONREUSABLE 

DISK DATA SET 



/Tbend SVC 13 - ^ 



RELATIVE RECORD 

NUMBER = RE- 
MAINDER OF AB- 
SOLUTE RECORD tt 
I TOTAL RECORDS 



GET THE PRODUCT 

OF THE NUMBER 

OF EXTENTS X # 

OF RECORDS PER 

TRACK 



RELATIVE RECORD 

# / PRODUCT = 
RELATIVE TRACK; 
REMAINDER = REL 
REC # ON TRACK 



<f FLAG THE \ 
ELEMENT BYTE \ 
TO BE TPOSTED > 
TO CAUSE / 



FLAG THE 
'ELEMENT BYTE 

TO BE TPOSTED 
V TO CAUSE y 
X CLOSEDOWN / 



WTO - TELL 

CONSOLE OF 

THRESHOLD 

CLOSEDOWN 



RELATIVE TRACK/ 
TRACKS PER CYL 

= REL TRACKS 
REMAINDER = REL 

TRACK NUMBER 



REL REC # ON 
THIS ROW / # 

RECS PER TRACK 
= REL DRIVE; 

REM = REL REC * 



FROM RELATIVE 
DRIVE # SET THE 
•M' OF MBBCCHHR 



CLEAR THE 'BB* 

OF THE MBBCCHHR 

TO ZERO 



ADD I TO THE 
RELATIVE RECORD 
NUMBER TO MAKE 
IT RELATIVE TO 



STORE THE 

RELATIVE RECORD 

NUMBER IN THE 

•R« OF THE 

MBBCCHHR 



STORE THE 

RELATIVE TRACK 

NUMBER IN THE 

•HH' OF THE 

MBBCCHHR 



SET THE BASE 
REGISTER TO DEB 

EXTENT CORRE- 
SPONDING TO THE 
REL DRIVE # 



ADD STARTING CC 

FROM THE DEB TO 

THE RELATIVE 

CYL U TO GET 

ABSOLUTE CYL # 



STORE THE 

ABSOLUTE 

CYLINDER NUMBER 

IN THE 'CC* OF 

THE MBBCCHHR 



CLEAR THE 
•COMMAND CHAIN* 

BIT IN THE 
READ/WRITE CCW 



/RETURN TO EXCP ^ 
I DR I VER 1 
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Chart RD-1 BUFFERED TERMINAL SCHEDULER 




ACTIVATE THE 

DESTINATION 

SCHEDULER VIA 

DSPBYPAS 



CEX I T TO \ 
DSPBYPAS ] 



CALCULATE THE 

ERB ADDRESS AND 

GET THE BUFFER 

ADDRESS 



NT ,A,3, 




GET THE 

TERMINAL ENTRY 

ADDRESS 



DSUAY, 



GET BUFDELAY 

FROM THE 

TERMINAL TABLE 

ENTRY 



STORE THE SCB 

ADDRESS IN 

LCBSCBA 



& 





, R,CV,,I 

SET LCBTTBIN 

WITH AN INDEX 

BYTE IN THE 

NEXT ILIST 

ENTRY 



RESET THE 

POLLING POINTER 

TO THE 

BEGINNING OF 

ILIST 



PUT THE ADDRESS 

OF THE BUFFER 

REQUEST QCB IN 

THE ERB 



MOVE THE 
INITIAL BUFFER 
COUNT FROM THE 
DCB TO THE ERB 



COMPUTE THE 

ADDRESS OF THE 

BUFFER DELAY 

VALUE 



MOVE THE TIME 
DELAY VALUE 
INTO THE QCB 




TPOST THE QCB 



NEXTTEST ' 



SET AN INDEX IN 

THE QCB FOR THE 

BTS EOTD 

HANDLER 



REMOVE THE QCB 

FROM THE LCB 

STCB CHAIN 




PREPARE TO 

TPOST THE QCB 

TO THE TIME 

DELAY QCB 



£~Q I 

/ "\ ( — — "s 

►I EXIT TO DSPPOSTl I EXIT TO DSPDISPl 
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Chart RD-2 BUFFERED TERMINAL SCHEDULER 



TAr ' 

C e ™ J 



5ENPT5T f 



GET THE NEXT 

STCB IN THE LCB 

STCB CHAIN 



HM-8.E2 AS-2.J5 

HMI-6.E2 

HM2-7.E2 



GET THE DCB 

ADDRESS FROM 

THE QCB 



SET UP THE SCB 

ADDRESS FOR THE 

RELATED QCB 



PUT THE 

DESTINATION QCB 

ADDRESS IN THE 

SCB 






OUT 



PREPARE TO 

RETURN TO THE 

DESTINATION 

SCHEDULER 



} 



jjgfl. 



REMOVE THE BTS 

STCB FROM THE 

LCB STCB CHAIN 



GET THE 

RELATIVE LINE 

NUMBER FROM THE 

QCB 




PREPARE TO 

TPOST THE LCB 

TO ITSELF 



GET THE NUMBER 

OF EXTENTS FROM 

THE DEB 



MULTIPLY 

LCBSIZE BY 

(RLN-I ) 



MOVE THE TTR OF 

THE HEADER AND 

SEGMENT INTO 

THE SCB 



/SET THE QCB\ 
' FLAG TO ^ 

INDICATE SEND 
k. STATUS > 



SET THE ERB 
PRIORITY AND 
BUFFER COUNT 



FLAG THE LINE 

NOT FREE IN 

LCBSTATI 



t RB-S.AI, 



s 



LY ^ 

1 MEXIT TO DSPPOSTl 



ADD THE PRODUCT 

TO DCBIOBAD FOR 

THE I OB ADDRESS 

FOR THE LCB 



SUBTRACT THE 

I OB OFFSET TO 

GET THE ADDRESS 

OF THE LCB 




INKflCB. 



LINK THE QCB TO 

THE LCB STCB 

CHAIN WITH 

DSPUNAVR 




NOP THE TIC 

COMMANDS AFTER 

THE POLLS IN 

LCBCPA 



© 
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Chart RD-3 BUFFERED TERMINAL SCHEDULER 



( \ 

I BTSTDQCB 1 



GET THE LCB AND 

THE QCB 

ADDRESSES 



TPOST THE QCB 

TO THE LCB STCB 

CHAIN VIA 

UNAVAILR 




( ^"^ 

I EX IT TO DSPPOSTl 



79a 



Chart RF EXCP DRIVER FOR A SINGLE CPB 




^NO 


GET THE CPB 

FROM THE INPUT 

QUEUE 




CLEAR THE FLAG 
BYTE IN THE 
SECOND CCW 















r ^ 

■lEXIT TO DSPD1SPJ 




NOFCQPE 



CLEAR THE FLAG 

BYTE IN THE 

FIRST 

READ /WRITE CCW 



TURN ON THE 
•SLI' AND 'DATA 
CHAIN' BITS IN 

THE FIRST 
READ/WRITE CCW 



MARK THE 

THRESHOLD 

ELEMENT AS 

•POSTED- 



SET THE COUNT 

OF THE FIRST 

READ /WRITE CCW 

TO THE DATA 

LENGTH 



INSERT 'KEYLEN' 

INTO THE LENGTH 

FIELD OF THE 

FIRST 

READ /WRITE CCW 



f ^ 

Iexit to DSPPOSTJ 



MOVE THE BUFFER 

ADDRESS FROM 

THE SECOND TO 

THE FIRST 

READ /WRITE CCW 



MOVE THE 
ADDRESS OF THE 

BUFFER + 12 
INTO THE SECOND 
READ /WRITE CCW 



RC-6 A 



CONVERT THE 

DISK ADDRESS TO 

MBBCCHHR 



INCREMENT THE 

READ COUNT BY 1 

IN AVTDSKCT 



SET THE I OB 
ADDRESS TO NON- 
REUSABLE CORRE- 
SPONDING TO 'M* 

OF MBBCCHHR 




SET I OB ADDRESS 
TO REUSABLE 
DISK CORRE- 
SPONDING TO 'M' 
OF MBBCCHHR 



SAVE THE 

READ/WRITE TIC 

(5 WORDS) 



BUILD THE 

SEARCH ID EQUAL 

AND TIC CCWS 



MOVE THE 

READ /WRITE AND 

TIC CCWS BACK 

INTO THE CPB (5 

WORDS I 



MOVE THE 

MBBCCHHR TO THE 

10B 



PUT THE CPB 
ADDRESS IN THE 
10BSTART FIELD 

OF THE I OB 



CLEAR THE INPUT 

QUEUE AND THE 

ECB FIELD IN 

THE I OB 



PUT THE ADDRESS 

OF THE I OB IN 

REGISTER I 



EXCP - TC 

DISK I/O 

FOR THIS 

CPB 



© 
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Chart RG- 1 GET/READ ROUTINE 



■GQfll?Rfi „ .,„ 
f ENTER 1 



RL.D5 




^- 





/ SET THE NO 
C EODAD RETURN 
\ CODE 



MOVE THE DECB 

ADDRESS INTO 

THE PROCESS 

ENTRY WORK AREA 



RESTORE THE 

PARTIAL BUFFER 

INFORMATION 



NPPftRT 



QW/UT f 



COMPUTE THE 

SIZE OF THE 

LOGICAL BUFFER 



SKIPMOVE 




LOCATE 



GET ADDR OF THE 

LOCATE MODE 

WORK AREA FROM 

ACCESS METHOD 

WORK AREA 



INITIALIZE THE 

PREFIX AND 
INCREMENT PAST 



INITIALIZE THE 

CONTROL BYTE 

AND INCREMENT 

PAST IT 




■ 5ET60Q , 



STORE THE EMPTY 

QUEUE CODE IN 

THE DECB 



© 





MOVE THE 

TERMINAL NAME 

OR DEFAULT INTO 

THE WORK AREA 



INCREMENT PAST 
THIS FIELD IN 
THE WORK AREA 
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Chart RG-2 GET/READ ROUTINE 



gSTPRFS, 



COMPUTE THE 

NUMBER OF DATA 

BYTES IN THE 

BUFFER 







'PREPARE TO X 
TAKE THE \ 
[CHECKPOINT EXIT) 



FILL THE WORK 

AREA WITH PART 

OF THE UNIT 



SAVE THE 

INFORMATION 

ABOUT THE 

PARTIAL BUFFER 



EMPTYBFR 



MOVE THE 

CONTENTS OF THE 

UNIT INTO THE 

WORK AREA 




<SET THE \ 
'SYNAD' AND \ 
RETRIEVE OK' J ' 



USER ROUTINE 



BALR TO THE 

CHECKPOINT USER 

EXIT 



EB A. I 



TURN OFF THE 

CHECKPOINT FLAG 

IN THE AVT 



GET THE SIZE 

AND ADDRESS OF 

THE NEXT UNIT 

IN THE BUFFER 




STORE THE WORK 

AREA 

DESCRIPTIONS IN 

THE PREFIX 




RETURNEM 



BUILD THE 

SPECIAL BUFFER 

RETURN ELEMENT 

AND THE AQCTL 

PARAMETER LIST 




EB A I 



TPOST SPECIAL 
ELEM TO RETURN 
BUFFERS TO MCP 



GET THE ADDRESS 
OF THE NEXT 
FULL BUFFER 



COMPUTE THE 

SIZE OF THE 

BUFFER 




© 
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Chart RG-3 GET/READ ROUTINE 





MJTSTt 

j/^% THE WORKS*. 
C UNIT A J 
^N^ MESSAGE -y< 

|NO 


YES 


MESSAGE 






CLEAR THE SCAN 
TABLE TO ZEROS 












MOVE THE RECORD 

DELIMITER FROM 

THE PROCESS 

ENTRY TO THE 

TRANSLATE TABLE 


YES 


>XT S A RECORDS. 
C DELIMITER J 
^SSPEC I F I ED/ 














NO 










iiRGRfffiU,, 














COMPUTE THE 

MAXIMUM SCAN 

LENGTH 
















NQRECPEL 



EMPTY THE 

BUFFER INTO THE 

WORK AREA 



MOVE THE DATA 

FROM THE BUFFER 

TO THE WORK 

AREA 




CPNTIS 



MOVE ANY 

CONT I GUOUS 

DELIMITERS INTO 

THE WORK AREA 





ADD I TO THE 

EMPTY BUFFER 

COUNTER 



ADD I TO THE 

EMPTY BUFFER 

COUNTER 



.BYPASS 



SAVE 

INFORMATION 

ABOUT PARTIAL 

BUFFERS 



MQBEZ. 



ADD I TO THE 

EMPTY-BUFFER 

COUNTER 




SET THE \ 

SYNAD' FLAG ^ 
FOR WORK AREA 
OVERFLOW > 



ARE THERE^ 
UNDEFINED 
RECORDS y* 


VNO 




CONSTRUCT A 

VARIABLE- 
FORMAT WORK 
AREA PREFIX 






(YES 


















1 R< 

V E 


;a 1 
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Chart RG-4 GET/READ ROUTINE 




/ STORE AN 
< ERROR CODE IN 
\ THE DECB 
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Chart RH- 1 GET COMPATIBLE ROUTINE 




NQPRQCES5 



GET THE ADDRESS 

OF THE DEB FROM 

THE DCB 



GET ADDR OF 

ACCESS METHOD 

WORK AREA FROM 

DEBsGET ADDR OF 

AVT FROM CVT 




RH-3 A5 




Ltli. 




'RESTORE THE 

CALLING 

ROUT I NE • S 

REGISTERS 



> 



I RETURN I 




GET THE 

START-OF-DATA 

ADDRESS IN THE 

BUFFER 





CONVERT THE 

OFFSET TO THE 

TERMNAME TABLE 

ENTRY ADDRESS 



POSTHOft 



SAVE THE 
ADDRESS OF THE 
CURRENT BUFFER 




MOVE THE 

TERMINAL NAME 

TO TRMAD 

ADDRESS 



SET UP TO 

TRUNCATE THE 

BUFFER 



SET THE 

•SYNAD EXIT' 

SWITCH 



SHPRTBUF 



MOVE THE BUFFER 

INTO THE USER 

WORK AREA 



COMPUTE THE 

NUMBER OF BYTES 

PER UNIT 



DECREMENT THE 

COUNTER OF 

BYTES TO BE 

MOVED 



MOVE DATA FROM 
THE BUFFER TO 
THE WORK AREA 




GET THE ADDRESS 

OF THE NEXT 

UNIT 



MOVE THE COUNT 

OF BYTES MOVED 

TO THE WORK 

AREA PREFIX 



MOVE THE WORK 

UNIT TYPE FLAGS 

INTO THE WORK 

AREA PREFIX 



JBU=2. 



RETURN EMPTY 

BUFFERS TO THE 

MCP 




SAVE ADDR OF 

CURRENT UNMOVED 

DATA; SAVE ADDR 

OF CURRENT 

BUFFER UNIT 




© 







800 



Chart RH-2 GET COMPATIBLE ROUTINE 



IS ^>V 

THERE A 
PARTIAL 
BUFFER . 
.LEFT yS 


"V.YES 


GET THE ADDRESS 

OF THE PARTIAL 

BUFFER 




GET THE ADDRESS 

OF THE CURRENT 

UNIT 




GET THE 


ADDRESS 








UNMOVED BYTE 


|NO 















PREPARE TO SCAN 

THE ENTIRE 

BUFFER 
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Chart RH-3 GET COMPATIBLE ROUTINE 



, FJECPSi. 



GET THE LENGTH 

OF THE DATA 

SCANNED 



MOVE THE DATA 

FROM THE BUFFER 

TO THE WORK 

AREA 



COMPUTE THE 

NUMBER OF EMPTY 

BYTES LEFT 



r CONT I GUOUS 
RECORD 
DELIMITER 





/IS THE WORK\ 
C AREA FULL J 

[NO 


YES 

1 RH2 
X G ^ 




MOVE THE RECORD 

DELIMITER INTO 

THE WORK AREA 














INCREMENT THE 

EMPTY BUFFER 

COUNTER 




/ SET THE X 

y'EOW FLAG IN^ 
< THE USER AREA 
X PREF I X J 



X re store THE\ 

><CALLING ROUTINE) 
X REGISTERS • 



f RETURN J 



f BUFRTN J 



RH-I ,DI ,K3 
RH-2.KI ,J3 



MOVE THE COUNT 

OF EMPTY 
BUFFERS TO THE 
SPECIAL ELEMENT 



/ BUILD THE X 
<AQCTL PARAMETER) 
X LIST / 



EB A I 



TPOST SPECIAL 

ELEMENT VIA 
AQCTL SVC 102 



f RETURN 1 
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Chart RI PUT/WRITE ROUTINE 
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Chart RJ PUT COMPATIBLE ROUTINE 




GET THE DCB AND 

WORK AREA 

ADDRESSES FROM 

THE REGISTERS 



'INITIALIZE ^ 

THE CONTROL 

BLOCK BASE 

REGISTERS 



CALCULATE THE 

DATA COUNT AND 

PUT IT IN THE 

PUT WORK AREA 



CONVERT THE 

CQTAM CONTROL 

BYTE TO ITS 

TCAM EQUIVALENT 



STORE THE 

RESULT OF THE 

CONVERSION IN 

THE PUT WORK 

AREA 




PUT THE \ 
, 'ERROR CODE IN\ 
<THE RETURN CODE. 
X REGISTER / 






YES 




GET THE ADDRESS 

OF THE TERMINAL 

NAME OF THE 

DESTINATION 


' 












YES 




SET UP THE 

PARAMETERS TO 

SEARCH THE 

TERMNAME TABLE 






UI A3 




I EDQU I 


► 


ACTIVATE IEDQAI 

TO SEARCH THE 

TERMNAME TABLE 









STORE THE 

TERMNAME TABLE 

OFFSET IN THE 

DEB 



BUILD A SPECIAL 

ELEMENT FOR THE 

PUT SCHEDULER 



•INITIALIZE X 
'THE PARAMETER^ 

LIST FOR THE 
VAQCTL SVC 102/ 




t EH ft! 



/ PUT THE \ 

•ERROR CODE IN\ 
[THE RETURN CODE? 
\ REGISTER / 



■ ' 

< RESTORE THEX 
CALLING \ 
ROUTINE'S > 
REGISTERS I 



TPOST THE 
SPECIAL ELEMENT 
TO THE PUT QCB 



WAIT FOR 

PUT 
SCHEDULER 

TO 
TERMINATE 



/ PUT A ^ 
' SUCCESSFUL 
RETURN CODE IN 
k RETURN CODE 
\ REGISTER J 



f RETURN J 
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Chart RK DISK END APPENDAGE FOR A SINGLE CPB 




GET THE 

MULTIPROCESSOR 

CVT ADDRESS 

FROM CVT + 

X'CO' 




GET THE TCAM 

TCB ADDRESS 

FROM THE AVT 



/ FLAG THE 
r TCAM TCB 

ELIGIBLE FOR 
k DISPATCH 



•not\ 

FOR > 

V 



GET THE OS TASK 

REMOVAL ROUT I NE 

ENTRY ADDRESS 



TESTDISP - 

I NTERRUPT 

THE OTHER 

CPU 



PUT THE CPB 
FROM THE I OB TO 

THE DISK 

APPENDAGE QUEUE 

AT 'AVTDKAPQ' 



PUT THE 

PRIORITY IN THE 

CPB CLEANUP QCB 

AT 'AVTCPBCB' 



CLEAR THE 
CLEANUP QCB 
LINK FIELD 



HANG THE QCB AT 

THE END OF THE 

DISABLED READY 

QUEUE 




HANG THE QCB AT 

THE START OF 

THE DISABLED 

READY QUEUE 

ALSO 



PUT THE QCB 

ADDRESS INTO 

THE LINK FIELD 

OF THE ELEMENT 

THAT WAS LAST 



r FLAG THE TCAM 
TCB 'ELIGIBLE 
kFOR DISPATCH 




am\ 

7 



/ RESTORE \ 
'REGISTERS AND^ 

I OS RETURN 
V ADDRESS J 



/ CLEAR ^ 

(REGISTER 9 FOR 
X IOS A 



( ^ 

I RETURN TO IOS I 



Program Organization 



8C5 



Chart RL CHECK ROUTINE 



ic npi9RL 

CjtlJ 



r SAVE 
REGISTERS 
ESTABLISH 
ADDRESSA- 

V BIL1TY 



» 



GET THE 

POINTERS TO THE 

DECB AND THE 

DCB 




'RESTORE THE^ 

CALLING 

ROUTINE'S 

REGISTERS 



f RETURN J 



WAIT FOR A 
FULL BUFFER 

ON THE 

READ-AHEAD 

QCB 



IS AN EODAD\YES 
EXIT 
SPECIFIED 




<SET THE \ 
• OUTPUT > 
!OR' FLAG IN 
THE DECB y 



SET THE 
INPUT ERROR 
FLAG IN THE 
DECB 



GET THE SYNAD 

ADDRESS FROM 

THE DCB 



PREPARE TO 

INVOKE THE READ 

ROUTINE 



GET THE EODAD 

ADDRESS FROM 

THE DCB 



< 



RESTORE THE^ 

CALLING 

ROUT I NE • S 

REGISTERS 



f RETURN J 



Rfi-I At 



READ A BUFFER 
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Chart RM POINT ROUTINE 



GGfll?RM 

f ENTER J 




GET THE ADDRESS 

OF AVT. TNT, 

DCB. DEB. AND 

ACCESS METHOD 

WORK AREA 




SET UP THE 

PARAMETERS FOR 

BINARY SEARCH 



t Ul A3 



ACTIVATE IEDQAI 

TO SEARCH THE 

TERMNAME TABLE 




/PUT THE ERRORS 
<RETURN CODE IN 
X REGISTER 15 J 



I RETURN J 



/TURN OFF THE 
►^•RETRIEVE- FLAG, 




SAVE THE 

TERMNAME ENTRY 

OFFSET IN THE 

ACCESS METHOD 

WORK AREA 



MOVE THE 

ELEMENT TYPE 

INTO THE WORK 

AREA 



MOVE THE 

SEQUENCE NUMBER 

INTO THE WORK 

AREA 




< RESTORE THe\. / PUT THE \ 

CALLING X /NORMAL RETURNX 

ROUTINE'S > C CODE IN > 

REGISTERS / X REGISTER 15 / 
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Chart RN-1 PCI APPENDAGE 



1 C Gp I 9RN 
f ENTER J 



( ^ P05 T J 



RN-2.KI 
RN-2.C5 




/ FLAG THE > 
• TASK 'NOT TO 
CBE DISPATCHED' 
\ IN THE TCB 



TESTDSP - 
OS TASK 
REMOVAL 
ROUTINE 



NQMF 



i nt « v i . loo . 

AND THE BUFFER 

THAT CAUSED THE 

INTERRUPT 



PUT THE ELEMENT 

ON THE DISABLED 

READY QUEUE 





S^YES 


RDRESP 




WAS THE PC I s 

ON A READ 
.RESPONSE -x> 


SUBTRACT 8 FROM 

THE CSW ADDRESS 

TO GET THE 

PREVIOUS CCW 








(NO 







f >l 

I RETURN J 



IS THIS 

SEND 
OPERAT I ON 



GET THE BUFFER 

RETURN QCB AND 

PRIORITY FOR A 

TPOST 



■fi.ET.MH 



GET THE STARTMH 

QCB ADDRESS AND 

PRIORITY FOR A 

TPOST 




WO- I 2 



PERFORM A DATA 
SCAN FOR TRANS- 
PARENT MODE 




SET THE PREFIX 

SOURCE FIELD 
FROM THE INDEX 
BYTE OF RESPON- 
DING TERMINAL 



UPDATE THE 

INVITATION LIST 

POINTER TO THIS 

ENTRY 



NT ftS 



GET THE 

TERMINAL ENTRY 

ADDRESS 



CONTINUE 



CALCULATE 

BUFMAX - BUFIN 

OR BUFOUT 
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Chart RN-2 PCI APPENDAGE 




GET THE BUFFER 

ADDRESS AND THE 

NUMBER OF UNITS 

PER BUFFER 



GET THE ADDRESS 

OF THE NEXT 

UNIT 



© 




THE LOOP 

COUNTER EQUAL 

TO FOUR 



TLSPCI 



SET LCBLSPCI = 
THE ADDRESS OF 
THE NEXT BUFFER 



ADD 1 TO THE 

BUFFER COUNT: 

SET THE BUFFER 

SIZE AND 

PRFNLSTN 



RN-I AS, 




SET UP TO 

RETURN TO OS 

POST 




TPOST THE ERB 



f RETURN J 



GET THE ADDRESS 

OF THE LAST 

CHARACTER IN 

THE BUFFER UNIT 



CHECKCH 



GET THE FIRST 

END I NG 

CHARACTER 

OFFSET IN THE 

SCT 
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Chart RO- 1 TC AM DISPATCHER WITH SUBTASK TRACE 




f TRACE J 



RO-1 ,J5 



GET THE TRACE 
TABLE ADDRESS 
FROM THE AVT 




IS CURRENT \NO 
= LAST ENTRY 
IN TABLE 



WRAP TO THE 

BEGINNING OF 

THE TABLE 



UPDATE THE NEXT 

AVAILABLE ENTRY 

PO I NTER 



( N 

I RETURN 1 



MCPWA1T 



OS WAIT - 

FOR AN 
I NTERRUPT 



-0 



COMPUTE THE 

SUBTASK ENTRY 

POINT 



RQ-' »* 



MAKE AN ENTRY 

IN THE SUBTASK 

TRACE TABLE 



PUT THE ELEMENT 

IN THE QCB 

ELEMENT CHAIN 



OS POST - 

THE 
ATTACHED 
TASK ECB 

COMPLETE 



/ SET THE TSO 
(SWITCH QCBSTVTO, 
X TO ZERO 
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Chart RO-2 TCAM DISPATCHER WITH SUBTASK TRACE 



© 



REMOVE THE 

ELEMENT FROM 

THE LIST 




© 



LIFQ 



PUT THE ELEMENT 

ON THE READY 

QUEUE 



DSPUNAVR 



MOVE THE STCB 

TO THE PROPER 

QCB 



PRLQgJJJL 



POINT TO THE 

PRIORITY-FIFO 

CHAIN 
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Chart RP- 1 REUSABILITY-COPY SUBTASK 




__ /turn off \ 
i i / the 'call \ 
d i rpi i < copy' bit > 

V ElJ \ IX' 20' IN / 

V7 \AVTBIT2) / 

» 

CKRFIISQ 



G6TCPB 



DELINK THE 

FIRST CPB FROM 

THE REUS CPB 

QUEUE 




DECREMENT THE 
COUNT OF READ 

OUTSTANDING BY 
ONE 



IS THERE A \NO 
LOGICAL READ 
ERROR 






RFJJLE. 

/ TURN 
NO Xthe 'R 

> »< FULL' 

\allow 

^PERA 



TURN OFF \ 
~ REUS IS > 

BIT TO 
.._.. RECEIVED 
OPERATIONS 7 



RF-? t\\ 




BRNCHTAB t 



SET THE LCB AND 
SCB BASE 
REGISTERS 



CONVERT TYPE OF 
CPB (LOW ORDER 

FOUR BITS OF 

CPBFLAG) TO AN 

INDEX 




/u 

NO / • 

I ►< FUL 

\HAL 



TURN ON 
REUS 
FULL' B 
.HALT RECE 

OPERAT 




<***-* V 

GET THE \ I EXIT TO \ 

IEDQFA BASE V • »l IEDQFA02 I 

REGISTER / V J 
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Chart RP-2 REUSABILITY-COPY SUBTASK 



/ TURN OFF ^ 
f 'REUS FIRST 
TIME' SWITCH 
V (AVTBIT2, 
\ X'80') y 



RP-9 C! 



RETURN CPB AND 
WORK UNIT TO 
THE FREE POOL 




/flag the cpb \ 
Cas belonging to3 
\ reusability / 



/ SET THE ^ 
* 'REUS IS 
RUNNING' BIT 
k (AVTBIT2, 



RESET THE 

REGISTERS FOR A 

DUMMY LCB AND 

SCB 




HC-' A 3 



REMOVE THE CKPT 

ELEM FROM TIME 

DELAY QUEUE 



OS POST - 

THE 

OPERATOR 

CONTROL ECB 



OFgBUU. 





PASS THE 
CHECKPOINT ELE- 
MENT WITH ITS 
PRIORITY TO THE 
TCAM DISPATCHER 



/turn OFF THE 
< 'REUS IS 

Running* bit 



GET THE ZONE 
BOUNDARIES FROM 
THE LOAD POINT 




CLEAR THE ^ 
•LAST 
MESSAGE' AND 
•FIRST BAD' 
SWITCHES > 



♦ RB-2 A I 



TPOST THE 

CHECKPOINT 

ELEMENT 



GET THE 

TERMNAME TABLE 

INDEX FOR THE 

LAST TERMINAL 



GSTTNT t RP-11 A/> 
CALLTNT 




GET THE 

TERMINAL ENTRY 

ADDRESS 





FLAG THE 

CHECKPOINT 

ELEMENT AS 

TPOSTED 



» 



INCREMENT THE 

PRIORITY QCB 

ADDRESS TO THE 

NEXT LEVEL 



• CLEAR THE \ 
'•HELD' BIT TO^ 

ALLOW SENDING 
WTO THE SOURCEy 
\ QCB / 



BUMPINPX t 



BACK UP THE 
INDEX TO THE 
NEXT TERMNAME 

TABLE ENTRY 



SAVE THE MASTER 
AND PRIORITY 
QCB ADDRESSES 

FOR THE SOURCE 




♦ RP-" AS 



SET THE 

SOURCE QUEUE 

TYPE TO 

REUSABLE 



> 



© 



SAVE THE NEW 

SOURCE PRIORITY 

QCB ADDRESS 



PR'EUS 



GET THE ADDRESS 
OF THE CPB 
BUFFER UNIT 



SAVE THE 
PRIORITY FROM 

THE SOURCE 
PRIORITY QCB 



GET THE ADDRESS 

OF THE NEXT 

UNUSED HEADER 

FROM THE 
PRIORITY QCB 
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Chart RP-3 REUSABILITY-COPY SUBTASK 



| RP3 I 




/ SET THE 
r 'REUS DISK 

AND 'CANCELED 
S.HEADER' FLAGS. 
\IN THE CPB 



BUILD CANCELED 

MESSAGE, ONE 

UNIT. AND ONE 

BUFFER IN THE 

CPB UNIT 



RP-IO A 3 



GET CANCELED 
MSG ASSIGNED TO 
THE DISK QUEUE 



SET THE CPB TO 

WRITE TO 

PRFCRCD 



MARK THE 

UNIT AS 

^CANCELED: CLEARJ 




GENERATE THE 

•WRITE KEY AND 

DATA' OP CODE 

IN CPB CCWI 



GENERATE THE 

•WRITE DATA' OP 

CODE IN CPB 

CCW2 



CPBflNQ 



RP-? A3, 



PASS THE CPB TO 

EXCP DRIVER ON 

FIFO INPUT Q 



• TURN ON THE\ 
• QCB 'HELD' \ 
(BIT TO STOP THE) 
\ SEND / 

\ SCHEDULER / 




HflLPMOWB 



PASS THE 

ADDRESSES OF 

THE SOURCE 

MASTER AND 

PRIORITY QCBS 





HQLDMPYE 



PUT QCBFFEFO IN 

DATFEFO IN THE 

CPB BUFFER 



HQLPFIX 



i u vjuor r tr us 
CLEAR QCBINTFF 



HflLPfiETP t 





CLEAR DATFLAGS 



SET CPBADDR TO 
READ FROM 
QCBFFEFO 



SET CPBFLAG TO 

•WRITE HOLD 

DATA* 



FLAG THE CPB AS 

•READ HOLD 

DATA * FROM 

REUSABLE DISK 
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Chart RP-4 REUSABILITY-COPY SUBTASK 



HQLBQUT 



PASS THE 
ADDRESS OF THE 

MASTER AND 

PRIORITY SOURCE 

QCBS 



GET ADDRESS OF 

FIRST BUFFER IN 

CORE QUEUE OF 

THIS PRIORITY 

SOURCE QCB 



RP-11 A3 



SEE IF THE 
FIRST MESSAGE 
IS BEING SENT 





GET NEXT HEADER 

BUFFER IN MAIN 

STORAGE FROM 

THIS BUFFER'S 

POINTER 



<SET THE \ 
•FIRST \ 
MESSAGE WAS > 
BAD' SWITCH / 



SET THE CPB TO 

READ THE HEADER 

OF THE FIRST 

UNSENT FEFO 

MESSAGE 



/ FLAG 
/CPB AS 
IDISK' AND 
\ BAD 



THE X 

•REUS \ 

ND 'READ* 

rv 



SAVE THE ID OF 

THE BAD HEADER 

(BADHEAD) 



XlARK THE CORE^ 
fcOPY 'CANCELED' 



iFTNTXT 



SET CPBADDR TO 

THE OLD NEXT 

TEXT BUFFER 

SAVED IN NTXT 




POUNITS 



MAKE THE SECOND 

UNIT LOOK LIKE 

THE HEADER, BUT 

WITH ONE LESS 

UNIT 



FREE CORE MSG 

STARTING WITH 

NEXT BUFFER 



/set the cpb\ 

< flag to 'read > 

\ Nl " / 



RP-I) A I 



FREE CORE MSG, 

STARTING WITH 

2ND UNIT AS HDR 



RP-IQ lV 



SET CPB FLAG TO 
REUS OR NONREUS 
DISK OF SRCE Q 




RKPRDS 



GENERATE THE 

•READ KEY AND 

DATA' OP CODE 

IN CPB CCWt 



GENERATE THE 

READ DATA' OF 

CODE IN CPB 

CCW2 



PRESET THE 

REGISTERS, CPB 

BUFFER , AND 

MAIN STORAGE 

BUFFER 



MOVE THE KEY 

FIELD FROM THE 

MAIN STORAGE 

QUEUE UNIT TO 

THE CPB BUFFER 
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Chart RP-5 REUSABILITY-COPY SUBTASK 




NflTHPRBF RP-1Q A3 



GET THE BUFFER 
ASSIGNED TO AL- 
TERNATE DEST 



SAVE THE 
ADDITIONAL TEXT 
RECORD POINTER 

(NEWXTRA) 



© 



^ IS THIS A ^Nv 
C REUS OR A J 
\ COPY CPB yr 

(COPY 


REUS 








NO 






S^\% THIS A^>v. 
C SINGLE UNIT J 
X. BUFFER yT 


GET THE XTRA 

PO 1 NTER FOR THE 

NEXT UNIT 








YES 








GET THE NEXT 

TEXT POINTER AS 

THE NEXT UNIT 












NON 


NON 






^/lS THISN. 
.^REUSABLE t»\ 
C NONREUSABLE J 

XJ DISK y^ 


SAVE THE NEXT 

RECORD ID IN 

SCBMBSSA+4 








REUS 








SAVE THE NEXT 

RECORD ID IN 

SCBMBSSA 














NOTCgpY 






SAVE THE NEW 

HEADER ID FROM 

PRFCRCD IN 

•NEWHEADER' 
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Chart RP-6 REUSABILITY-COPY SUBTASK 



cogEfltujL 



MOVE THE NEW 
HEADER ADDRESS 

FROM PRFCORE 
INTO 'NEWHEADR 





FLAG THE CPB 
AS A 'WRITE 
EADER' TYPE 



» 



Rp -'° V 



SET CPB FLAG TO 
INDICATE REUS 
OR NONREUS 






GET THE ADDRESS 

OF THE OLD LAST 

UNSENT MESSAGE 

ON THE CORE 

QUEUE 



SET THE CPB TO 

WRITE TO THE 

DISK ADDRESS IN 

PRFCRCD 



ANY 
IrtORE UNSENT\NO 
MESSAGES FOR 
ALTDEST 



DECREMENT THE 

COUNT OF 

MESSAGES ON THE 

SOURCE QUEUE BY 

ONE 




RP3 I 

v 



PUT NEW MESSAGE 

ADDRESS INTO 

THE FEFO 

POINTER OF OLD 
LAST MESSAGE 



MQI..ASTMS 



MAKE THE NEW 
MESSAGE FIRST 
MESSAGE ON THE 
ALTERNATE DES- 
TINATION QUEUE 



UPDATE QCBLFEFO 

TO POINT TO THE 

NEW LAST 

MESSAGE 



PASS ADDRESSES 

OF THE PRIORITY 

AND MASTER 

DESTINATION 

QCBS 



MARK THE 
BUFFER AS 
•SERVICED' 



*P-" A3 



SEE IF THE 
FIRST MESSAGE 
IS BEING SENT 



MOVE THE 

ADDRESS OF THE 

ORIGINAL HEADER 

FROM 'BADHEAD* 

TO 'CPBADDR' 



UPDATE SCBFEFO 
WITH 'NEWHEADR* 

AS IF NEW MSG 
ID WAS IN FEFO 
PTR OF MSG SENT 




r FLAG THE SCB 

AS HAVING A 

WFEFO POINTER 



jtouoe. 




O 



GET ID OF LAST 
MESSAGE IN THE 
ALTERNATE DES- 
TINATION QUEUE 
(QCBLFEFO) 




OF 



PUT THE 
THE NEW LAST 
(JUST COPIED) 
MESSAGE INTO 
QCBLFEFO 



GENERATE A 

•WRITE DATA' C 

CODE IN CPB 

CCWI 



INCREMENT THE 

DESTINATION QCB 

MESSAGE COUNT 

BY ONE 



/ V 

/ RESTORE X 
< REGISTERS > 



PUT THE ID OF 

THE NEW MESSAGE 

INTO DATFEFO 

FOR THE OLD 

LAST MESSAGE 



GENERATE A 

•NO-OP* OP CODE 

IN CPB CCW2 
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Chart RP-7 REUSABILITY-COPY SUBTASK 




_BJ2*_ 



SET CPBADDR TO 

THE RECORD 

ASSIGNED AS 

•NEWXTRA* 



INCREMENT 
NEWXTRA BY I IN 
CASE ADDITIONAL 
XTRA RECORD IS 

ASSIGNED 



FLAG THE 

BUFFER AS 

•XTRA' 



SET DATFEFO TO 

POINT TO ITSELF 

(IT IS NOT 

HEADER, BUT 

XTRA) 



RP-IO A2 



SET CPBFLAG TO 

REUS OR NONREUS 

OF ALTDEST 



T RP-18 A' 



SET CPBFLAG TO 
REUS OR NONREUS 
DISK FOR SRCE Q 
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Chart RP-8 REUSABILITY-COPY SUBTASK 



f \ 

I COPY SUBTASK 1 



Q 



MOVE THE 

DESTINATION 

FROM PRFDEST TO 

•ALTDESX' 



SET REGISTERS, 

PROGRAM BASE, 

BUFFER ADDRESS 



GET ADDR OF 

REAL 1ST UNIT 

FROM PRFCORE 

(UNIT IN BUFFER 

IS A COPY) 



SET REGISTERS, 

LCB, SCB, AND 

QCB 



m Jj£^3 m J±t 



PUT THE NEW 

BUFFER ON THE 

COPY QUEUE 



MOVE 1ST BUFFER 
EXTRA UNIT ADDR 

FROM TIC OF 
REAL BUFFER TO 

TIC OF COPY 



G 



GET THE 
PRIORITY LEVEL 

OF THE 

DESTINATION QCB 

FROM • SCBPR I ' 



/ SET THE > 
/ 'COPY 

< REQUESTS CON- 

XTROL' BIT FOR, 

VmiS BUFFER/ 



flfiCQEI. 



SKIPCALC 



IDENTIFY THE 

DESTINATION 

QUEUE TYPE (DR, 



SAVE THE 

DESTINATION 

PRIORITY QCB 

ADDRESS IN 

•DQCB' 



RP-9 h\ 



GET THE CPB AND 

THE WORK AREA 

UNIT 




FLAG THE SOURCE 

AS REUSABLE 

DISK 



UNLINK THE 

FIRST BUFFER 

FROM THE COPY 

QUEUE 





GET THE FIRST 

UNIT GIVEN TO 

COPY FROM 

•BUFFER' 




GET THE ADDRESS 

OF NEXT CORE 

BUFFER FROM TIC 

OF UNIT IN 

•BUFFER* 



fiaCKCNT 



GET THE ADDRESS 
OF THE NEXT 
CORE BUFFER 

FROM 'PRFNTXT' 



GET MULTIPLE 
ROUTING COUNT 

FROM THE TIC OF 
THE NEXT UNIT 

OF THE MESSAGE 



sum. 



FLAG THE SOURCE 

AS NONREUSABLE 

DISK 



PREPARE TO GET 

THE NEXT UNIT 

ADDRESS FROM 

SCBMBSSA 



BETROL 



PREPARE TO GET 

THE NEXT UNIT 

ADDRESS FROM 

SCBMBSSA+4 




DECREMENT THE 
COUNT BY ONE; 
SAVE THE NEW 
COUNT IN THE 
TIC FIELD 



GET THE UNIT 

COUNT FROM 

PRFNBUNT OF THE 

FIRST UNIT IN 

•BUFFER* 



MOVE THE BUFFER 

TO THE DISK 

UNIT ATTACHED 

TO THE CPB 




SAVE THE 

ORIGINAL BUFFER 

ADDRESS IN 

•BUFFER* 




'FLAG THE CPB ^ 

AS 'BELONGING 
VTO REUS/ COPY •> 




GET ADDRESS OF 

•NTXT' FROM 

•XTRA* AND # OF 

UNITS i PUT IT 

IN 'PRFNTXT' 



© 



BQUMI1 



MAKE THE SECOND 
UNIT LOOK LIKE 
THE FIRST UNIT 
OF THE MESSAGE 



BP-" A2 



FREE THE CORE 
MSG STARTING 
WITH NEXT BFR 



l.Rfi-U A' 



PUT THE CORE 
MSG IN THE 
BUFFER POOL 



NOTIHO 



■Bg-„? fiS, 



RETURN CPB AND 

WORK AREA UNIT 

TO FREEPOOLS 



© 
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Chart Rp-9 REUSABILITY-COPY SUBTASK 



GET THE 
ORIGINAL UNIT 
FROM 'BUFFER' 



SET THE BUFFER 

TO BE RETURNED 

TO THE QCB 

POINTED TO BY 

LCBRCQCB 



SET REGISTERS - 
ELEMENT TO BE 

TPOSTED TO REG 
I, DISPATCHER 

BASE IN REG I I 



RB-8 A 



f FIFOBUF j f FIFOCPB J 



RP-8.C1 



CLEAR THE 

FORWARD POINTER 

OF THE BUFFER 



RP-3.JI 



CLEAR THE 

FORWARD POINTER 

OF THE CPB 



SAVE THE AD- 
DRESS OF THE 
OLD LAST ELEM 
(IF ANY) ON THE 
FIFO QUEUE 




SAVE THE 

ADDRESS OF THE 

OLD LAST CPB 

(IF ANY) ON THE 

FIFO QUEUE 



PUT THE NEW 

BUFFER AT THE 

END OF THE FIFO 

QUEUE 



1*1-0 : n«iNU i nc 

REST OF THE 

CPBS ONTO 

FREEPOOL 



PUT THE NEW CPB 

AT THE END OF 
THE FIFO QUEUE 




(RETURN ERROR \ 
CONDITION TO I 
CALLER J 

f FREEBLKS J 



CLEAR THE 

FORWARD POINTER 

IN THE UNLINKED 

CPB 




RP-2.A2 
RP-8.K5 



HANG THE FREE 

UNITS ONTO THE 

UNIT BEING 

RETURNED 



PUT THE NEW 

ELEMENT AT THE 

HEAD OF THE 

FIFO QUEUE 



PUT THE AD- 
DRESS OF NEW 
ELEM IN FORWARD 
POINTER OF OLD 
LAST ELEMENT 



1 '^^^^ 

(RETURN TO THE\ 
MAIN ROUTINE 1 
(BR 14) J 



REST OF THE 

UNITS ONTO 

FREEPOOL 



HANG THE WORK 

AREA UNIT ONTO 

AN AVAILABLE 

BUFFER IN 

FREEPOOL 



INCREMENT THE 

COUNT OF 

AVAILABLE UNITS 

BY ONE 



NQFREUNI T 

HANG THE CPB 

FREEPOOL OFF 

THE NEW CPB 

BEING RETURNED 



HANG THE WORK 

AREA UNIT ONTO 

THE CPB 



PUT THE CPB 

INTO THE CPB 

FREEPOOL 



DECREMENT THE 

COUNT OF 

AVAILABLE UNITS 

BY ONE 



f RETURN TO \ 
ICALLER (BR 14) 1 



(RETURN NORMAL \ 
CONDITION TO I 
CALLER J 
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Chart RP-10 REUSABILITY-COPY SUBTASK 



f SETCPBF J f SETCPBFL J f CALLHMOa J 



RP-4.E5 
RP-7.J4 



RP-6.B3.K4 
RP-7.F5 



<SET THE \ / SET THE \ 
SWITCH TO > < SWITCH TO > 
•BRANCH' • X 'NO-OP' • 



SAVE THE 

REUS/COPY BITS; 

PUT CPBTYPE IN 

CPBFLAG 




ADD THE QTYPE 

OF THE 

DESTINATION TO 

CPBFLAG 



WANTRFAD 



ADD THE QTYPE 

OF THE SOURCE 

TO CPBFLAG 




H RETURN (BR 14 







PASS THE 
ADDRESS OF THE 

MASTER 
DESTINATION QCB 



SET REGISTER 14 

TO RETURN TO 

•MOREUNT' 



RP-3.DI 
RP-5.A5 



PASS THE LCB 

ADDRESS IN THE 

REGISTER AND IN 

PRFLCB 



CALLHM t 



PASS THE 

ADDRESS OF THE 

SCB 



PUT THE ADDRESS 

OF THE 

DESTINATION QCB 

IN 'SCBDESTQ' 




IS THIS CPB\NO 
FOR A CANCEL 
HEADER 



GET THE ADDRESS 

OF THE PRIORITY 

SOURCE QCB 



ADJUST THE QCB 
REGISTER TO THE 

PRIORITY 

PORTION OF THE 

QCB 



PRESERVE THE 
CONTENTS OF THE 
PRFSTATI FIELD 




-£_AX 



GET QUEUE AD- 
DRESS ASSIGNED 
TO NEW MESSAGE 



RESTORE THE 

SAVED CONTENTS 

OF PRFSTATI 




HMEX1T 



I RETURN J 




UNITS ARE 

EXCHANGED: COPY 

PREFIX TO NEW 

UNIT RETURNED 

BY IEDQHM 



GET THE ADDRESS 
OF THE PRIORITY 
DESTINATION QCB 




INDICATE NO 

ALTERNATE 

DESTINATON TO 

AVOID A FEFO 

UPDATE 
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Chart RP-1 1 REUSABILITY-COPY SUBTASK 



(3E_) C 



RP-4.E4 
RP-8.J5 



DECREMENT NO OF 
UNITS IN CORE 

QUEUE BY NO OF 

UNITS IN THIS 

BUFFER 



SET REGSt RI - 
BUFFER, RI5 - 
BUFFER RETURN 

QCB (INTO 
PRFQCBA ALSO) 



PUT PRIORITY 

• PR I BFRTB • I NTO 

THE BUFFER 



PUT THE BASE 

FOR THE 

DISPATCHER IN 

REGISTER II 



t RB-S ft |, 



TPOST THE 

BUFFER TO 

BUFFER RETURN 




1 I FINDHM03 J f CALLTNT J f ACTSCHED J 



RP-4.E3 
RP-8.J4 



(RETURN TO THE ^ 
MAIN ROUTINE 1 
(BR 2> J 



GET THE NEXT 

BUFFER ADDRESS 

FROM PRFNTXT 



RP-3.F2 RP-6.F3 

RP-4.BI 

RP-5.CI 



INCREMENT THE 

PRIORITY QCB 

ADDRESS PAST 

MASTER PORTION 

OF THE QCB 



GET THE ADDRESS 

OF HM03 FROM 
THE WORD BEFORE 
THE HM02 ENTRY 



SAVE THE 

INTERNAL RETURN 

ADDRESS 



HM-5 A4 



ONLY MESSAGE 

BEING SENT ON 

THIS QCB? 




RESTORE THE 

MAIN ROUTINE 

RETURN ADDRESS 



(RETURN TO \ 
CALLER I 

ONLY MESSAGE 
BEING SENT 



RP-2.GI 
RP-5.F3.H3 



CLEAR THE HIGH 
HALFWORD OF REG 
IN INDEX TO THE 
TERMNAME TABLE 



GET THE ENTRY 

ADDRESS FROM 

AVTRNMPT 



NT A.3, 



GET THE 

TERMINAL ENTRY 

ADDRESS 



( \ 

I RETURN I 



RESTORE THE 

MAIN ROUTINE 

RETURN ADDRESS 



RP-2.J4 
RP-6.F5 



GET THE 

DESTINATION 

SCHEDULER 

ADDRESS 



^AVE REGISTERS^ 



PASS THE 

REGISTERS, LCB, 

SCB, AND QCB 

ADDRESSES 



HMr.8, A I, 



f RETURN J 




NOTHING BEING 
SENT 



FIRST OF SEVERAL 
BEING SENT 
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Chart RQ POST PENDING ROUTINE 



I ENTER J 




GET THE DEB 

CHAIN ADDRESS 

OF THE TCB 




GET THE ADDRESS 

OF THE NEXT DEB 

IN THE CHAIN 




GET THE ADDRESS 

OF THE ECB FROM 

THE DEB 



SET UP THE 

PARAMETERS FOR 

THE OS POST 

ROUTINE 



OS POST - 

THE ECB 
COMPLETE 



/ TURN OFF 
f THE 'POST 

PENDING' FLAG 
k IN THE TCB 



\ Restore the\ /" "\ 

X • calling X / I 

AG? -*< ROUTINE'S > »l RETURN I 

/ X REGISTERS • V^ J 
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Chart RO-1 LINE END APPENDAGE 








824 



Chart RO-2 LINE END APPENDAGE 




SET THE PARAM- 
ETER LIST TO 
TPOST THE ERB 
TO THE BUFFER 

DISPOSITION QCB 



RflrlQ. A, 4 



©* 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



( *\ 

I RETURN 1 



SET THE LCB TO 
BE TPOSTED TO 

THE QCB ADDRESS 

SPECIFIED IN 

THE LCB 



RQ-IQ M 



PUT THE ELEMENT 

ON THE READY 

QUEUE 



SET THE LCB TO 

BE TPOSTED TO 

THE BUFFER 

DISPOSITION QCB 




GET THE ADDRESS 

OF THE 

INVITATION 

LIST: RESET THE 

RECEIVE LIMIT 







GET THE ADDRESS 

OF THE NEXT 

ENTRY 




UPDATE THE 

INVITATION LIST 

POINTER 



NT.A3 



GET THE 

TERMINAL ENTRY 

ADDRESS, 





SET UP TO 

RESTART ON THE 

NEXT CCW 




• TURN OFF THE ^ 
(ERROR FLAGS TO 
\ RESTART > 



RESTORE THE 

REGISTERS FOR 

THE I/Q 

SUPERVISOR 



f N 

I RETURN 1 
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Chan RO-3 LINE END APPENDAGE 




GET THE RETURN 
ADDRESS TO THE 
I/O SUPERVISOR 
TO SCHEDULE ERP 



ADJUST THE 
RESTART ADDRESS 

AND INCREMENT 
THE RETRY COUNT 
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Chart RO-4 LINE END APPENDAGE 




ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

I S NOT POSTED 




SET UP TO 

RESTART ON THE 

WRITE IDLES 

LOOP 



♦ R0-»3 A4 



t RO-H 





•TURN OFF THE 
CERROR FLAGS TO 
\ RESTART 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



( \ 

I RETURN 1 




BUILD A BREAK 
COMMAND AND 

SAVE THE 
CURRENT CSW 



SET THE TP OP 

CODE = X • I Z ' j 

SET THE START 

ADDRESS 



( \ 

I RETURN I 



CHECK ID AND 

SET A BRANCH 

RETURN 
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Chart RO-5 LINE END APPENDAGE 




828 



Chart RO-6 LINE END APPENDAGE 




RO-IC, A' 



RQ-,10 A< 



ADJUST PRFS1ZE 



T, JRQ- I.Q, A* 



TPOST THE 

BUFFER TO THE 

MH AS EOM 







Rq-'Q v* 



TPOST THE 

BUFFER TO THE 

MH 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 




Q 



♦ Rfl-13 \* 



■ROt.U, 




SET UP TO 

RESTART ON READ 

ID ENQ 



Q 




SET UP TO 

RESTART ON READ 

LCOUT 



SET UP TO START 

AT WRITE ACK 

(NAK) 



BUILD A WRITE 
NAK, READ TEXT 



r TURN OFF THE ^ 
CERROR FLAGS TO 
RESTART J 



R8-I3 A4 



t m-ij <y 



CHECK THE I D; 
SET UP FOR A 
BRANCH RETURN 



Q 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERV I SOR 



( N 

I RETURN J 



YES/^ IS THE \. 

i C TERMINAL J 

\l RECE I V I HOyS 

[no 






S^ IS THIS ^S». 
C TRANSPARENT J 
> X V MODE ^^ 


YES 


SET THE TIC 

CHAIN FOR 

TRANSPARENT 

BUFFER 






NO 










RQ-IO A 


1 






F I NDBUFF 






GET THE CURRENT 
BUFFER 














TPOST THE 
BUFFER TO THE 
MH WITH ERROR 








RO-IO A 


4 




ENQUEUE 






PUT THE BUFFER 

ON THE READY 

QUEUE 





© 
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Chart RO-7 LINE END APPENDAGE 



RO-II A 1 



iUJA 1 








SET PARAMETER 
LIST TO TPOST 
THE BUFFER TO 
THE BUFFER 
DISPOSITION QCB 




R0-|g A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 



SET UP TO TPOST 
THE ERB TO THE 

BUFFER 
DISPOSITION QCB 



RO-IP 



SET UP TO TPOST 

THE ZERO-LENGTH 

BUFFER TO THE 

MH 



R0- I 0, A4 



PUT THE BUFFER 

ON THE READY 

QUEUE 




TURN OFF THE ^ 
ERROR FLAGS TO 
RESTART > 




SET UP TO TPOST 

THE BUFFER TO 

THE BUFFER 

RETURN QCB 



RO-1,0 M 



PUT THE BUFFER 

ON THE READY 

QUEUE 



TPOST THE FIRST 

BUFFER TO THE 

BUFFER RETURN 

QCB 



' SET THE ^ 

CONTROL FLAGS 
V FOR ERP j 



GET THE RETURN 
ADDRESS TO THE 
I/O SUPERVISOR 
TO SCHEDULE ERP 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



RESTORE THE 

REGISTERS FOR 

THE I/O 

SUPERVISOR 



r — — \ 

I RETURN I 
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Chart R08 LINE END APPENDAGE 



WAS 

PREVIOUS 

RESPONSE AN 

ERROR 



START ON THE 

INITIAL CONTACT 

SEQUENCE 



ty 



IS AUTO 
POLL IN 
EFFECT . 


X/es 




COMPUTE THE 

SOURCE OF THE 

RESPONSE FOR 

AUTO POLL 






|NO 









RQ-II M 





FORCE A DISABLE 

ON THE NEXT 

OPERATION 






YES 






YES 


BUILD THE 

PREVIOUS ACK TO 

START ON 




BUILD A WRITE 
ACK FOR RESTART 























© 



ADJUST THE 

REGISTERS; FIND 

THE TRUE 

FAILING CCW 



BUILD THE 

PARAMETER LIST 

FOR FINDBUFF 



■RATIO IV 





TPOST THE LAST 

BUFFER TO THE 

BUFFER 

DISPOSITION QCB 



, Rfl- l,fl, „A* 



PUT THE BUFFER 

ON THE READY 

QUEUE 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 



SET UP THE 
CURRENT CCW FOR 

CONTINUE! SET 

THE OFFSETS FOR 

RECALL 



^) 



SET UP TO TPOST 

THE BUFFER TO 

THE MH AS THE 

LAST BUFFER 



GET THE OFFSET 

INTO THE 
BUFFERS SET THE 
CURRENT CCW FOR 

CONT I NUE 



R8-18 A* 




ADJUST THE CCW 

TO READ OVER 

THE EOB 



ADJUST THE 

RETURN REGISTER 

SO THAT THE ECB 

IS NOT POSTED 




RESTORE THE 

REGISTERS FOR 

THE I /O 

SUPERV I SOR 



I RETURN J 
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Chart RO-9 LINE END APPENDAGE 




832 



Chart RO-10 LINE END APPENDAGE 



R0-6.EI .E3.K4 
R0-7,C3,03,F3,J3 
R0-8,D5,H3,H4 
R0-9.GI ,K3,F4 
RO-10, CZ 




( \ 

I RETURN 1 
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Chart RO-1 1 LINE END APPENDAGE 




ADJUST THE 

RESPONSE LENGTH 

BY 2 



ADJUST THE 

RESPONSE LENGTH 

BY I 



PAD THE 

RESPONSE AREA 

WITH BLANKS 



GET # OF INVI- 
TATION LISTS 
AND POINTER TO 



.©=T 




SET UP FOR X 
AN ERROR \ 
••{RETURN : SET THE) 
ERROR" BIT • 
IN THE SCB / 




SET THE SOURCE 

OF T HE CALLING 

TERMINAL 



GET THE NEXT 

ENTRY IN THE 

LIST 



c 



J 
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Chart RO-12 LINE END APPENDAGE 




GET THE SCT 

ADDRESS; POINT 

TO STX-ENQ 



f RETURN J 



Proaram Orqanizaticm 835 



Chart RO-13 LINE END APPENDAGE 



R0-3.BI R0-4.C3 
R0-5.AI ,A3 
R0-6,F3,G2 




SET UP TO 

RESTART ON 

WRITE ID ACK 



r TURN OFF THE ^ 
ERROR FLAGS TO 
V RESTART > 



RESTORE THE 

REGISTERS FOR 

THE 1 /O 

SUPERVISOR 



f RETURN 1 



/ SET THE \ 

-•— < RESPONSE FLAG > 

X FOR ENQ / 



SET THE X YES 
RESPONSE FLAG >■• 
FOR NAK 



SET THE 
RESPONSE FLAG >-* 
FOR EOT 



HSET THE \ 
RESPONSE FLAG >■ 
FOR RVI • 




SET THE X YES.. 

RESPONSE FLAG >-« — — C RESPONSE WACK 

FOR WACK 




/ SET THE \ 
/ 'INVALID X 

^RESPONSE' FLAG V— 
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Chart RO-14 LINE END APPENDAGE 
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Chart Rl-1 DIAL RECEIVE SCHEDULER 





VYES 




Y7-I Al 


TSO IN* 
SYSTEM 


IEDAYZ 


SCHEDULE TSO 




|N0 










' 





SET UP TO POLL 

THE INVITATION 

LIST 



MflVEflC 



REMOVE THE CALL 
FROM QUEUE; PUT 
SEND SCHEDULER 
STCB AT THE TOP 
OF THE CHAIN 



AY5CAUL 



SET UP TO POLL 

THE INVITATION 

LIST 



HEX IT TO DSPDISPJ 



HEX IT TO DSPDISPJ 
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Chart R 1 -2 DIAL RECEIVE SCHEDULER 




GET THE ADDRESS 

OF THE TERMNAME 

TABLE 



GET THE ADDRESS 

OF THE FIRST 

ENTRY 




PUT THE SOURCE 

TERMINAL 

INFORMATION IN 

THE LCB 



YES 


SAVE THE LCB 
ADDRESS 








RB-2 Al 




DSPUNAVR 




EXCHANGE THE 

SCHEDULERS 

STCB'S 










SAVE THE AMOUNT 
OF DELAY 










/T S THE^s. 
,/DELAY MORE ^S^ 
C THAN 12 HOURS} 


YES 




INDICATE MORE 
THAN 12 HOURS 








NO 


















TPOST THE QCB 
TO THE TIME 
DELAY QUEUE 




■ 


' 




TPOST THE LCB 
TO ITSELF 






EXIT TO DSPPOSt] 




, 
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Chart R2 DISK END APPENDAGE 









RESET THE 

REGISTER FOR 

THE PROGRAM 

BASE AND THE 

AVT 




/SAVE THE IOS^ 
\RETURN ADDRESS 



GET THE 

MULTIPROCESSER 

CVT ADDRESS 

FROM CVT PLUS 

X'CO* 




GET THE TCAM 

TCB ADDRESS 

FROM THE AVT 



/ FLAG THE \ 
/TCAM TCB 'NOT^ 
(ELIGIBLE TO BE 
\ DISPATCHED' J 



GET THE ADDRESS 

OF THE OS TASK 

REMOVAL ROUTINE 

FROM MP CVT 

plus roc 



TESTDISP - 

INTERRUPT 

THE OTHER 

CPU 



GET THE ADDRESS 

OF THE DISABLED 

FIFO QUEUE 



GET THE ADDRESS 

OF THE ENABLED 

F I FO QUEUE 



LOOP 1 



INSERT THE NEW 

CPB AT THE END 

OF THE F I FO 

QUEUE FOR CPB 

CLEANUP 




MOVE THE RETRY 

QUEUE TO 
IOBSTART; ZERO 
THE RETRY QUEUE 



SET THE FIRST 

CPB MBBCCHHR TO 

I OB; MODIFY THE 

RETURN ADDRESS 

TO RETRY 




PUT THE 
PRIORITY IN THE 
CPB CLEANUP QCB 



PUT THE CPB 

CLEANUP QCB ON 

THE DISABLED 

READY QUEUE 



EXIT, ♦ 



/ FLAG THE X 

r TCAM TCB \ 
•ELIGIBLE TO BEJ 
k DISPATCHED* • 



•RESTORE THEX 
r IOS REGISTERS^ 

AND CLEAR 
k. REG I STER 9 j 



^RETURN TO THE > 
I I/O SUPERVISOR J 
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Chart R3 LEASED RECEIVE SCHEDULER 



e- 




f EXIT TO \ 
W DSPBYPAS 1 



YZ-,1, hi 



SCHEDULE TSO 



NO START A REC OP 



r — — \ 

I EX IT TO DSPPOSTl 




f \ 

I QEVENT J 





S^YES 






Y7-I Al 


IS TSO IN* 1 
THE SYSTEM 




IEDAYZ 


SCHEDULE TSO 






|NO 










END OF THE INVITATION LIST 



NO ACTIVE 
ENTRIES 



[EXIT TO DSPPOSTl f DSPBYPAS J V ' V 
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Chart R4-1 SEND SCHEDULER 




musEi 



SET UP POINTERS 

FOR TH^ 

INITIATE ODE 

MESSAGEi 



TURN OFF X 

THE 'QCB ^ 

TPOSTED' FLAG 

(QCBPOSTOT y 



C RETURN TO \ 
1EDQFA J* 








YZ-1 Al 




„YES 


IEDAYZ 




SCHEDULE TSO 











-UflA. 



MOVE THE SEND 

SCHEDULER STCB 

TO THE QCB 




TCAM MESSAGE 



TSO - NO OUTPUT 



"-(EXIT TO DSPPOSTj 



TSO - OUTPUT 



M-i A.,!, 



GET THE 

DESTINATION LCB 

ADDRESS 



C EX IT TO ^ 
DSPBYPAS J 



PREPARE 



c — — \ 

I EX IT TO DSPPOSTl 
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Chart R4-2 SEND SCHEDULER 






S.YES 






YZ-I Al 


S THIS A^ 
TSO QCB 


IEDAYZ 


SCHEDULE TSO 






|NO 







PB-e, a 



NflTCQMNT,., 



SAVE THE FIRST 

LCB NOT IN USE 

FOR POSSIBLE 

CALL-UP 





-Q 





RB-2 Al 


DSPUNAVR 


LINK THE STCB 
TO THE LCB 






[ RETURN J 
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Chart R5 ATTENTION HANDLING ROUTINE 



'CGjtfRS 



3 



GET THE 

MULTIPROCESSING 

CVT ADDRESS 




TESTDSP - 

INTERRUPT 

THE OTHER 

CPU 




TPOST THE 

ELEMENT TO THE 

READY QUEUE 




OS POST THE 

ECB 

COMPLETE 



< RESTORE THEX 
REGISTERS > 

( \ 

I RETURN 1 
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Chart R6-1 START-UP MESSAGE ROUTINE 



1GGJLL2B6 ^^ 

f ENTER J 



GET THE ADDRESS 

OF THE TERMNAME 

TABLE 



GET THE COUNT 

OF ENTRIES AND 

INITIALIZE THE 

OFFSET TO I 



f NX.Aa. 



GET THE 

TERMINAL ENTRY 

ADDRESS 




GET THE QCB, 
DCB, AND LCB 




PUT THE ADDRESS 
OF THE TERMINAL 

ENTRY AND 
OPTIONS IN THE 
PARAMETER LIST 




ADD ONE TO THE 

NUMBER OF LINES 

SERVICED 



INDICATE THAT 

THE LCB IS 

TPOSTED TO 

ITSELF 




/ \ 

"I EXIT TO DSPPOSTj 




GET THE ADDRESS 

OF THE GOOD 

MORNING EXIT 




BRANCH TO 

THE USER 

EXIT 




GET THE ADDRESS 

OF THE RESTART- 

IN-PROGRESS 

EXIT 



GET THE LENGTH 

OF THE USER 

MESSAGE 



GET THE LENGTH 

OF THE DATA IN 

THE HEAOER 

BUFFER 
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Chart R6-2 START-UP MESSAGE ROUTINE 



R6-3 As 



DETERMINE THE 

NUMBER OF UNITS 

IN THE BUFFER 





• INDICATE NO 
[PREFIX FOR THIS, 
\ UN I T 



REMOVE THE CPB 
FROM THE 
FREEPOOL 



DECREMENT THE 
•COUNT OF THE 
AVAILABLE 
BUFFERS 



REMOVE THE 

BUFFER FROM THE 

FREEPOOL 



PUT THE BUFFER 
ON THE CORE 
FEFO QUEUE 




STORE THE UNIT 
LENGTH IN 
DATCOUNT 



SUBTRACT THE 
MESSAGE LENGTH 

IN THIS UNIT 
FROM THE TOTAL 
MESSAGE LENGTH 




GET THE LENGTH 
FOR THE NEXT 
MOVE INTO THE 

NEXT UNIT FROM 
AVTKEYLE 



SET THE \ 
REUSABLE FLAG^ 
IN CPB USING 
AVTRADDR J 

ADDRESS / 



/ SET NON- \ 
'REUSABLE FLAG^ 

IN CPB USING 
^ AVTNADDR J 
X ADDRESS / 



/\Hl 
< E 



INDICATE LAST^ 
BUFFER IN 
\ PRFSTAI / 






STORE THE 

LENGTH OF THE 

PARTIAL BUFFER 



/ CLEAR THE 
'UNIT TO ZERO 
AND INDICATE 
V NOT LAST 
\ BUFFER 




PUT IN THE 

DESTINATION 

OFFSET, SIZE. 

AND UNIT COUNT 



MOVE THE 
MESSAGE DATA TO 
THE BUFFER UNIT 




PUT THIS RECORD 

NUMBER AND 

HEADER RECORD 

NUMBER INTO 

TEXT PREFIX 



PUT MSG UNIT ON 

MAIN STOR 
DESTINATION QCB 



GET THE LENGTH 

OF THE DATA IN 

A TEXT BUFFER 



R6-3 ftS 



DETERMINE NUM- 
BER OF UNITS IN 
A TEXT BUFFER 



UPDATE THE 

CURRENT 

POSITION IN THE 

MESSAGE 
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Chart R6-3 START-UP MESSAGE ROUTINE 



f UNITS V- 



/ INITIALIZE \ 
/ THE CPB AND " 

(CLEAR AVTOSECB 



R6-2.K2 
R6-2.BI 



GET THE MAX1UM 

NUMBER OF UNITS 

IN ONE BUFFER 



ADD ONE TO THE 

COUNT OF 

MESSAGES ON 

THIS QUEUE 



PUT THE CPB ON 
THE INPUT QUEUE 

AND PUT THE 
PRIORITY IN THE 
CPB CLEANUP QCB 



Rfi-,,1 ,Al 




GET THE DATA 

LENGTH IN THE 

FIRST UNIT 



UPDATE THE 
FIRST HEADER IN 

THIS ZONE AND 

FIRST HEADER IN 

LAST ZONE 



ADD ONE TO THE 

UNIT COUNT FOR 

THIS BUFFER 



WRITE ONE UNIT 

OF THE MESSAGE 

ON DISK 



PUT THE NUMBER 

OF THIS RECORD 

IN THE PREFIX 




GET THE LENGTH 

IN THE PARTIAL 

BUFFER 





MOVE THIS 

RECORD NUMBER 

FROM THE PREFI> 

TO QCBLFEFO 



MOVE QC8FEF0 TO 
DATFEFO (CHAIN 

FIELD IN 

MESSAGE) 



MOVE THIS 

RECORD NUMBER 

TO QCBFEFO 



REMOVE THE CPB 

FROM THE DISK 

APPENDAGE QUEUE 

AND RESTORE THE 

CPB 



SAVE THIS 

HEADER RECORD 

NUMBER IN THE 

SCB 



RETURN THE CPB 
TO THE FREEPOOL 

AND CLEAR THE 

PRIORITY IN CPB 

CLEANUP QCB 



MOVE THE VALUE 

IN THE ADDRESS 

TO QCBDNHDR 

(NEXT HEADER) 



MOVE THE SAME 
VALUE TO THE 
PREFIX CHAIN 




ASSIGN THE 
RECORD NUMBER 
FOR THE NEXT 
TEXT AND SAVE 
IT IN THE SCB 



ADD THE LENGTH 

OF THE DATA IN 

THE NEXT UNIT 

(AVTKEYLE) 




SUBTRACT 

AVTKEYLE FROM 

THE DATA LENGTH 



ADD ONE TO THE 

VALUE OF THE 

ADDRESS 




(RETURN VIA \ 
REGISTER 15 1 



ASSIGN RECORD 

NUMBERS FOR THE 

EXTRA UNITS 

FROM ADDRESS 



ADD THE COUNT 

OF UNITS TO 

ADDRESS 
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Chart TN ATTENTION ROUTINE 



Cnu — , 
ENTER J 



< ESTABLISH 
IRESSABILITY 




LOAD THE 

ADDRESS OF THE 

ATTENTION 

HANDLER 

( IGG019R5) 



C BRANCH TO \ 
IGG0I9R5 I 



848 



Chart UI USER INTERFACE ROUTINE 




CALCULATE AND 

LOAD THE 

ADDRESS OF THE 

CURRENT SCB 



X LOAD THE ^ 
' ROUTINE 

ADDRESS FROM 
V THE VCON 
\ TABLE > 



(BRANCH TO THE \ 
ROUTINE J 



Proqram Orqanizaitcn 8^9 



Chart XA-1 DISK MESSAGE QUEUE INITIALIZER 



COQUn M. ^ 
ENTER J 



OPEN THE 
SYSPRINT 
DATA SET 



jT WAS THE ^s.^ 
C OPEN GOOD }- 



„t, «A.-,g„Al 



SVC 64 - 
READ JFCB 

OF THE 
IEDQDATA 
DATA SET 




ADD THE FIXED 

DATA LENGTH TO 

KEYLEN 



„M;a A, 



/ SET THE \ 

»-<RETURN CODE TO > 



mXA-g, Ait 



■ SA-,Si Aft 



© 




* SET THE 
RETURN CODE TO 
W 08 





GETMAIN A 

BUFFER WORK 

AREA = 

BLKSIZE 




XA-B At 



■XA-S At 








CUQ5E,„t, 



CLOSE THE 
SYSPRINT 
DATA SET 



tfiX. 



/ PUT THE ^ 

(return code in 

\ REG I STER .1 5 d 



STORE THE 

RESULT IN THE 

BLKSIZE FIELD 

OF THE JFCB 



f RETURN 1 
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Chart XA-2 DISK MESSAGE QUEUE INITIALIZER 



WRITE - A 

DUMMY 
RECORD ON 
lEDQDATA 








CHECK - 
WAIT FOR 

1 /O TO 
COMPLETE 







**-? A4 




5YNA.PS U-2 M 



WRITE 



XA-2 A4 



• • SET THE ^ 
[RETURN CODE TO 
X ZERO > 



C LpSDATA t 



CLOSE THE 
lEDQDATA 
DATA SET 



FREEMAIN - 

THE BUFFER 

WORK AREA 



CLOSE t 



CLOSE THE 
SYSPRINT 
DATA SET 



LUX. 



/ PUT THE > 

[RETURN CODE IN 
X REGISTER I 5 > 



c \ 

I RETURN J 



XA-I ,EI ,G2,H2,A5,B5 
XA-2, Ft ,C2,D2 




C ,to ) 



5YNAPI 




XA-I ,D2 
XA-2.E4 



WTO - WRITE 
A MESSAGE 

TO THE 
OPERATOR 



c \ 

I RETURN l 
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Chart Y A- 1 TSO ATTENTION ROUTINE 



■EPAYft, „, .«.. 'EDAtA*,ia, ' ,,■>. 

f ENTER J f ENTER V 



r SET REGISTER > 

5 TO INDICATE 
VNORMAL ENTRY J 




ADJUST THE ^ 
BASE REGIS- 
TER; GET THE 
ADDRESS OF 
LCB i SCB > 



t NT A3 



GET THE 

DESTINATION QCB 

ADDRESS 



' LCBSTATI TO > 

INDICATE LINE 
JS IN RECEIVE/ 
V MODE / 



ATTENTION INTERRUPT 
RECEIVED ON A 
SINGLE PREPARE CCW 




CALCULATE THE 

POINTER TO THE 

TJB 



©■ 




r SET SCBXPD TO 

ISEND !D TO THE 

TERMINAL 



< 



RESET 
SCBATTN. 
SCBXPI , 



SCBXPI, S 
SCBSATTN 
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Chart YA-2 TSO ATTENTION ROUITINE 






ALCATCT, 



GET THE 

S I MULATED 

ATTENTION COUNT 

ENTERED 



I NCREMENT 

REGISTER 2 E 

ONE 



ADD THIS TO 

REGISTER 2 TO 

OBTAIN A NEW 

ATTENTION COUNT 




MAKE THE 

ATTENTION COUNT 

EQUAL TO THE 

ST AX COUNT 



MERGE THE NEW 

ATTENTION COUNT 

AND THE TJID 




QTIPI SWAP 

IN, CLEAR 

THE QUEUES 

AND REMOVE 

WAITS 



QTIPO CLEAR 

THE QUEUES 

AND REMOVE 

THE WAITS 




SET UP TO 
INDICATE A ! 
TO BE SENT 



C EX IT TO \ 
DSPCHAIN 1 



c 



3 
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Chart YC-1 TSO CARRIAGE ROUTINE 



ENTER J 




SET UP THE 

ADDRESS FOR 

LCB/SCB 




PRESET THE 

CARRIAGE 

COUNTER 




SAVE THE 

ADDRESS OF THE 

FIRST BUFFER 



SAVE THE 

REGISTERS FOR 

CALL TO THE 

TERMNAME 

ROUTINE 



t NT A3 



GET THE ADDRESS 

OF THE TERMINAL 

ENTRY 



GET AND STORE 

THE DEV I CE 

CHARACTERISTICS 




SET THE DEFAULT 

FOR THE LINE 

SIZE 



USE TJID TO 

FIND THE TSB 

AND SET THE 

LINE SIZE 



contin 1 



SET THE NUMBER 

OF UNITS PER 

BUFFER 




REDUCE THE DATA 
SIZE BY THE 
TCAM OR TSO 
PREFIX SIZE 



.Hon. 



STORE A ZERO AS 

THE CARRIAGE 

COUNT IN THE 

QCB 



GET THE UNIT 

SIZE AND REDUCE 

IT BY THE 

PREFIX SUE 




FINAL 



STORE A ZERO AS 

THE PREVIOUS 

CHARACTER 



COMPUTE THE 

NUMBER OF IDLES 

REQUIRED 




EXIT t 




GET THE ADDRESS 

OF THE EXIT 

ROUTINE 



ZERO OUT THE 

EOA CHARACTER 

FOR THE BUFFER 



/ \ 

I RETURN 1 
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Chart YC-2 TSO CARRIAGE ROUTINE 




EMBCH, 



SET UP THE LINE 

COUNT AND RE- 
DUCE THE PREFIX 
SIZE FOR THE 
END CHARACTER 



SIBSP t 



REDUCE THE 

CARRIAGE COUNT 

BY ONE IF IT IS 

NOT ZERO 



NEXT 1 



MQTP1SP f 



SAVE THIS 

CHARACTER FOR 

REFERENCE 



INCREMENT THE 

BUFFER POINTER 

TO POINT TO THE 

NEXT BUFFER 





jm. 



SET UP THE UNIT 

ADDRESS AND THE 

KEY LENGTH 
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Chart YC-3 TSO CARRIAGE ROUTINE 




C1TAB 



DEFAULT THE 
CARRIAGE COUNT 
TO THE MAXIMUM 



NOTTWX 





' SET THE \ 
•ATTENTION' B I T J 
V IN THE SCB / 






/ SET THE 
' SIMULATED X 
•ATTENTION' B I T> 
V IF NO OTHER / 
\ DATA HEREV 



/ TURN OFF \ 
fTHE LCB WRITE^ 
BREAK, THE SCB 
V CUTOFF, AND > 
\ NOBUF / 



REDUCE THE 

PREFIX DATA 

COUNT FOR 

EOT/EOB 
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Chart YD TSO DESTINATION SCHEDULER 



ifiDAYD . 

C EWT " ) 



/ ESTABLISH ^ 
^ADDRESSABILITY 




GET THE 

STARTING RLN 

FOR THE QCB 



GET THE NEXT 

STCB IN THE 

CHAIN 



AYJ22Jlfl 

►(exit to dspdispj 



GET THE 

STARTING LCB 

OFFSET 



SET THE POINTER 

TO THE I OB OF 

THE LCB 



ADJUST THE 

POINTER TO THE 

START OF THE 

LCB 



(EXIT TO \ 
DSPBYPAS 1 



GET THE ADDRESS 

OF THE TIME 

SHARING 

SCHEDULER 



/ \ 

►I EX IT TO IEDAYZ I 
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Chart YE-1 TSO TIOC EDIT ROUTINE 



ififiAXE 

f ENTER J 



YM-I ,J4. 
YM-2.E2 
YO-1 ,G4 



* SAVE 
REGISTERS; 
ESTABLISH 
ADDRESS- 

V ABILITY 



CLEAR THE WORK 
AREA AND SAVE 

THE MESSAGE 

SIZE AND TCAM 

BUFFER SIZE 



SET UP THE LINE 

SIZE FROM THE 
TSB AND GET AND 
SAVE THE DEVICE 
CHARACTERISTICS 



SET UP THE CAR- 
RIAGE POSITION, 

TSO BUFFER, 
TCAM BUFFER, & 
WORK AREA FLAGS 





CALCULATE AND 

INSERT IDLES IN 

THE BUFFER 



U£C_! 



INSERT IDLES 
AND SET UP THE 
FULL LINE SIZE 



PASTNL, 



STORE THE LINE 

SIZE IN THE 

WORK AREA 



t YEr3 



,EXiT t , 

SAVE THE 

CARRIAGE COUNT 

IN THE QCB AND 

RESTORE ALL 

REGISTERS 



( > l 

I RETURN 1 




INSERT NL AND 

IDLE CHARACTERS 

WHERE THERE I S 

SPACE & UPDATE 

THE COUNTS 



SET UP TO 

RETURN TO 

IEDAYM 
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Chart YE-2 TSO TIOC EDIT ROUTINE 



NEWLINE T YE-3 E 





GET THE BUFFER 
ADDRESS AND 

SAVE IT AS THE 
CURRENT ONE 



YE-3 ft 





JUSTETX 



INSERT AN ETX 

AT THE END OF 

THE DATA 



INSERT AN NL AT 

THE END OF THE 

DATA 



INCREMENT THE 
•TO' COUNT AND 

DECREMENT THE 

REMAINING TCAM 

BUFFER SIZE 



JUST 1 PL t 




INSERT AN NL 

CHARACTER IN 

THE BUFFER 



' '"' F * 



INSERT IDLE 

CHARACTERS INTO 

THE BUFFER 



© 



INCLINE 



SET THE RETURN 

CODE TO X' I 0* 

TO INDICATE THE 

END OF THE LINE 




ADD AN ETX TO 

THE BUFFER AND 

UPDATE THE 'TO* 

COUNT 




INSERT IDLE 

CHARACTERS 

FOLLOWING THE 



REPLACE THE NL 

WITH A CARRIAGE 

RETURN (CR) 

CHARACTER 



© 




INSERT AN LF 

CHARACTER INTO 

THE BUFFER 



STORE A X'C2' 

TO INDICATE AN 

LF CHARACTER IS 

NEEDED 



INDREMENT THE 
•TO' COUNT AND 

DECREMENT THE 

REMAINING TCAM 

BUFFER SIZE 



PUT A ZERO IN 

THE CARRIAGE 

COUNT 
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Chart YE-3 TSO TIOC EDIT ROUTINE 




86 



Chart YE-4 TSO TIOC EDIT ROUTINE 



c ,D,T y 



YE- I ,E5 



SAVE THE 

CURRENT TSO 

BUFFER ADDRESS 

AND REDUCE THE 

COUNT FOR MOVE 



MOVE THE DATA 

FROM THE TSO 

BUFFER TO THE 

TCAM BUFFER 




SCAN THE LINE 

AND SAVE THE 

NUMBER OF 

BLANKS FOUND IN 

THE WORK AREA 



LQQFS 



GET THE ADDRESS 

OF THE TCAM 

BUFFER JUST 

USED 



COMPARE THE 

NEXT CHARACTER 

WITH AN EOT 

CHARACTER 



REPLCH 



REPLACE THE 

INVALID 

CHARACTER WITH 

A COLON I : I 



■LQPPX, 



INCREMENT TO 

THE NEXT 

CHARACTER TO BE 

SCANNED 




-L££5J 



INCREMENT THE 

•NON-PRINT* 

COUNT FIELD IN 

THE WORK AREA 




ARE 
'THERE MORE \ NO 
CHARACTERS TO 
SCAN 



BA-fihi,, 



UPDATE THE 

COUNTS AND 

ADDRESSES 




/ *N 

"4 RETURN 1 
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Chart YF TSO IOHALT 



ENTER J 




• TURN OFF ^ 
r THE 'PREPARE 

ON LINE* 
t INDICATOR 





S^YES 


HG-3 A3 






RB-2 Al 


/lS THE >s^ 

LC8 IN THE ^ 
TIME DELAY 
QUEUE v 


1EDQHG02 




DSPPRIOR 


REMOVE THE LCB 

FROM THE TIME 

DELAY QUEUE 


LINK RECEIVE 

SCHEDULER IN 

STCB CHAIN 






|NO 











_ WAS THE 

LAST OPERA- 
TION ENDED BY 
IOHALT 



SET TO TPOST 

THE LCB TO 

ITSELF 



-0 



IOHALT 
ISSUE AN 
IOHALT TO 
HALT THE 

PREPARE 



/ ^t 

►I EX IT TO DSPDISPl 



IS THE 
TERM I NAL 
2741 



SET UP TO TPOST 

TO THE TSO 

ATTENT I ON 

ROUTINE 

I IEDAYA) 




r SET THE ^ 
•CIRCLE D SENT' 
V INDICATOR > 



r SET THE ^ 
•CIRCLE D SENT' 
k. INDICATOR > 




SET UP TO TPOST 

TO THE HANGUP 

ROUTINE 

(IEDAYH) 



THE ELEMENT TO 

BE TPOSTED IS 

THE LCB 



>(E> 



C EX IT TO \ 
DSPCHAIN 1 



B6Z 



Chart YH TSO HANGUP ROUTINE 




v NO 


TELL TCAM THAT 

A HANGUP IS 

OCCURRING 












QTIP - 

ENTRY 4 TO 

TELL TSO A 

HANGUP IS 

OCCURR I NG 








CLEAN UP THE 

TCAM CONTROL 

BLOCKS 





CANCEL 



CANCEL THIS 
INCOMING 
MESSAGE 



TPOST THE ERB 

TO THE BUFFER 

DISPOSITION QCB 




SAYONARA 



PUT THE ERB 
ADDRESS IN 
REGISTER 1 



C EX IT TO \ 
DSPCHAIN I 
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Chart YI-1 TSINPUT ROUTINE 




FREE ALL TCAM 

AND TSO BUFFERS 

FOR THIS 

MESSAGE 




TAKE THE SYSTEM 
OUT OF LWAITi 
TURN OFF THE 
•TIOCSYLW AND 
•QCBNOBUF' BITS 



DEQUEUE A TCAM 

BUFFER CHAIN 

AND RESET THE 

QCBBUFQ BIT 




TAKE ALL TSBS 

OUT OF TSITSBQ 

AND TURN OFF 

ALL QCBTSBQ 

BITS 



PUT THIS TSB IN 

THE TSITSBQ 

QUEUE AND TURN 

ON THE QCBTSBQ 

BIT 



BUFFER 
ALLOCATION- 
GET INITIAL 
TSO HEADER 

BUFFER 




RETURN THE 

FREED TCAM 

BUFFERS AND ANY 

QCBS BEING 

TPOSTED 



C EX IT TO ^ 
DSPCHAIN 1 



TURN OFF THE 
TSBIFLSH AND 
TSBBIPI BITS 



SCAN AND 
REMOVE DATA 

FROM TCAM 
TO TSO 
BUFFERS 



© 
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Chart YI-2 TSINPUT ROUTINE 




MARK THE TS 

MESSAGE 

COMPLETE 



PUT TCAM BUFFER 

ON THE WAITING 

BUFFER QUEUE 



SET TSBBRKIN 

AND MARK THE 

HEADER BUFFER 

AS PARTIAL LINE 



INCREMENT THE 
AUTOMATIC LINE 
NUMBER FOR EACH 

COMPLETE LINE 
IN TCAM BUFFER 



' TELL TCAM TO 
SEND THE NEXT 
LINE NUMBER 



CALL TSIP TO 

BRING USER II 

MAIN STORAGE 

AND REMOVE 

I WAIT 
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CPAYL ^ 

ENTER J 



•INITIALIZE ^ 
r THE LCBTTCIN 
AND PRFSRCE 
V FIELDS 



i,m, as 



GET THE ADDRESS 

OF THE TERMINAL 

TABLE ENTRY 




NQLflfiflH. 




Ul ,A3 



ACTIVATE IEDQAE 

TO FIND USER 

EXIT OPTION 



' INITIALIZE 
THE OPTION I 
V NECESSARY 





YES 


YL2 

\ EZ S 


ROUTE THE 
BUFFER TO TSO 










SAVE THE 
REGISTERS FOR 




LOGON 


SCAN 






GcpjLflfi 

/branch to the 
I nolog routine 



D 




RESTORE THE 

REGISTERS TO 

CONTENTS BEFORE 

LOGON SCAN 



© 



,_YES 


PUT BLANKS IN 

FRONT OF THE 

LOGON 

CHARACTERS 




B 


□Nl.QGON, 






RESTORE THE 

REGISTERS TO 

CONTENTS BEFORE 

LOGON SCAN 









9 
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Chart YL-2 TSO LOGON ROUTINE 




• iNC 



r SET BITS TCP 
, INDICATE THAT'' 
►{TERMINAL CAN* 
X SUPPORT TSO 



'SET BITS UP 

'INDICATE THAT'' 

^TERMINAL CAN' 

RECEIVE TSO 

MESSAGES 



' SET BITS TO 

INDICATE THAT 
VTSO IS NOT UP> 




NORflflU_ 



findtct ♦ 



LOCATE THE TCT 



• PLACE ZEROS^ 
• lN QCBTSOFI. 
C.QCBTSOF2, QCB- 
X CARCT. AND 

\ QCBRETCT J 



/ PUT ZEROS ^ 
r IN QCBSATCT; 
SET QC8TSSES 
VAND QC8INHBN 
\ FIELDS > 



QTIP - 
ENTRY 10 - 
INITIALIZE 
TSO CONTROL 

BLOCKS 




• SET BITS TO^ 
/INDICATE THAT'' 
CtSO ALREADY HASj 
\MAXIMUM USERS> 



CANCEL t 




DfiCRIQRS f 



' SET BIT TO ^ 

INDICATE THAT 
kTSO IS NOT UP/ 




PROMPJEJd. 



• SET BITS TO\ 
• INDICATE THAT^ 
CTHE USER IS TO 
\ TRY AGAIN J 



' SET BITS TO ^ 

INDICATE THAT 
U.OGON FAILED J 







• TURN ON THE\ 

•TCAM \ 

HSCONNECT' BITJ 



U.l A3 



ACTIVATE IEDQAE 

TO FIND USER 

EXIT OPTION 



• INI 



, . . 1 1 T I AL I ZE 
►< THE OPTION IF 
NECESSARY 



X c 




BY6BYE T ^ 
(exit to IEDQLM J 
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C AYM 

FROM IEDQBD ^Y 



LINK BUFFERS 

INTO LCBERBLK 

FOR A FUTURE 

TPOST 




AYhLQI,5, t, 



GET THE INDEX 

TO THE TERMINAL 

NAME ENTRY 



A.YMOU. 



GET THE 
TERMINAL ENTRY 

FROM THE 
TERMINAL TABLE 




© 



A.YMPSfln, 



GET ACCESS TO 
THE AUTOMATIC 

LINE NUMBER 
FROM THE TSB 



CONVERT THE 
LINE NUMBER TO 
A DECIMAL VALUE 



,/MMfcfl,, 



SET UP THE 

ADDRESS OF THE 

LINE NUMBER AND 

LENGTH 



ATM.iaO t 



GET THE ADDRESS 
OF THE MESSAGE 
AND THE LENGTH 




TRANSLATE ^s^NO 
TABLE IN 
MACRO 



A.YMQa.fl, 



GET ACCESS TO 

THE ADDRESSING 

CHARACTERS FOR 

THE 2260 




Amais, 



SET UP TO 

RETURN TO 

BUFFER 

DISPOSITION 



INDICATE TO 

I EDA YE TO LEFT 

ADJUST THE 

CARRIAGE 



AYMSQfin, 



BUILD THE 
PARAMETERS TO 

PASS TO THE 
EDIT ROUTINE 







CMoao N 
EXIT TO \ 
DSPCHAIN 1 




Lye,-,! aj, 



AYM3QI 



GET THE PROMPT 
MESSAGE AND THE 

AUTO LINE 

NUMBER FROM THE 

TSB 
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( ^ 

( AYM000 I 



FROM THE TCAM 
DISPATCHER 



INDICATE If THE 

BUFFERS ARE 

TPOSTED 




CLEAR THE ERROR 

INDICATORS IN 

THE LCB AND THE 

SCB 



RESET THE 
REQUEST FOR 
TRANSLATION 






JNO 


1 YMI | 


' 




SAVE THE NUMBER 

OF ALL POSSIBLE 

TRANSLATION 

TABLES 




SET UP TO SKIP 

THE REMAINING 

1NMSG/OUTMSG 

MACROS 
















A. YM 4!Jft 








SET UP THE 

PARAMETERS TO 

PASS TO EDIT 

ROUTINE TO EDIT 

THE 'ENTER' MSG 


1 YMI 1 






YE-I Al 








IEDAYE 




MOVE DYNAMIC 
TRANSLATION 
CHAR STRINGS 
INTO INVALID 
LOGON MESSAGE 








MESSAC 
1NVALIC 


}E FOR 
) LOGON 






TRUNCATE THE 

CHARACTER 

STRINGS TO BE 

PR I NTED 



UPDATE TO THE 

NEXT 

TRANSLATION 

TABLE 




SET UP TO 

RETURN TO 

BUFFER 

DISPOSITION 



SET UP TO 

RE-ENTER IEDAYM 

AT AYMO00 



I YMI J 
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GET THE ADDR OF 

THE SIMULATED 

ATTENT I ON 

MESSAGE AND THE 

LENGTH 



GET THE ADDRESS 

OF THE PROMPT 

MESSAGE FROM 

THE TSB 



SET UP THE CCW 

TO ERASE THE 

DISPLAY 



INDICATE MSGGEN 

FOR THE I 10 

GENERATION 

ROUTINE 



INDICATE MSGGEN 

FOR THE I /O 

GENERATION 

ROUTINE 



SET UP THE CCW 

TO WRITE THE 

MESSAGE 



SET UP THE 

INTERFACE TO 

THE I/O 

GENERATION 

ROUTINE 



(EXIT TO ^ 
DSPCHAIN I 
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Chart YO-1 TSOUTPUT ROUTINE 



QTIP 12 - 

FREE THE 

TSO BUFFER 

AND REMOVE 

WAITS 



SET UP TO TPOST 

THE TCAM BUFFER 

TO BUFFER 

RETURN 



-H EXIT TO DSPPOST ; 



QTIP II - 

PUT THE TSO 

MESSAGE ON 

THE TRAILER 

QUEUE 



EXIT TO DSPD1! 



REQUEST MSGGEN 

TO SEND THE 

AUTOMATIC 

PROMPTING 

MESSAGE 



GIVE INPUT 
PRIORITY FOR 
THIS TERMINAL 
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Chart YO-2 TSOUTPUT ROUTINE 




PQSTMH 



P OSTACTV 



SET UP TO TPOST 

THE ERS TO 

ACTIVATE 



P5TRECM t 



SET UP TO TPOST 

THE ERB TO 

RECALL 




(exit TO dsppostj (ex 



IT TO DSPDISPl* 




PQ5TM0 




SET UP TO TPOST 

THE ERB BACK TO 

TSOUTPUT 



CHKBRK IN 



QTIP 15 - 
PUT TS MES- 
SAGE ON THE 
OUTPUT 

TRAILER Q 



JLUii 




CLEAN UP THE 

TCAM CONTROL 

BLOCKS 



SELECT THE 

PROPER LOGOFF 

MESSAGE 



WtrfD I r~U I ■ L/C 

TECT PROMPT 

START, AND 

TPOST LCB 




■/exit TO DSPPOSTj 



QTIP 14 - 

CLEAN UP 

THE TSO 

CONTROL 

BLOCKS 



.TSABENP f, TQr3 A, 



SELECT THE 

AUTOMATIC 

PROMPTING 

MESSAGE 



CLEAN UP THE 

TCAM CONTROL 

BLOCKS 



f ^ 

(exit TO DSPDISPl 



GgmsfifiSNu t 



f \ 

I EX IT TO IEDAYM I 
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Chart YO-3 TSOUTPUT ROUTINE 



lEDA YOQg+a 



f ENTER J 




INDICATE THAT 

THE ERB IS 

DEQUEUED 




SET UP TO TPOST 

THE ERB TO 

RECALL 



RETURNBU t 



SET UP TO TPOST 

ALL BASIC UNITS 

TO THE BUFFER 

RETURN QCB 



C EX IT TO \ 
DSPCHA1N 1 



BUGOTTEN 



( "\ 

I SESCLEAN 1 



YO-2,G2,G5 



RESET THE TCAM 
CONTROL BLOCKS 
FOR A NEW LOGON 




f RETURN J 
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Chart YR-1 STARTMH SUBTASK FOR TCAM-TSO MIXED 



IFD QAAOI 




GET THE DCB 

ADDRESS FROM 

THE LCB 



ADD I TO THE 

COUNT OF 

OUTSTANDING 

LOCK RESPONSES 



/ TURN THE \ 
' 'LOCK' BIT ^ 

OFF IN THE 
VBUFFER PREFIX> 





TXIRCY, 



INITIALIZE THE 

ORIGIN FIELD IN 

THE PREFIX FROM 

THE LCB 



SET THE IDLES 

COUNT IN THE 

LCB TO ZERO 



SET THE SCAN 

POINTER = THE 

TEXT PREFIX 

SIZE 
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Chart YR-2 STARTMH SUBTASK FOR TCAM-TSO MIXED 




TOR I PIS 



INITIALIZE THE 

LCB RESERVE 

COUNT 



SET THE SCAN 

POINTER = 

HEADER PREFIX 

SIZE + RESERVE 

COUNT 




NT A3 



LINK TO GET THE 

TERMINAL ENTRY 

ADDRESS 



ADD ONE TO THE 

OUTPUT SEQUENCE 

NUMBER 



S\ s THE^N. 

MAXIMUM ^» 
SEQUENCE NO 
EXCEEDED ^ 


s^YES 


RESET THE 

OUTPUT SEQUENCE 

NUMBER TO ONE 




[NO 







UPCQUNT 



MOVE THE 

UPDATED 

SEQUENCE NUMBER 

TO THE TERMINAL 

ENTRY 
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Chart YR-3 STARTMH SUBTASK FOR TCAM-TSO MIXED 




NIT5RCS 



<TURN THE \ 
•LOCK' BIT ON^ 
IN THE BUFFER 
PREF I X > 



INITIALIZE THE 
ORIGIN FIELD IN 

THE BUFFER 

PREFIX FROM THE 

LCB 



CLEAR THE SCB 

PRIORITY, 

CUTOFF COUNT, 

AND DESTINATION 

QCB TO ZEROS 




SET THE INPUT 
SEQUENCE NUMBER 

IN THE BUFFER 
PREFIX TO ZERO 



GET THE RESERVE 

COUNT FROM THE 

LCB 



SET THE SCAN 

POINTER = 

HEADER PREFIX 

SIZE + RESERVE 

COUNT 



GET THE SCT 

ADDRESS FROM 

THE DCB 





Ul A3 



IS AN EOA^ 1 


N^YES 


SET THE SCAN 

POINTER BEYOND 

THE EOA 

SEQUENCE 


FOUND j 




|no 
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Chart YR-4 STARTMH SUBTASK FOR TCAM-TSO MIXED 



TESTBUMP, 



GET THE DEB 

ADDRESS FROM 

THE DCB 



GET THE UC8 

ADDRESS FROM 

THE DEB 




SET THE SCAN 

POINTER BEYOND 

THE ADDRESSING 

CHARACTER 



PUT THE BSC 

BYTE IN THE 

BUFFER PREFIX 



r TURN OFF THE ^ 

•OLT' FLAG IN 
L THE LCB y 



I YR4| 

y 



55T0TT , 





LJNKAI 


Al Al 


„NO 


IEDQAI 


GET THE ON-LINE 
TEST SEQUENCE 









SET THE 

DESTINATION QCB 

= THE OLT QCB 

IN THE SCB 



SEIQERI, 



SET THE OLT 

PRIORITY IN THE 

BUFFER PREFIX 

AND THE RCB 



•INDICATE THE 
(LINE STOPPED I 
\ THE LCB 




SET QTTS 



/ SET THE X 
• START /STOP \ 
*-< BYTE IN THE > 
XBUFFER PREFIX/ 



OLTERRPR ,T , „ 

/ SET THE \ 
/ 'OLT ERROR' > 
<BIT IN THE SCB 
\ ERROR WORD J 






/ > l 

►I EX IT TO DSPPOSTl 



Program Organization 877 



Chart YR-5 STARTMH SUBTASK FOR TCAM-TSO MIXED 




_L5£U- 



MOVE THE 

RESERVE COUNT 

FROM THE DCB TO 

THE LCB 



GET THE TS INPUT 

QCB ADDRESS 

FROM THE AVT 



SET THE SCAN 

POINTER = THE 

TEXT PREFIX 

SIZE + THE 

RESERVE COUNT 



GET THE 

DESTINATION QCB 

ADDRESS FROM 

THE SCB 



GET THE ON-LINE 

TEST QCB 

ADDRESS FROM 

THE AVT 



GET THE 

DESTINATION QCB 

ADDRESS FROM 

THE SCB 




GET THE ADDRESS 

OF THE 

TRANSLATION 

PARAMETER LIST 

FROM THE SCB 



t AW ft I 



JUULX. 



MBH£X!T ,t, 



SET AN 

INCREMENT OF 

4096 IF THERE 

ARE MULTIPLE 

BASE REGISTERS 



GET THE FIRST 

UH INSTRUCTION 

ADDRESS 




/ SET THE \ 

XSEND/RECEIVE ^ 
[CONDITION CODE 



/ > * 

•1 EXIT TO MH 1 
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Chart YS-1 TSO SIMULATED ATTENTION ROUTINE 






SET THE 

ATTENTION 

REQUEST AND THE 

LEVEL 



SET THE 

ATTENTION 

REQUEST AND THE 

LEVEL 



THE DATA"* 
LINE N-l 


S.YES 




REQUEST A 
SCREEN ERASURE 






[no 













SET UP TO 

RETURN THE 

BUFFER 



i_y ^ 

J »4 RETURN I 
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Chart YS-2 TSO SIMULATED ATTENTION ROUTINE 




INCREMENT THE 
LINE COUNT 




REQUEST A 

SIMULATED 

ATTENTION READ 



c — — > \ 

I RETURN 1 





SVC 101 - 
QTIP 36 - 
TO SEE IF A 
TPUT WAS 
REQUESTED 










YES 




v*"wAS A^N. 

y^ TPUT RE- \ 
C QUESTED (RE- Z 
^*Z TURN CODE ./ 


SET THE QCB TO 

BE TPOSTED TO 

ITSELF 




NO 

" 


" 


REQUEST A 
S 1 MULATED 




EXIT TO DSPPOSTJ 












REMOVE THE LCB 

FROM THE TIME 

DELAY QUEUE 



SET THE LCB TO 

BE TPOSTED TO 

ITSELF 



f ^ 

I EX IT TO DSPPOSTJ 
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Chart YT TSO ABEND INTERFACE ROUTINE 



C IW1 " J 



YT.D5.E4 



f SAVE 
REGISTERS; 
ESTABLISH 
ADDRESSA- 
V BIL1TY 



TCABEND - 

SVC 94 - TO 

SET BITS 

AND POST 

THE TSC ERB 



( ^ 

I RETURN 1 



CTIfll , ^ 
ENTER J 



SET THE STCB 

POINTER TO 

POINT TO THE 

QCB 



SET THE ELEMENT 

CHAIN TO POINT 

TO A. DUMMY 

ELEMENT 



( \ 

I RETURN J 




XUEJ 



QCB ROUTINE 




f RETURN J 



YT, Fl 



QCB ROUTINE 



t EB h\ 



t,Y,T A I 



igPAYIg ., 

f ENTER J 




SB ft I 



YT A I 



f RETURN J 
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Chart YX TSO INMSG/OUTMSG LINKER 



Cam . 
ENTER J 



ASSUME THAT 

THIS IS THE 

HANGUP ROUTINE 

AND THAT IT HAS 

NO MASK 



THE MASK^ 
PRESENT 


vYES 


GET THE ADDRESS 
OF THE DCB 




LOAD THE MH 
ADDRESS 




LOAD THE 
ATTENTION , 
ROUTINE ADDRESS 












[NO 















A,Ua.5.tL 



LINK THE 
ELEMENTS) SET 
THE PRIORITY 



GET THE MH 

MACRO ROUTINE 

ADDRESSES 



LOAD THE 
ADDRESS OF 

BUFFER 
DISPOSITION 



TPOST THE ERB 

TO BUFFER 

DISPOSITION 



SET THE 

ATTENTION 

ROUTINE BASE 

ADDRESS 



f ^ 

I RETURN J 
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Chart YY TSO ASYNCHRONOUS TIME DELAY REMOVAL ROUTINE 



• ESTABLISH ' 
^ADDRESSABILITY 



GET THE ADDRESS 

OF THE TS INPUT 

QCB 




(EXIT TO ^ 
DISPATCHER J 



LOAD THE 
ADDRESS OF THE 
TIME DELAY QCB 



AYYflgQ 



o 



GET THE NEXT 

ELEMENT ON THE 

TIME DELAY 

QUEUE 





/ \ 

/ RESET THE \ 
^* DELAY' FLAG > 



TPOST THE QCB 

TO ITSELF TO 

INITIATE A SEND 

OPERATION 



INDICATE THE 

QCB THAT WAS 

TPOSTED 



LOAD THE POST 

REGISTER WITH 

THE QCB ADDRESS 



RB-5 A, I, 



TPOST THE 

ELEMENT TO THE 

READY QUEUE 



ftTYoaa 



UPDATE THE 

PREVIOUS 

ELEMENT POINTER 
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Chart YZ-1 TIME SHARING SCHEDULER 




THE^S. 
N THE ^ 
DELAY 

EUE ^ 


S.YES 


REMOVE THE QCB 

FROM THE TIME 

DELAY QUEUE 




|N0 
















augso 



UPDATE THE 

LCBTTBIN FIELD 

IN THE LCB 



^) 



AXisas- 



UPDATE THE 
ADDRESS OF THE 
INVITATION LIST 



C EX IT TO \ 
DSPBYPAS 1 
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Chart YZ-2 TIME SHARING SCHEDULER 
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Chart YZ-3 TIME SHARING SCHEDULER 



ENTER J •" 



SET UP. TO 

ADJUST THE 

BUFFER PREFIX 

SIZE 



AUS5P 



CHANGE OPTION 

CODES IN THE 

CCWS AND THE 

PREFIX SIZE IF 

NEEDED 




TURN ON THE ^ 

•LCBTSBUF" BIT 

IN THE LCB > 



r — — \ 

I RETURN 1 
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Chart YZ-4 TIME SHARING SCHEDULER 




■*l EXIT TO DSPUNAV 



AVJ 
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Chart YZ-5 TIME SHARING SCHEDULER 




POST THE LCB TO 

THE ATTENTION 

ROUTINE 



ATi&SQ 



■ AU660 



FREE THE 

ALLOCATED 

BUFFERS 



C EX IT TO ^ 
DSPCHAIN J 
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Chart Zl-1 OPERATOR CONTROL CONTROL MODULE - LOAD 




BUILD AN 

OPERATOR 

CONTROL ECB IN 

THE AVT 



WAIT - FOR 

AN OPERATOR 

CONTROL 

COMMAND 



r PUT AN ENTRY 
CODE OF I IN 
V REGISTER I I 



CXCTL TO \ 
IGCOI I OD I 
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Chart Zl-2 OPERATOR CONTROL CONTROL MODULE - LOAD 



yr is THE ^S. 

C COMMAND FROM J 
^< THE MCP V^ 


NO 


GET THE 


NUMBER 




USED BYTES 




YES 








USE THE SCAN 

POINTER TO 

CALCULATE THE 

COMMAND ADDRESS 




CALCULATE THE 

BEGINNING OF 

THE ENTRY 


























Zl-I ,D3,H4,G5 



^UT AN ENTRY 
< CODE OF 4 IN 
\ REGISTER 




( \ 

I RETURN I 
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Chart Z2 OPERATOR CONTROL CONTROL MODULE - LOAD 1 



QEDIT - TO 

PREVENT 

QUEUING 

COMMANDS 



© 



LOAD - THE 

APPROPRIATE 

FUNCTIONAL 

OPERATOR 
CTL MODULE 



EXECUTE FUNC- 
TIONAL OPERATOR 
CONTROL MODULE 








YES 


WTO - 

"CLOSEDOWN 

IN 

PROGRESS" 
















f RETURN 1 




r PUT AN ENTRY 



REGISTER I 



r PUT AN ENTRY 
CODE OF I IN 
^ REGISTER I I 




Y \ 



CODE OF 3 IN > 
"II / 






CXCTL TO \ 
IGC03I0D J 



CXCTL TO \ 
IGC04I0D J 
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Chart Z3 OPERATOR CONTROL CONTROL MODULE - LOAD 2 



f ENTER J 



< ESTABLISH 
iRESSABILITY 



fiiac.Ti a,..A.&„, 

GTFIELD 



GET THE NEXT 

FIELD IN THE 

COMMAND 



f GTFIELD J 



r PUT AN ENTRY 

CODE OF a 
V REGISTER 




\ 

RY \ 
IN > 

V 



t si-i hi 



GET THE NEXT 

FIELD IN THE 

COMMAND 



f RETURN J 




,YES XPUT AN ENTRY 

-*■< CODE OF 2 IN 

REGISTER I I 



CXCTL TO > 
IGCOI I OD I 
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Chart Z4 OPERATOR CONTROL CONTROL MODULE - LOAD 3 
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Chart Z5 OPERATOR CONTROL CONTROL MODULE - LOAD 4 




894 



Chart Z6 OPERATOR CONTROL CONTROL MODULE - LOAD 5 



IGCft&iflfi ^^ 



/ ESTABLISH ^ 
^ADDRESSABILITY 






CALCULATE THE 

OUTPUT MESSAGE 

LENGTH 



CALCULATE THE 

NUMBER OF BYTES 

IN THE BUFFER 




CALCULATE THE 

NUMBER OF EXTRA 

BUFFER UNITS 

NEEDED 



BUILD AN ERB TO 

REQUEST THE 

EXTRA BUFFER 

UNITS 



,t,,.EB, A I 



TPOST THE ERB 

TO THE BUFFER 

REQUEST QCB 



CHAIN THE NEW 

UNITS INTO THE 

BUFFER 
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MtcROEICHE DTRECTOFY 

T'he modules in the TCAM system have obiect module names that start 
with the letters IEDO. The modules that interface with the Operating 
System have an TGG prefix, the EBP modules have an IGE prefix, the 
nucleus resident modules have an IGC prefix, and TCAM-TSO modules have 
an TEDA prefix. 

m he first section of this directory contains entries for the 
executable ^CAM modules. The second section of this directory 
contains entries for the non-executable qenerated modules. 

EXECUTABLE TCAM MODULES MTCROEICHE DIRECTORY 



Module Generic Name 

Vame 

TEDAva TSO Attention Routine 

IEDAYC TSO Carriaqe Subroutine 

TEDAVD Time Sharing Destination 

Scheduler 

IEDAYE TSO TIOC Edit 

T^DAYE TSO IOHALT 

TEDAYH TSO Hangup 

TEDAYT TSTNPUT Routine 

tt^DAYT. TSO Loqon 

TED&YM TSO Message Generation 

TEDAYO TSOUTPUT Routine 

T EDAYR STARTMH for TCAM-TSO Mixed 

TEDAYS TSO Simulated Attention 

IEPAYT TSO Abend Interface 

TEDAYY TSO INMSG/OUTMSG linker 

TEDAYY TSO Asynchronous Time Delay 

Removal 

TEr>AYZ Time Sharing Scheduler 



Entry 


Chart 


Point 


IDs 


IEDAYA 


YA 


TEDAYC 


YC 


IEDAYD 


YD 


IEDAYE 


YE 


IEDAYE 


YE 


IEDAYH 


YH 


IEDAYI 


YI 


IEDAYL 


YL 


IEDAYW 


YM 


IEDAYO 


YO 


IEDAYR 


YR 


TEDAYS 


YS 


IEDAYT 


YT 


IEDAYX 


YX 


TEDAYY 


YY 


IEDAYZ 


YZ 
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Module Generic Name 

Maine 

T^QAA STAFTMH 

r-cnrj^c Pate and Time Provision 

TF^OAD Output Sequence Number Provision TEDQAD01 

T^DOAF Locate Option Field Address 

1^0^ Insert Pata 

-r-pinoAG Messaqe Limit 

tf^oah Input Sequence Number Insertion IEDOAH01 

T^O^T Skip Forward and Scan 

"•"F^OAJ Skip to Character Set 

TE^QAK" Line Control Insertion 

"TF^OAT Address binder Routine 

t-cdoam Oriqin Foutine 

t FT)oan Multiple Insert/Femove 

Tr-no^n Unit Feouest Interface 

TFDOAP Femove at Offset 

tfpqao Operator Control Interface 

T F r >QAF Cancel Messaqe 

TF^OAS Hold/Felease Terminal 



TFDOAT Create an Error Messaqe 

TFDOATTN Attention 

T FnoAU Cutoff Messaqe Transmission 

tepoav lookup terminal Entry 

TFD9AW Translate Buffer 



Entry 
Point 


Chart 
IDs 


IEDQAA01 


AA 


TEDQAC01 


AC 


IEDQAD01 


AD 


IEDQAE 


AE 


IEDQAF01 


AF 


IEDQAG01 


AG 


IEDQAH01 


AH 


IEDQAI01 


AI 


IEDQAJ01 


AJ 


IEDQAK01 


AK 


ADDRCOMP 


AL 


IEDQAM01 


AM 


IEDQAN01 


AN 


IEDQAO01 


AO 


IEDQAP01 


AP 


IEDQAQ01 


AQ 


IEDQAF 


AR 


IEDQAS 
IEDOAS01 
GETCPB 
LCBFTN 


AS 


IEDQAT01 
STCBAT+2 


AT 


IEDOATTN 


TN 


IEDQAU 
CUTFFQCB+12 


AU 


IEDQAV01 


AV 


IEDQAW01 


AW 
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Module 
Name 

TFDOAY 
TFDOA7 
TFDOA0 
TFDOA1 

tfdoa? 

TEDOA3 
IFDQA4 

TFDOA5 
T EDOA6 
TFD0A7 
TEDOAR 
7FD0BA 
IEDOBB 
TEDOBC 
TFDOBD 

T FDOBF 
T*!DOB-F 
TEDQBG 
TFDOBL 
TEDQBT 
TEDOBW 

IEDOBX 
TFDOBY 



Generic Name 

Buffer Step Routine 

Screen 

Pedirect a Message 

Skip Backward 

Einary Search 

Insert at Offset 

Dynamic Translation 

Tncominq/Outqoinq Message 
Delimiter 

Forward Pontine 

Line Control Initialization 

Counter 

Multiple Insert at Offset 

Multiple Routinq 

Checkpoint Bequest 

Distribution List 

Buffer Disposition 

Lock 

Unlock 

Cascade List 

Messaqe Generation Routine 

FCB/FTB Handlinq 

Unit Bequest 

Loq Seqment 
Loq Messaqe 



Entry 


Chart 


Point 


IDs 


SCAN 


AX 


IEDQAY01 


AY 


IEDOAZ01 


AZ 


IEDQA001 


AO 


IEDQA101 


A1 


IEDQA201 


A2 


IEDQA3 


A3 


IEDQA401 


A4 


IEDQA501 


A5 


IEDQA601 


A6 


IEDQA701 


A7 


IEDQA801 


A8 


IEDOEA01+12 


BA 


IEDQBB 


BB 


IEDOBC 


BC 


IEDOBD01 


BD 


IEDQBD02 




IEDOEE 


BE 


IEDQBF 


BF 


IEDOBG 


BG 


IEDQBL 


BL 


IEDQBT 


BT 


IEDOBW 


BW 


IEDQ01 




IEDQBX 


BX 


IEDOEY 


BY 
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Module 
Name 

TEDOBZ 

TEDOCA 

IEDOCF 
TEDOCG 
IEDQCH 
TEDOCI 
TEDOCJ 
TEDOCK 
IEDOCL 
-IEDOCM 
IEDOCN 
TEDQCO 
TEDOCP 
IEDOCO 

TEDOCU 

TEDOCV 

IEDOCW 

TEDQCX 

IEDQCZ 

IEDOCO 

TEDQC1' 

TEDQC2 

IEDQC3 

IEDOC6 



Generic Name 

Log Scheduler 

Resident Operator Control Module 

Operator Control Scan Subroutine 

Modify Options 

Copy Line Information 

Copy Terminal Information 

Copy LCB Information 

Copy QCB Information 

Copy Held Terminals 

Copy Invitation List Entry 

Copy Operator Control Terminal 

Change Control Terminal 

Change Terminal 

Alter Trace Status 

Stop/Resume Terminal 
Transmission 

Start Line 

Stop Line 

Modify Poll 

Modify Intense 

Change Interval Type 

MCP Closedown Processing 

ICHNG Processing 

On-Line Test Interface 

Copy Invitation List Status 

DEBUG Service Aid Bouter 



Entry 
Point 


Chart 
IDs 


IEDQBZ 


BZ 


IEDQCA01 


CA 


IEDQCA02 


CD 


TEDQCF 


CF 


IEDQCG 


CG 


IEDQCH 


CH 


IEDQCI 


CI 


IEDQCJ 


CJ 


IEDQCK 


CK 


IEDQCL 


CL 


IEDQCM 


CM 


IEDQCN 


CN 


IEDQCO 


CO 


IEDQCP 


CP 


IEDQCQ 


CQ 


IEDQCU 


CU 


TEDQCV 


CV 


IEDQCW 


CW 


IEDQCX 


CX 


IEDQCZ 


CZ 


IEDQCO 


CO 


IEDQC1 


C1 


IEDQC2 


C2 


IEDQC3 


C3 


IEDQC6 


C6 



900 



Module 
Name 

IEDOEC 

TEDQES 

TEDOET 

IEDOEU 
IEDOEW 
TEDOEZ 
IEDOE1 
TEDQE2 
TEDOE3 
IED0E4 
IEDOE6 
TEDQE7 
IEDOFA 

IEDQFA1 
T EDOFA2 
lEDQGA 



IEDOGT 



TEDOflG 



Generic Name 

Put Scheduler 

Fetrieve Service 

Operator Control/Application 
Program Interface 

Open/Close 

Get Scheduler 

Get Scheduler FIFO 

TCOPY Service 

QCOPY Service 

TCHNG Service 

ICOPY Service 

Password Scrambler 

Fetrieve Scheduler 

CPB Initialization 
CPB Cleanup Routine 

CPB Initialization-Main Storage 
Queuing Onlv 



CPB Initialization-Disk Queuing 
Onlv 



Buffer Management 
Buffer Feguest 
Buffer Feturn 
Buffer Association 

Transparent Transmission CCfl 
Building 

Time Delav 



Entrv 
Point 


Chart 
IDs 


IEDQEC 


EC 


IEDQES 


ES 


IEDQET 


ET 


IEDQEU 


EU 


IEDQEW 


EW 


IEDQEZ 


EZ 


IEDQE1 


E1 


IEDQE2 


E2 


IEDQE3 


E3 


IEDQE4 


E4 


IEDQE6 


E6 


IEDQE7 


E7 


IEDQFA 
lEDQFQ 


FA 


IEDQFA 1 
lEDQFQ 


FA1 


IEDQFA2 
lEDQFQ 


FA2 


lEDQGA 
lEDQGA 
IEDQGB 
IEDQGD 


GA 


IEDQGT 


GT 


IEDQHG 
IEDQHG01 
IEDQHG02 
IEDQHG03 


HG 



IEDQHI 



Svstem Delav 



IEDQHI 



HI 
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Module 
Name 

TEDOHK 

TEDQHM 

TEDQHM1 

TED0HM2 

IEDQKA 

IEDQKB 

TEDQKC 

IEDQKD 

IEDQKE 

TEDQLM 
TEDQNA 

TEDQNA2 
IEDQNB 

IEDQND 
TEDQNF 
TEDQNG 
TEDONH 
TEDQNJ 

TEDQNK 



Generic Name 

Stop Line I/O 
Destination Scheduler 



Destination Scheduler-Main 
Storaqe Queuinq Only 

Destination Scheduler-Disk 
Queuinq Only 

Activate-I/O Generator 



Activate-I/O Generator for 
BSC Lines 

Activate-I/O Generator for 
Start/Stop Lines 

Activate-I/O Generator for 
Leased and Start/Stop Lines and 
No TSO 

Activate-I/O Generator for a 
QTAM Compatible System 

Return interface 

Resident Closedown Completion 

Nonresident Closedown Completion 

Application Proqram/Checkpcint 
Interface 

Ready 

Checkpoint Executor 

Build Incident Record for MH 

Build Incident Record for TCHNG 

Incident Checkpoint for 
Operator Control 

Environment Checkpoint 



Entry 
Point 


Chart 
IDs 


IEDQHK01 


HK 


IEDQHM 
IEDQHM02 


HM 


IEDQHM1 


HM1 


IEDQHM2 


HM2 


IEDQKA 
IEDQKA02 


KA 


IEDQKB 
IEDQKA02 


KB 


IEDQKC 
IEDQKCA02 


KC 


IEDQKD 
IEDQKA02 


KD 


IEDQKE 
IEDQKA02 


KE 
KE 


IEDQLM 


LM 


IEDQNA 
IEDQNA3 


NA 


IEDQNA2 


NA2 


IEDQNB 

IEDQNB02 

IEDQNB05 


NB 


IEDQND 


ND 


IEDQNF 


NF 


IEDQNG 


NG 


IEDQNH 


NH 


IEDQNJ 


NJ 


IEDQNK 


NK 
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Module Generic Name 

NTame 

TEDONM Euild CKPEQ Disk Record 

TEDONO Checkpoint Queue Manaqer 

T?DQNP Checkpoint Disk T/O 

T EDQNQ Checkpoint Notification and 

Disposition 

TEDQNR Checkpoint-No Available Core 

'J'EDONS Checkpoint-No Incident Records 

^"EDQNX Operator Awareness Messaqe 

Rcuter 

TEDQOA Link 

T EDQOB WTOR Interpreter 

TEDQOG INTRO GETMATN 

TEDOOM Termname Table Sort 

TEDQOS Attach Foutine 

TEDQTN^ 1 Termname Table Code 

IEDOTTT User Interface 

XEDOXA Disk Messaqe Queue Initializer 

TGC0010D Operator control Control 

Module - 
TGC0110D Operator Control Control 

Module - 1 
" r GC0210D Operator Control Control 

Module - 2 
TGC0310D Operator Control Control 

Module - 3 
TGC0410D Operator Control Control 

Module - 4 
TGC0S10D Operator Control Control 

Module - 5 



IGC102 ACCTL SVC 102 Routine IGC102 EB 

TGC1303D TCAM Command Scheduler - SVC 34 TGC1303D NZ 
TGE0004G Start/Stop ERP Control Module TGE0004G JC 



Entry 


Chart 


Point 


IDs 


IEDQNM 


NM 


IEDQNO 


NO 


IEDQNF 


NP 


IEDQNQ 


NQ 


IEDQNR 


NR 


TEDQNS 


NS 


IEDQNX 


NX 


IEDQOA 


OA 


IEDOOE 


OB 


IEDQOG 


OG 


TEDQOM 


OM 


IEDQOS 


OS 


IEDQTNT 


NT 


IEDQUI01 


UI 


TEDQXA 


XA 


IGC0010D 


Z1 


IGC0110D 


Z2 


IGC0210D 


Z3 


TGC0310D 


Z4 


TGC0410D 


Z5 


TGC0510D 


Z6 
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Module 
Name 



Generic Name 



Entry 
Point 



Chart 
IDs 



TGE0104G 

TGE0204G 
TGE0304G 

TGE0404G 

TGE0504G 
TGE0604G 

TGE0804G 
TGE0904G 

IGE0004H 
IGE0104H 

TGE0204H 

TGE0404H 

IGE0504H 
IGE0804H 
IGG019Q0 
TGG019Q1 
TGG019Q2 
TGG019O3 



Pead/Write Unit Check and Unit 

Exception EPP Module IGE0104G 

Non-operational Control Unit IGE0204G 

Unit Check fcr Non-read , Non- 

write, and Non-poll CCWs EPP 

Module IGE0304G 

Auto Poll and Pead Pesponse to 
Poll Unit Check and Unit Excep- 
tion ERP Module IGE0404G 

Error Post and Second Level 

CCW Return Module IGE0504G 

Unit Check and Unit Exception 

on Pead/Write CCWs for Audio and 

2260 Local Devices EPP Module IGE0604G 

Start/Stop Channel Check Module IGE0804G 



Closedown Terminal Statistics 
Pecordinq 

BSC EPP Control Module 

BSC Pead/Write Equipment Check, 
Lost Data, Intervention Required, 
and Unit Exception EPP Module 

BSC Pead/Write Data Check, 
Overrun, and Command Peiect 
EPP Module 

BSC Second Level CCW Return 
Module 

BSC Error Post Module 

ESC Channel Check EPP Module 

Line I/O Interrupt Trace 

Local Receive Scheduler 



IGE0904G 
IGE0004H 

IGE0104H 



JD 

JE 

JE 

JG 

JH 

JI 
JJ 

JK 
JL 

JM 



Line End Appendaqe for BSC Lines IGG019Q2 

IGG019Q3 



IGEO204H 


JN 


IGE0404H 


JO 


IGE0504H 


JP 


IGE0804H 


JQ 


IGG019Q0 


Q0 


IGG019Q1 


Q1 


IGG019Q2 


Q2 



Line End Appendaqe for 
Start/Stop Lines 



Q3 
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Module Generic Name Entry Chart 

wame Point IDs 

TOG01QO4 Line End Appendaqe for Leased 

and Start/Stop Lines and No TSO 

TGG019O5 Line End Appendaqe for a QTAM 

Compatible System 

IGG01906 Send Scheduler for Leased 

Lines and No TSO 

TGG01907 Send Scheduler with No TSO 

TGG019Q3 Checkpoint Continuation Restart 

Subroutine 

TGG019RA Checkpoint Disk End Appendaqe 

TGG019RB TCA* Dispatcher 

TGG019RC EXCP Driver 

TGG019RD Euffered Terminal Scheduler 

TGG019R* EXCP Driver for a Sinqle CPB 

TGG019RG GET/BEAD 

TGG019RH GST Compatible 

IGG019RI PUT/WRITE 

TGG019RJ PUT Compatible 

TGG019RK Disk End Appendaqe for a Sinqle 

CPB 

TGG01-9RL Check Routine 

TGG019RM Point Routine 

IGG019RN PCI Appendaqe 

TGG019RO TCAM Dispatcher with Subtask 

Trace 

TGG019RP Reusability-Copy 

T GG019RO Post Pendinq 

TGG019R0 Line End Appendaqe 
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IGG019Q4 


Q4 


IGG019O5 


Q5 


IGG019Q6 


Q6 


IGG019Q7 


Q7 


IGG019Q8 


Q8 


IGG019RA 


RA 


IGG019RB 


RB 


IGG019RC 


RC 


IGG019RD 


RD 


IGG019RF 


RF 


IGG019RG 


RG 


IGG019RH 


RH 


IGG019RI 


RI 


IGG019RJ 


RJ 


IGG019RK 


RK 


IGG019RL 


RL 


IGG019RM 


RM 


IGG019RN 


RN 


IGG019RO 


RO 


IGG019RP 


RP 


TGG019RQ 


RQ 


IGG019R0 


RO 



Module 
Name 

1GG019R1 

TGG019P2 

IGG019R3 

TGG019R4 
IGG019R5 
IGG019R6 
IGG01930 
TGG01931 
TGG01933 
TGG01934 
IGG01935 
TGG01936 
TGG01937 
TGG0193S 
TGG01939 
IGG01940 
TGG01941 
IGG01942 
TGG01943 

TGG01944 

IGG01945 
IGG01946 

TGG01947 



Generic Name 

Dial Receive Scheduler 
Disk End Appendaqe 
leased Receive Scheduler 

Send Scheduler 

Attention Handler 

Startup Messaqe Routine 

Disk Message Queues Open - 1 

Disk Messaqe Queues Open - 2 

Open Error Handler 

Disk Messaqe Queues Open - 3 

Line Group Open - Load 1 

Line Group Open - Load 2 

Line Group Open - Load 3 

Line Group Open - Load 4 

Line Group Open - Load 5 

Line Group Open - Load 6 

Checkpoint Open 

Checkpoint Disk Initialization 

Checkpoint/Restart from 
Environment Record 

Checkpoint/Restart from 
Incident and CKREQ Records 

Checkpoint Continuation Restart 

GET/PUT and READ/WRITE Open 
Executor - Load 1 

GET/PUT and READ/WRITE Open 
Executor - Load 2 



Entry 


Chart 


Point 


IDs 


IGG019R1 


R1 


IGG019R2 


R2 


IGG019R3 


R3 


QEVENT 




IGG019R4 


R4 


IGG019R5 


R5 


IGG019R6 


R6 


IGG01930 


LB 


IGG01931 


LC 


IGG01933 


LA 


IGG01934 


LD 


IGG01935 


LE 


IGG01936 


LF 


IGG01937 


LG 


IGG01938 


LH 


IGG01939 


LI 


IGG01940 


LJ 


IGG01941 


MA 


IGG01942 


MB 


IGG01943 


ME 


IGG01944 


MG 


IGG01945 


MJ 


IGG01946 


L7 


IGG01947 


L8 
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Module 
Name 

TGG01948 

TGG0194 9 

T GG02030 

TGG02035 

IGG02036 

IGG02041 

TGG02046 

TGG02047 



Generic Name 

Line Group Open - load 7 

Checkpoint Disk Allocation 

Disk Messaqe Queues Close 

Line Group Close - Load 1 

Line Group close - Load 2 

Checkpoint Close 

GET/PUT and FEAD/WFITE Close 
Executor - Load 1 

GET/PUT and FEAD/WFITE Close 
Executor - Load 2 



Entry 


Chart 


Point 


IDs 


IGG01948 


LK 


IGG01949 


MM 


IGG02030 


L1 


IGG02035 


L4 


IGG02036 


L5 


IGG02041 


L6 


IGG02046 


L9 


TGG020U7 


L10 



NON-EXECUTABLE TCAM MODULES MICROFICHE DIFECTOFY 



DSECT 
Name 



T^DOAVTD 

IEDOCCW 

TEDQCDFD 

TEDOCIBD 
TT;, DQCKPD 

TEDQCPB 
TEDOCFED 

t?D0C5 

TEDODATA 
TEDODEB 



Generic Name 

Address Vector Table 

Channel Command Word 

Incident or Environment Checkpoint Disk 
Fecord 

Command Input Block 

Checkpoint Work Area 

Channel Program Block 

Checkpoint Bequest Element - Incident or 
CKFEO 

Operator Control Work Area 

Disk Data Fecord Area 

Data Extent Block for TCAM Application 
Programs 



DSECT 
Macro 
Name 

TAVTD 

TCCWD 



CIB 

TCKPD 

TCPBD 



TDATAD 



TDEBAPD 
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TEDODEB 

TEDQDIS* 

TEDOTOB 

TEDQLCB 

TEDOOPC 

TEDO^CB 

TEDQ^EWA 

TEDO^QCB 

T !!DO D B? 

TEDOOCB 

TEDOTtECB 

TEDOSCB 

TEDOSECT 

TEDOSTC* 

TEDOTCB 

TEDOTNTD 

TED0T3M 

TPDOTSI 

TEDQWEKA 

TEDOXSA 

TEDO10 

TFDQ11 

TEDQ12 

TED013 

TED014 

TED015 

TED016 

TEDQ17 
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Data Extent Block 
TCAM Dispatcher DSECT 
Input/Output Block 
line Control Block 
Operator Control AVT 
Process Control Block 
Process Entry Work Area 
Priority Queue Control Block 
Buffer Prefix 
Queue Control Block 
Pesource Control Elock 
Station Control Block 
Work Area Macro 
Subtask Control Block 

Task Control Block 

Termname Table 

Terminal Table Entry 

Time Sharinq Queue Control Block 

Access Method Work Area 

Extended Save Area Macro 

IEM 1030 Translate Table 

IBM 1050 Translate Table 

IBM 1050 Folded Translate Table 

IBM 1060 Translate Table 

IBM 2260 Translate Table 

Alias for IEDQU 

IBM 2740 Translate Table 

IBM 2740 Folded Translate Table 



TDEBD 

TDISPD 

TIOBD 

TLCBD 

TOPCD 

TPCBD 

TPEWAD 

TPPFD 

TQCBD 

TPSCBD 

TSCBD 

FORECOEE 

TSTCBD 

TTCBD 

TTNTD 

TTPMD 

TTSID 

TACSMD 

IEEXSA 



TED018 World Trade Teletype Adapter (WTTA) , ITA2 

Translate Table 

TED019 World Trade Teletype Adapter (WTTA) , ZSC3 

Translate Table 

T "5^0 20 AT&T 115A or Western Union 83B3 Translate Table 

IED021 AT&T TWX, with Parity Translate Table 

TED022 AT&T TWX, without Parity Translate Table 

TED023 IBM 2780, 6-bit Code Translate Table 

TED024. USASCII Code Translate Table 

TED025 Dummy Table (EBCDIC to EBCDIC) 

IED026 IBM 27^*1, BCD Code Translate Table 

IEDQ27 IBM 2741, EBCD Code Translate Table 

TED028 IBM 2741, Correspondence Code Translate Table 

TGG0193* iem 1030, 1050, 1060, 2740, 2741 Special 

Characters Table 

TGG019ES tpm 2260 Remote Special Characters Table 

TGG019PT AT&T 115A or Western Union 83B3 Special 

Characters Table 

TGG019FTT AT&T TWX, with Odd Parity Special Characters 

Table 

IGG019RV IBM 2260 Local Special Characters Table 

TGG019SW World Trade Teletype Adapter (WTTA) Special 

Characters Table 

IGG019PX AT&f TWX, with Even Parity Special Characters 

Table 

TGG019SY Audio Special Characters Table 

IGG019H7 ESC EBCDIC Code Special Characters Table 

TGG019R8 BSC USASCII Code Special Characters Table 

TGG019R9 BSC 6-bit Code Special Characters Table 

IHADCB Data Control Eloclc DCBD 
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m Cfl^ CONTROL EICCK LINKAGES 



Main Storage Location 16 
CVTPTR 



Communication Vector Table 



240(F0) 




328(148) 

368(170) 
372(174) 
376(178) 
380(1 7C) 

388(184) 
392(1 88) 

412(19C) 

420(1A4) 
424(1 A8) 

492 (I EC) 
496(1 F0) 
500(1 F4) 

720(2 DO) 

900(384) 

1152(480) 

1176(498) 



AVTCSTCS ^ Device Characteristics Table 



AVTRACE A I/O Trace Table 



AVTREADY Enabled Ready Queue 



AVTREADD Disabled Ready Queu 



AVTCKGET A Checkpoint Work Area 



AVTOCGET A Operator Control AVT 



AVTDISTR A Subtask Trace Table 



AVTRNMPT A Termname Table 



AVTOSECB OS TCAM ECB 



AVTPCBPT A First PCB 



AVTOPTPT A Option Table 



SECTION 5. DATA AREA LAYOUTS 



Station Control Block 



Task Control Block 




Data Extent Block 



Line Control Block 



AVTADBUF A Buffer currently being processed 



AVTCOREC A Buffer Unit Pool 



AVTADEBR A Reusable Disk DEB 



AVTADEBN A Nonreusable Disk DEB 





Task 


I/O Table 







jobname 


8(8) 


stepname 






28(1 C) 


ddname 






40(28) 




| UCB 







-16(-10) 



Repeated J 



DCBTRANS A Translation Tables 



DCBSCTAD | SCT 



Invitation List 




Code and Control 
Information 


Terminal Name 


Address 











Device Characteristics Table 



Characteristics List 



Characteristics List 



24(18) 



I/O Block p 




52(34) 



96(60) 



Station Control Block 



LCBRCB Resource Control Block 



LCBSCBD 
Offset to 
current SCB 



LCBSCBDA f SCB Directory 



Completion 
Code 



Sense Bytes 



LCBSTART A Channel Prograr, 
IORC.TAPT I 




80(50) 



SCBDESTQ | Destination QCB 



SCBTRANS ^Current Translation Table 



Count 



Translation Table 



( 



Incoming 



Outgoing 




Special Characters Table 



Terminal Table Entry 





destination 


3CB 









QCBELCHN 


A Element Chain 






8(8) 




QCBSTCHN 


| STCB Chain 






32(20) 




QCBDCBAD 


| DCBorPCB 






40(28) 


Start of Priority QCB 





12(C) 



16(10) 



TRMDESTQ ^ Destination QCB 



TRMSTAT A For a process entry, 

1 Process Entry Work Area 



TRMCHCIN 
DCT Index 



Option 
TRMOPTBL Table 
Offset 



(. Option Table 




Option Characteristics Table Address 





Option Characteristics Table 







Length 


Type 


Name 


0(A) 
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Buffer Prefix 



Destination QCB 



Data Control Block 



Data Extent Block 




4(4), 

12(C) 
16(10) 



24(18) 



40(28) 




QCBELCHN | Elements 



QCBSTCHN | STCB chain, 



QCBDCBAD f DCB or PCB 



LCB 



Start of the I OB 



LCBSTART ^ Channel program 



LCBDCBPT 



| DCB 



LCBRECAD 4 Current message 
1 block 



LCBSCBA f Current SCB 



LCBINVPT A Current invitation 
list entry 




Code and 

Control Information 


Terminal name 


Address 


Terminal name 


Address 


etc. 





DCBIOBAD t IOB 



+ 



DCBTRANS \ Translation Tables 



DCBDEBAD | DEB 



DCBSCTAD f SCT 



t 



DCBINVLI f Invitation list 



Station Control Block 



SCBDESTQ ^ Destination QCB 



SCBTRANS 1 Current 



Translation Table 




Incoming 



Outgoing 




Terminal Table Entry 



TRMDESTQ 4 Destination QCB 







DEBDSCBA | 


DSCB 




DEBTCBAD 


t 


TCB 


DEBDEBAD 


+ 


Next DEB 




DEBDCBAD 


+ 


DCB 




DEBUCBAD 


+ 


UCB 



Special Characters Table 




Option Characteristics Table 






length 


type 


name 


10(A) 


length 


type 


name 
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ADT3FESS VECTOE TAELE 

The TCAM Address Vector Table (AVT) is assembled at the beqinninq of a Messaqe Con.tr.ol 
Proqram. The basic AVT occupies bytes C-1055 and is assembled when ENVIPCN=TSO on the 
INTFO macro. If main-storaqe-only queuinq is specified (DISK=NO,ENVIFON=TCAM or MIXED), 
the AVT occupies bytes - 1079. When disk queuinq is used, the AVT occupies bytes - 
1225. 

When either the DisV Messaqe Queues Open or the Line Group Open routine loads the TCAM 
Dispatcher, the routine alsc places in the CVT a pointer tc a field that contains the 
address of the AVI. The fields in the AVT are initialized both durinq the assembly of the 
TNTFO macro and at MCP initialization time. 

The DSFCT rallies of the AVT fields are shown in the followinq layout. A more detailed 
description of the fields and the data they roiqht contain follows the DSECT layout. 
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IEDQAVTD 

I 0<0) : n 

*>*' AVTSAVE1 ->» 

*-f"*" Message Control Program Save Area ^-P 



+72 (48) 



AVTSAVE2 

Dispatcher Save Area 



+144 (90) 



AVTSAVE3 

Subtask Save Area 



+216 (D8) 



AVTSAVE4 

First Level Subroutine Save Area 



+288 (120) 



AVTSAVEX 

Disabled Save Area 



+320 (140) 



+328 (148) 



AVTDLQ 

DLQ=Termname 



AVTCSTCS 

Address of the First Entry in the Device Characteristics Table 



+332 (14C) 



AVTDPARM 

Disabled Parameter List 



+336(150) 



AVTDOUBX 

Disabled Doubleword Scratch Area 



+344(158) 



AVTDOUBL 

Enabled Scratch Area 



+352 (160) 



AVTCTLCH 

Operator Control Characters 



+360 (168) 



AVTPASWD 

Password 



+368(170) 



AVTTCB 

Address of the Message Control Program's TCB; Set by OPEN 



+372(174) 



AVTRACE 

Trace Table Address 



+376 (178) 



AVTREADY 

Enabled Ready Queue 



+380(170 



AVTREADD 

Disabled FIFO Ready Queue 



+388(184) 



AVTCKGET 

Checkpoint Work Area Address 



+392(188) 



916 



AVTOCGET 

Operator Control Work Area Address 



+396 (18C) 


AVTEXA2S 

Executed Instructions to Save the User's Registers 




+402 (192) AVTEXS2A 

Executed Instructions to 






Save the User's Registers 


408 (198) 


AVTPARM 

Address of Parameters 


412 (19C) 


AVTBASE 

Address of the AVT 


416 (1A0) 


AVTPARM3 

Address of Additional Optional Parameters 


420 (1A4) 


AVTDISTR 

Address of the Dispatcher Subtask Trace Table 


424 (1A8) 


AVTRNMPT 

Address of the Termname Table 


428 (1AC) 


AVTRDYA 

Address of User Exit in the READY Macro Expansion. 


432(1 BO) 


AVTBSCAN 

Line End Appendage BSC Message Scan 


436 (1B4) 


AVTRARTN 

Address of Routine to Update Line I/O Trace Table 


440 (1B8) 


AVT 


POST 





Tpost Parameter List Us 


ed by Operator Control *- 


448(1 CO) 


AVTSPLPT 

Start Parameter List Pointer; Set by INTRO 


452 (1C4) 

AVTCIB 

CIB=lnteger 


453 (1C5) 

AVTNCKPR 

CKREQS= Integer 


454 (1C6) 

AVTNOLBF 

LNUNITS=mteger 


456 (1C8) 


AVTAS 

Address of the Hold/Release Terminal Routine 


460(1 CO 


AVTCKTCB 

Address of the Checkpoint TCB 


464(1 DO) 


AVTOCTCB 

Address of the Operator Control TCB 


468 (1D4) 


AVTOLTCB 

Address of the On- Li he Test TCB 


472 (1D8) 


AVTCWTCB 

Address of the FE Common Write TCB 
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476(1 DC) 


AVTCWECA 




FE Common Write ECB 


480 (1E0) 


AVTCKECA 




Checkpoint ECB 


484 (1E4) 


AVTOLECA 




On-Line Test ECB 


488 (1E8) 


AVTOPECA 




Operator Control ECB 


492(1 EC) 


AVTOSECB 




ECB Used by the Dispatcher to Cause TCAM 




Task to be in the Wait State 


496 (1F0) 






AVTPCBPT 




Address of the First Process Control Block 


500 (1F4) 


AVTOPTPT 




Address of the Option Table 


504 (1F8) 


AVTKA02 




Address of the I/O Generator in the Activate Subtask 


508 (1FC) 






AVTREXIT 




TREXIT=Name 


512 (200) 


AVTCRSRF 




CROSSRF=lnteger 


516 (204) 


AVTCOMPT 




Address of Communications Parameter List 


520 (208) 


AVTUI 




Address of the User Interface Routine 


524 (20C) 


AVTLM 




Address of the Return Interface Routine 


528 (210) AVTOLIJ 
OLTEST=ln 


5T I AVTHG02 

eger -J Address of the Routine to Remove a Checkpoint 
Element from the Time Delay QCB 




532 (214) 


AVTAL 




Address of the Address Finder Routine 


536 (218) 






AVTGD 




Address of the Buffer Association Routine 


540 (21 C) 


AVTA3 




Address of the Transparent CCW Builder Routine (IEDQBT) 


544 (220) 






AVTAX 




Address of the Buffer Step Routine 
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548 (224) 


AVTEA 

Address of the TCAM Dispatcher 


552 (228) 


AVTHA 

Address of the Receive Scheduler 


556 (22C) 


AVTHD 

Address of the Send Scheduler 


560 (230) 


AVTEW 

Address of the Get Scheduler 


564 (234) 


AVTEC 

Address of the Put Scheduler 


568 (238) 


AVTEZ 

Address of the Get F I FO Scheduler 


572 (23C) 


AVTBZ 

Address of the Log Scheduler 


576 (240) 


AVTR1 

Address of the Dial Scheduler 


580 (244) 


AVTHB 

Address of the Buffered Scheduler 


584 (248) 


AVTE7 

Address of the Retrieve Scheduler 


588 (24C) 


Reserved 


592 (250) 


Reserved 


596 (254) 


Reserved 


600 (258) 


Reserved 


604(250 


Reserved 


608 (260) 


Reserved 


612(264) 


Reserved 


616(268) 


Reserved 
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620 (26C) 


Reserved 


624 (270) 


AVTDMECB 

Dummy Line I/O ECB 


628 (274) 


'AVTA3TL 

Address of the Translate List for the Dynamic Translation Routine (IEDQA3) 


632 (278) 


AVTTONE 

WTTONE=lnteger; Address of World Trade Tone Characters 


636 (27C) 


AVTNX 

Address of the Operator Awareness Message Routing Routine 


640 (280) 


AVTIOT 

Address of Line I/O Trace Table Handler 


644 (284) 


AVTHI 

Address of System Delay QCB 


648 (288) 


AVTHK 

Address of the Stopline QCB 


652 (28C) 


AVTCKRMV J, 



Request for Removal of Checkpoint Routine 
Element from Time Delay Queue 



668 (29C) 



AVTCKELE 





Checkpoint Request Element, Start of Checkpoint QCB 


»— 


p-s 


676 (2A4) 

AVTSCBSZ 

SCB Size 


677 (2A5) 

AVTCKQAD 

Address of the Checkpoint QCB 




680(2A8) AVTCKELF 

Checkpoint Request 
Element Flags 


681 (2A9) 

AVTCPRCD 

CPRCDS= Integer 


682 (2AA) 

AVTCKELV 

CPINTVL=Time Interval 




684 (2AC) 

AVTCKTIM 

Time of Day Interrupt 


686 (2AE) 

Index to QCB Address 


287 (2AF) 

AVTOPERL 

OPEN Error Locator 




688 (2B0) 

AVTOPXCL 

ID of OPEN Module with Error 


690 (2B2) 

AVTOPERT 

OPEN Error Type 


691 (2B3) AV TCKBYT 

Status at Checkpoint 
and Time Delay 




692 (2B4) 

AVTHG01 

Address of Time Delay Subroutine 




696 (2B8) 

AVTCKLNK 

Link Field On the Time Queue 




700 (2BC) ..__...,.■ 

AVTDELEM 

Dummy Last Element 




704 (2C0) 

AVTDELAO 

Address of the Dummy Last Element 





920i 



I 



708 (2C4) 



AVTCCELE 

Incident Checkpoint Request Element 



1 



716 (2CC) 



AVTCLRHI 

Mask for Clearing Left Two 
Bytes of a Register 



718 (2CE) 



AVTHFF 

Half Word of X'FFFF' 



720 (2D0) 



AVTADBUF 

Address of Buffer 



724 (2D4) 



AVT2260L 

Address of 2260 Local Receive Scheduler 



728 (2D8) 

AVTSYSER 

System Error Flags 



729 (2D9) 



AVTMSGS 

List of Optional VCONs 



732 (2DC) 



AVTINSPT 

Address of the QCB of Available Insert Blocks 



736 (2E0) 



AVTSUPPT 

Address of the Start-up Message QCB 



740 (2E4) 



AVTTSOPT 

Address of the Time Sharing Input QCB 



744 (2E8) 



AVTOCQPT 

Address of the Application Program Open/Close Routine 



748 (2EC) 



AVTDELYB 

Time Delay Subtask QCB 



764 (2FC) 



AVTREFTM 

Reference Time 



| 766 (2FE) 



AVTINOUT 

Dummy INEND/OUTEND Parameter List 



768 (300) 



AVTIMQPS 

SVC 102 Parameter 



776 (308) 



AVTTIMQ 

Time Delay Queue 



780 (30C) 



AVTBFREB 

Buffer Request QCB 



792 (318) 



AVTBFRTB 

Buffer Return QCB 



804 (324) 



AVTCKPTB 

Checkpoint QCB 



816(330) 



AVTOPCOB 

Operator Control QCB 



828 (33C) 



T 



AVTOLTQB 

On- Line Test QCB 



J 
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J 



840 (348) 



A VT ACT IB 

Activate QCB 



a 



852 (354) 



AVTCLOSB 

Closedown QCB 



864 (360) 



AVTCPRMB 

QCB to Remove an Element from the Time Delay QCB 



876 (36C) 



AVTDSIOB 

Disk I/O QCB 



888 (378) 



AVTCPBCB 

CPB Cleanup QCB 



900 (384) 



AVTCOREC 

Close Buffers Pool 



904 (388) 



AVTCADDR 

Main Storage Queue Count 



908 (38C) 



AVTFZERO 

Fullword of All Zeros 



912(390) 



AVTCAREA 

FE Common Write Interface Area 
Address of the Patch Module 



916 (394) 



AVTCWPM1 

FE Common Write Interface Area — First Parameter Pointer 



920 (398) 



AVTCWEC1 

FE Common Write Interface Area — First ECB 



924 (39C) 



AVTCWFL1 

FE Common Write 
Flag Byte 1 



925 (39D) AVTCWFL2 

FE Common Write 
Flag Byte 2 



926 (39E) A vTCWTS1 

FE Common Write — 
Flag Byte 3 



927 (39F) A yrCWTS2 

FE Common Write 
Flag Byte 4 



928 (3A0) 



AVTCWPM2 

FE Common Write Interface Area — Second Parameter Pointer 



932 (3A4) 



AVTCWEC2 

FE Common Write Interface Area — Second ECB 



936 (3A8) 



AVTAFE10 

Address of FE STCB Trace Dump Routine 



940 (3AC) 



AVTAFE20 

Address of FE I/O Trace Dump Routine 



944 (3B0) 



AVTAFE30 

Address of FE Buffer Dump Routine 



948 (3B4) 



T 



AVTCWINT 

FE Common Write Interface Area — Patch Area 



J 



922 



1012 (3F4) 



AVTGETMN 

GETMAIN Parameter List 



1022 (3FE) 



AVTHA2 

Constant = 2 



1 



1024 (400) 



AVTHA3 

Constant = 3 



1026 (402) 



AVTHA4 

Constant = 4 



1028 (404) 



1030 (406) 



AVTHA7 

Constant = 7 



AVTHA16 

Constant = 1 6 



1032 (408) 



1034 (40A) 



AVTKEYLE 

KEYLEN on the Message Queues 



AVTLNCNT 

Number of Lines Opened 



1036 (40C) 



AVTOPCNT 

Number of Lines Taken by Operator Control 



1038 (40E) AVTpPCON 

Termname Table Offset to the Primary 
Operator Control Terminal 



1040(410) AVTAVFCT 

Number of Buffers in the Buffer 
Units Pool 



1042 (412) 



AVTSMCNT 

Number of Lines Serviced by the 
Start-up Message Subtask 



1044 (414) AVTINTLV 

Number of Seconds of a System Delay 
INTVAL=lnteger 



1046(416) AVTDLQX 

Offset in Termname Table of the 
Dead Letter Queue 



1048 (418) 



1050 (41 A) 



AVTDUMBR 

Dummy Line Trace Table Update 



AVTBIT1 

Flag Bits 



1051 (41 B) 



AVTBIT2 

Flag Bits 



1052 (41 C) 



AVTBIT3 

Flag Bits 



1053 (41D) 

AVTCKRST 

RESTART= Integer 



1054 (41 E) 



AVTDSKCT 

Number of Buffers on CPBs 



1056 (420) 



AVTHM02 

Address of the Destination Scheduler 



1060 (424) 



AVTCMIN 

MSM I N= Integer 



1064 (428) 



AVTCMAX 

MSMAX=lnteger 



1068 (42C) 



AVTTOTNC 

Number of Records in the Entirejvlessage Queues Data Set 

(MSUNITS=lnteger) 



1072 (430) 



AVTNCPBQ 

Queue of Buffers and ERBs Waiting to be Processed 



1080 (438) 



AVTFL 

Address of the Disk EXCP Driver Routine 



1084 (43C) 



AVTIA 

Address of the REUS part of the Reusability 
Copy Subtask 



1088 (440) 



AVTCOPY 

Copy Subtask QCB Pointer 
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|1092 (444) : ■ : 
~ > " AVTDKAPQ ->~ 

Queue of CPBs to be Processed by CPB Cleanup (Disabled) 



1100(440 



AVTDKENQ 

Queue of CPBs to be Processed by CPB Cleanup (Enabled) 



1 108 (454) 



AVTNOBFQ 

Queue of CPBs without Buffers 



s 1 116(450 AVTREUSQ 

Queue of CPBs Being Returned to the Reusability 
Subtask by CPB Cleanup 



1124(464) 



AVTINCPQ 





Queue of CPBs Requesting I/O be Done by EXCP Driver *"" 


1132(460 


AVTFCPB 

Address of the CPB Free Pool 


1136(470) 


AVTCPBPT 

Address of the CPB Free Pool to be Freed by Disk Close 


1140(474) 


AVTIOBR 

Address of a Series of lOBs, One for Each Extent of the Reusable Disk Queue 


1144(478) 


AVTIOBN 

Address of a Series of lOBs, One for Each Extent of the Nonreusable Disk Queue 


1148(470 


AVTLODPT 

Absolute Disk Record Number Indicating Time to Activate the 
REUS part of the Reusability — Copy Subtask 


1152(480) 


AVTADEBR 

Address of the DEBEOEA Field in the DEB for the Reusable Disk 
Message Queues Data Set 


1156(484) 


AVTNOVOR 

Number of Extents in the Reusable Disk Message Queues Data Set 


1160(488) 


AVTRCTRR 

Number of Records Per Track On the Reusable Disk Message Queues Data Set 


1164(480 


AVTTRCYR 

Number of Tracks Per Cylinder On the Reusable Disk Message Queues Data Set 


1168(490) 


AVTTOTNR 

Number of Records in the Entire Reusable Disk Message Queues Data Set 


1172(494) 


AVTVOLRR 

Product of the Number of Extents Times the Number of Records 
Per Track On the Reusable Disk Message Queues Data Set 


1176(498) 


AVTADEBN 

Address of the DEBEOEA Field in the DEB for the Nonreusable 
Disk Message Queues Data Set 


1180(490 


AVTNOVON 

Number of Extents in the Nonreusable Disk Message Queues Data Set 



924 



1184 (4A0) 



AVTRCTRN 

Number of Records Per Track On the Nonreusable Disk Message Queues Data Set 



1188 (4A4) 



AVTTRCYN 

Number of Tracks Per Cylinder On the Nonreusable Disk Message Queues Data Set 



1192 (4A8) 



AVTTOTNN 

Number of Records in the Entire Nonreusable Disk Message Queues Data Set 



1196 (4AC) 



AVTVOLRN 

Product of the Number of Extents Times the Number of Records Per 
Track On the Nonreusable Disk Message Queues Data Set 



1200 (4B0) 



AVTHRESN 

Absolute Record Number (Threshold) to Cause Closedown Due to the 
Filling of the Nonreusable Disk Message Queues Data Set 



1204 (4B4) 



AVTNADDR 

Nonreusable Disk Relative Record Number of the Next Record to be Assigned 



1208 (4B8) 



AVTRADDR 

Reusable Disk Relative Record Number of the Next Record to be Assigned 



1212 (4BC) 



AVTHRESE 

Nonreusable Threshold Closedown Element 



1223 (4C7) 

AVTHRESS 

Status Completion Code 



1224 (4C8) 



AVTCPBNO 

CPB= Integer 



1226 (4CA) 



Reserved 
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offset 




Name 


Bvtes 


o 


(0) 


AVTSAVE1 


72 


72 


(48) 


aviSAV!*2 


72 


ma 


(90) 


AVTSAVE3 


72 


216 


(08) 


A^TSAVE4 


72 


288 


(120) 


AVTSRVEX 


U'O 


320 


dao) 


AVTDLO 


8 



328 (148) 



AVTCS^CS 



332 


(14C) 


AVTDPAFM 


a 


336 


(150) 


AVTDOUBX 


8 


34U 


(158) 


RVTDOUBL 


8 


352 


(160) 


ftVTCTLCH 


8 


360 


(168) 


AVTPASWD 


8 



Description 

Wessaqe Control Program save area 

Dispatcher save area 

subtask save area 

*irst level subroutine save area 

Disabled save area 

At assembly time, set by the 
DLQ=termname operand of the INTBO 
macro. After the Termname Table 
is sorted, this value is moved to 
AVTDIQX and this field (AVTDLQ) is 
overlaid and used as part of the 
disabled save area, 

Address of the first entry in 
the Device Characteristics 
Table 

Disabled; parameter list 
(used with AVTDOUBX) 

Disabled doubleword scratch, 
area 

Enabled doubleword scratch 
area 

Operator Control characters 

Messaqe Control Program password 



926 



Offset 



Name 



Bytes 



368 (1"70> 

372 (174) 

•^he following 

376 (178) 

380 (17C) 



388 (184) 



AVTTCB 4 

AVTMCE 4 

are the ready queues 
AVIFEADY 4 

AVTFEADD 8 



AVTCKGET 



^92 


(188) 


AVTOCGET 


4 


3^6 


(18C) 


AVTEXA2S 


6 


U02 


(192) 


AVTEXS2A 


f 


U08 


(198) 


AV1PAFM 


4 


412 


(19C) 


BVTEASE 


4 


4 16 


(1A0) 


AVIPAFM3 


4 


420 


(1A4) 


AVTDTSTF 


4 


424 


(1A8) 


AVTPNMPT 


4 


428 


(1AC) 


AVIRDYA 


4 


432 


(1B0) 


AVTBSCAN 


4 


U35 


(1*4) 


AVTFAPT 


4 


440 


(188) 


AVTPOST 


8 


4U8 


(1C0) 


AVTSPLPT 


4 


452 


(1C4) 


AVTCTB 


1 



Address cf the Messaqe Control 
Proqram TCB - set by the first 
OPEN routine 

Line I/O Interrupt Trace Table 

address 

for the TCAM Dispatcher: 

Enabled ready queue - points 
to the first item in the chain 
of elements that is to be pro- 
cessed by the TCAM Dispatcher 

Disabled FIFO ready queue - controls 
the chain of elements tposted from 
disabled routines. The first word 
points to the first element; the 
second word points to the last 
element on the chain. 

Address of the Checkpoint work 
area; set after a successful GETMATN 
is completed by the Checkpoint Open 
routine 

Address of the Operator Control 
work area 

Instructions to be executed to save 
the user's reqisters 

Continuation of the instructions to be 
executed to save the user's reqisters 

Address of the parameters to be 
processed 

Address of the AVT 

Address of additional optional 
parameters 

Address of the Dispatcher's 
Subtask Trace Table 

Address of the Termname Table 

User exit address in the READY 
macro expansion 

Line End Appendaqe Address for 
BSC messaqe scan 

Address of the routine to update 
the Line I/O Interrupt trace table 

Tpost parameter list used 
by Operator Control 

Start parameter list address - set 
by the TN^PO macro expansion 

The maximum number of Command 
Irput Blocks that can be utilized 
at any one time in the TCAM 
system - set by the CIB=inteqer 
operand of the INTFO macro 
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Offset 

453 (1C5) 



Jaje 
ftVTNCKPR 



Bytes 
1 



454 (1C6) 



456 (1C8) 



AVTNOLBF 



AVTAS 



The maximum decimal numfcer of 
destination queues in use at any 
time for application programs that 
use a CKREQ macro - set by the 
CKRECS=integer operand of the INTBO 
macro 

Specifies the number of buffer 
units that may be used to build 
buffers for messaqes - set 
by the LNUNITS=integer operand 
of the INTRO macro 

Address of the Hold/Release 
terminal routine 



46 


(1CC) 


AVTCKTCB 


4 


464 


(1^0) 


AVTOCTCE 


4 


468 


(1T>4) 


AVTCLTCB 


4 


4*72 


(1D8) 


AVTCWTCB 


4 


■^he 


following 


are the Event 


CO 


U76 


(1DC) 


AVTCWECA 


■4 


480 


(1T50) 


AVTCKECA 


4 


4<U 


(1F4) 


AVTOIFCA 


4 


U88 


(1*8) 


AVTOPECA 


4 


UQ2 


(1FC) 


AVTOSECB 


4 



m he following are the addresses of the TCBs of the attached tasks: 

Address of the Checkpoint TCB 

Address cf the Operator Control 

TCB 

Address of the On-line Test 
TCB 

Address of the FE Common Write 
TCB 



FE Common Write ECB 

Checkpoint ECB 

On-line Test ECB 

Operator Control ECB 

ECB used by the Dispatcher to 
cause the TCAH task to be in the 
WAIT state 

Address of the first Process Control 
Block 

Address of the Option Table 

Address of the I/C Generator routine 
in the Activate subtask 

Address of a user written routine to 
be given control when all entries in 
the TCAM I/O Interrupt Trace Table have 
been filled - set by the TREXIT=name 
operand of the INTBO macro 

Specifies the number of entries in the 
Cross Reference Table - set by the 
CROSSRF=integer operand of the INTRO 
macro. Replaced by the address of 
the Cross Reference Table. 

Address of the Communications 
Parameter List 

Address of the User Interface routine 



4Q6 

500 
^04 



512 

516 
520 



(1*0) 

(1' p 4) 
(1?8) 

(1FC) 



(200) 

(20 4) 
(208) 



AV^CBPT 

AVTOPTP^ 
AVTKA02 

AVTR'XTT 



AVTCRSRF 



AVTCOMPT 
AVTUI 
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Offset 

5 24 (20C) 

5 28 (210^ 



528 



(210) 



532 (214) 
536 (218) 

5U0 (21C) 



544 



(220) 



Name 
AVTLM 

AVTHG02 

AVTOLTST 

AVTAL 
AVTGD 

AVTA3 

AVTAX 




548 


(224) 


RV1EA 


4 


552 


(228) 


AVTHA 


4 


556 


(22 C) 


AVTBD 


4 


560 


(230) 


AVTEW 


4 


^64 


(23 4) 


AVI EC 


4 


568 


(238) 


AVTEZ 


4 


5^2 


(23C) 


AVTBZ 


4 


576 


(240) 


RVTB1 


4 


580 


(244) 


ftVTHB 


4 



584 (248) AV1E7 4 

^he following are the special elements used in TCAM: 

588 (24C) 36 deserved 

6 24 (27 0) AVTDMECB 4 



Address of the Beturn Interface 
routine 

Address of the routine to remove a 
Checkpoint element from the Time 
Delay OCB 

Set ty the OLTEST=inteqer operand of 
the IUTBC macro 

Address of the Address Binder routine 

Address of the Buffer Association 
routine 

Address of the Transparent Transmission CCW 
Buildinq routine (IEDQBT) 

Address of the Buffer Step 
routine 

Address of the TCAB Dispatcher 

Address of the Receive Scheduler 

Address of the Send Scheduler 

Address of the Get Scheduler 

Address of the Put Scheduler 

Address of the Get EIEO 
Scheduler 

Address of the Loq Scheduler 

Address of the Dial Scheduler 

Address of the Buffered 
Scheduler 

Address of the Beceive Scheduler 



628 



632 



(27 4) 



(278) 



AVTA3TL 



AV^TONE 



6 36 



6 40 



(27C) 



(280) 



AVTNX 



AVTTOT 



Address of the dummy line 
I/O ECB 

Address of the translate 
list for the Dynamic 
Translation routine 

Contains either a zero or the 
address of a field cdnsistinq of 
2 halfwords; the first contains 
the flTTCNE inteqer from the INTBO 
macro and the second a X'EE* repre- 
senting the number of characters 
specified by WTTONE. 

Address of Operator Awareness 
Messaqe Boutinq routine 

Address of Line I/O Trace 
Table routine 
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Offset Name 

f 44 (284) AVTHI 

*48 (288) RVTHK 

6S2 (28C) AWICKPMV 

*68 (29C) AVTCKFLE 

6"7g (2A4) AVTSCFSZ 

*"?7 (2ft6) ftVTCKQAD 

6 80 (2AP) AVTCKFLF 



6 81 (2A9) 



*82 



(2AR) 



AV^CPFCD 



AVTCKELV 



F-ytes 
4 

4 

T6 



1 



Description 

Address of System Delay 
QCB 

Address of Stopline QCB 

Bequest for removal of Check- 
point routine element from the time 
delay queue 

Checkpoint Bequest Element - the 

Time Delay or Reusability subtasks tpost this 

element to start the Checkpoint routine 

Specifies the number of bytes in the 
SCB includinq the save area for the 
user's reqisters. 

Address of Checkpoint QCB 

Checkpoint Pequest Element flaq bits 



Bit definitions: 



Name 
AVTCFDVN 

AVTCMCPN 

AVTCTNCN 

AVTCCLCN 
AVTCPIPN 

AVTCFTLN 
AVTWAFM 
1 



684 


(2AC) 


AVTCKTIM 


2 


6 p 6 


(2AF) 




1 


687 


(2ft*) 


AVTO*>FT?L 


1 


688 


(2P0) 


fiVTOPXCL 


2 


690 


(282) 


AVTOPEFT 


1 



Bit 




Value 
X»80 f 



1 X«40' 



X'20» 
X'10' 

X'08' 
X'C4' 

X'02 1 
X'OV 



Checkpoint requested by the 
FEftDY macro expansion 

Checkpoint requested by the 
MCFCIOSE macro 

Unused 

Checkpoint requested by the No 
Incident Records routine 

Closedown completion bit 

Checkpoint in proqress 
bit 

Checkpoint requested 

Warm restart 



The number of environment checkpoint 
records to be retained in the Check- 
point Data Set at any one time - set 
by the CPFCDS=inteqer operand of the 
TNTBC macro 

The number of seconds between environ- 
ment checkpoints - set by the CPINTVI=inteqer 
operand of the INTBC macro 

Time of day interrupt 

Index to the QCB address 

Open Errcr location 

Module ID of the routine 
that has an error 

Specifies the type of open error that 
occurred 



930 



Offset J a me 

f<»1 (2P3) fiVTCKBYT 



6 2 


(?B4) 


AVTHGP1 


4 


PP6 


<2B8) 


AVICKLNK 


4 


700 


(2BC) 


AVTDEIEM 


u 


704 


(2C0) 


AVIDELAD 


u 


"708 


(2CU) 


AVTCCELE 


■8 



716 



(2ca 



AVTCtBHT 



718 


(2CE) 


RVTEF 


2 


720 


(2D0) 


AVTAEBUE 


4 


~>2U 


(2D4) 


AVT2260I 


4 


"?28 


(2D-8) 


AVTSYSER 


1 



729 (2D9) 

^he followinq 

732 (2DO 

736 (2E0) 

7 40 (2E4) 

744 (2E8) 

The followina 

748 (2FC) 



Name 
aVtc-minn 

avtcwaxn 



P.VTMSGS 

is ,a list of 

AV1INSPT 

AVTSUPPT 

AVTISOPT 

AVIOCQPT 

is a list of 
AVTDELYB 



Specifies the checkpoint and time delay 
status 

Address of the Time Delay Subroutine 



Link field on the 'Time Cueue 

Dummy last element - used as the last 
element in any QCB's (or the ready 
queue's) element chain 

Address of the dummy last element 

Incident Checkpoint Bequest element - tposted 
by the Operator Control task to request an 
incident checkpoint 

Mask used with the next halfword to 
clear the left two bytes of a 
reqister, 

Halfword equal to X'FEFE' 

Address of the buffer currently 
beinq processed 

Address of the 2260 local Receive 
Scheduler 

System error flaq byte - set by 
the operands of the INTFO macro 
as follows; 

Bit Valu e Description 

X^O* The number of main storage 

queue units less 
than that specified 
by HSMTN=inteqer 

1 X'UO' The number of main storaqe 

queue units more 
than that specified 
by MSWAX=inteqer 



2-7 



Reserved 



Address of a list of 
optional VCONs 



pointers to QCBs: 
u 



Address of the QCE of Available 
Insert blocks 

Address of the Startup Messaqe 

OCB 

Address of the Time Sharinq 
Input. OCB 

Address of the application 
proqram Cpen/Close subtask 



non-optional OCBs: 
20 Time Delay subtask QCE 
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Offset 

764 (2 1? C) 

766 (2FE) 

768 (300) 



JL§JL§ 
RVTPEPTH 

AVTTNOUT 
AVTI1QPS 



Bytes 
2 



776 


(308) 


AVTTTNQ 


"780 


(30C) 


AVTBFPEB 


" 7C >2 


(318) 


AVTBFPTE 


804 


(32U) 


AVTCKPTE 


«16 


(330) 


AVTOPCOB 


P28 


(33C) 


AVTOLTOB 


«uo 


(348) 


SVTACTIB 


«=S2 


(3S4) 


AVTCLOSB 


«64 


(360) 


AVTCPFMB 


P7g 


(?*5C) 


flVlDSTOB 


Q98 


(378) 


P.VTCPBCB 


QOO 


(3«4) 


flVTCOPBC 


QOU 


P88) 


AVTCABDP 


908 


(3PC) 


AVTP7,pT?c 


^Sfi 


''ollowina 


is the P E 


Q 12 


(3°0) 


BVTCAPFA 


9 16 


(394) 


AVTCWPM1 


Q ?0 


(398) 


RVTCWEC1 


924 


(39C) 


AVTCWFL1 



4 

12 
12 
12 
12 
12 
12 
12 
12 



Description 

Pepresents the reference 
time, current time of day, 
plus cr minus 6 hours 

Dummy TNEND/OUTE.ND 
parameter list 

SVC 102 parameter - to tpost 
the Time QCB to itself at the 
interrupt 

Time delay queue 

Buffer Request QCB 

Buffer Bequest QCE 

Checkpoint QCE 

Operator Control QCE 

On-line Test QCE 

Activate QCB 

Closedown Completion QCE 

OCB tc remove an element 
from the Time Delay QCB 



12 Disk I/O QCE 

12 CPB Cleanup QCB 
4 Close buffers pool 
4 Hain Storaqe queue count 
ti Fullwcrd of zeros 

Common Write task interface area: 

4 Address of the Patch module 
for this task 

4 First parameter list point for 
this task 

4 """irst FCE for this task 

1 First flaq byte for this task 

Bit definitions: 

Name Bit Value 

AVTCOMWN X'80' 



925 (39D) 



AVTCWFL2 



Specifies that the 
FE Common write task 
is attached; set by. 
the COMWBTE=YES operand 
of the INTFO macro 



Second flaq byte for this task 



932 



Offset 



Same 



1034 (40R) AVTLNCNT 



1036 (40C) AVTOPCNT 



1038 (40F) AVTOPCCN 



104O (410) AVTAVFCT 



Eytes 

fame 

AVTCWACT 



Q26 


(39E) 


AVTCWTS1 


1 


Q2T 


(30T) 


AVTCWTS2 


1 


928 


(3A0 > 


AVTCWPM2 


4 


932 


(3P4) 


AVTCWFC2 


4 


Q?6 


(3A8) 


AVTAFE10 


4 


940 


(3AC) 


JVTATE20 


4 


°44 


(3B0) 


AVTAFF30 


4 


PUP 


(3PU) 




64 


1012 


(3*4) 


AVTGETMN 


1 o 


10 22 


(?FE) 


AVTHA2 


2 


1024 


(80 0) 


AVTHA3 


2 


1026 


(402) 


AVTHA4 


2 


1028 


(404) 


AVTHA7 


2 


1030 


(4 06) 


AVTHA16 


2 


1032 


(408) 


AVTKEYLF 


2 




1042 (412) 



AVTSUCNT 



Description 

Specifies that the 
FE Common Write task 
is active; set by the 
COMWPITE=YES operand 
of the TNTFO macro. 



Third flaq byte for this task 

Fourth flaq byte for this task 

Second parameter pointer for 
this task 

Seccn<3 ICE for this task 

Address of the FE STCE 

Trace Pump routine - TEDQFE10 

Address cf the FE I/O Trace 
Oump routine - TEDQFE20 

Address of the FE Buffer 
Dump routine - TEDQFF.30 

Patch area for this task 

GFTMAIN parameter list 

Constant = 2 

Constant = 3 

Constant = 4 

Constant = 7 

Constant = 16 

Specifies the size in bytes 
of a tuffer unit - set by the 
KEYIEN=inteqer operand of the 
INTFO macro 

Number of lines opened - set by 

the line Group Open routine - checked 

by the Time Delay subtask 

Number of lines taken by the 
Operator Control task - set 
by the System Delay subtask 
and the Operator Control task 

Termname Table offset to the entry 
for the primary Operator Control 
terminal - set by the PEIMARY=termname 
operand of the INTFC macro 

Number of buffers in the buffer 
unit pool - this value is equal 
to the sum of the LNDNITS=inteqer 
and the HSONTTS=inteqer operands 
of the INTFO macro 

Number of lines serviced by the 
Startup Messaqe subtask 
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QlJset NajJ Bytes Description 

1044 (414) AVTIN^LV 2 Numher of seconds of a system 

delay - set by Operator Control 

or by the TNVTAL=inteqer 

operand of the INTFO macro; checked by 

the Time Delay subtask 

1046 (416) AVfDLOX 2 Terra-name Table offset of the dead 

letter queue - moved from the AVTDLQ 
field of the AVT after the Termname 
Table is sorted at execution time 

104° (418) AVTDUMBP 2 Dummy line I/O Interrupt Trace 

^able update 

1050 (41A) AVTBIT1 1 Flaq bits 

Bit Definitions: 

Name Bit Value Description 

AVTAPIKN X'80« Prevents the Disk End 

appendaqe from addinq 
a CPB to the Disabled 
Disk End QCB for CPB 
Cleanup 

AVTAPIKF TL'l?* Mask tc permit the Disk End 
Off appendaqe to add a 

CPB to the Disabled 
Disk End QCE for CPB 
Cleanup 

AVTTSON 1 X'40 f Specifies that the TCAM 

environment has TSO or 
is mixed - set by the 
FNVIBON=TSO or MIXED 
operand of the INTFO 
macro 

AVTAQTAN 2 X'20« Specifies that the system 

environment has TCAM 
or is mixed - set by the 
ENVIRON=TCAM or MIXED 
operand of I NT BO 

AVTDLAYN 3 X'10« Specifies that a 

system delay is in 
effect - set by the' 
Operator Control task 

AVTDLAYF 3 X»EF» Mask tc specify that a 
Off system delay is not 

in effect - bit 3 is 
turned off by the Time 
Delay subtask 

AVTREADN 4 X'08' Specifies that the 

PEADY macro expansion 
has been executed - set 
by the BEADY macro 
expansion; checked by 
the Open routines 

AVTCLOSN 5 X'04« Close down indicator: 

- closedown not requested 



934 



Offset 



Name 



Bytes Description 



1051 (MB) AVTEIT2 



AVTQUCKN 6 X'02' 

AVTDISKN 7 X'01' 

1 Flaq tits 
Bit definitions: 
Name Bit Value 
AVTRUFTN *X'80 f 



AVTRUF X'7F* 
Off 



AVTREOSN 1 X'40« 



AVTREUSF 1 X»BF» 
Off 



AVTCOPY-N 2 X*20' 



3 X'10' 



1 - closedown requested 

Type of closedown: 

- Flush closedown 

1 - Quick closedown 

Specifies that none of 
the messaqe queues data 
sets are disk queued 



Description 

Reusability first time 
switch - set by Destination 
Assiqnment; checked by CPB 
Cleanup; turned off by 
Reusability-Copy 

Mask for the "Reusability 
first time" switch turned 
off by Reusability 

Specifies that Reusability 
is runninq - set by 
Reusability; checked by 
CPB Cleanup 

Mask to specify that Reusability 
is not runninq - turned off 
by Reusability 

Specifies that the Reusability- 
Copy function is requestinq control 

Specifies that TOPMSG=NO is set 
in the INTRO macro 



AVTSTRTN U X*08' Eestart is in proqress 



AVTSTRTF 4 X , F7' 
Off 

AVTOPEIN 5. X«04' 

6,7 X'03« 



6 X'02 



7 X»01 



All 
off 



Mask to specify that restart 
is net in proqress 

Initial load done indicator 

Specifies the line type as 
nonswitched Start/Stop only 
set by the Activate routine 
or the Linp End Appendaqe 

Specifies the line type as 
Start/Stop, switched or 
nonswitched - set by the 
Activate routine or the 
line End Appendaqe 

Specifies the line type as 
binary synchronous - set 
by the Activate routine 
Line End Appendaqe 

Specifies the line type as both 
BSC and Start/Stop, switched 
and nonswitched, all possible 
line combinations - set by 
the Activate routine or tine 
End Appendaqe 

Data Area Layouts 
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Offset 'Name 
1052 (*nc) AVTBTT3 



P.Y±e.s Description 

1 Flaq tits 
Bit Definitions: 
Name Bit Value 
AVTSTAN 7 X" 01 f 



AVTSTACN 



X'02« 



AVTSTAWN 6, X»FD» 
Off 



AVTSTATN 



X'OU 1 



AVTSTAYN 



X'08» 



AVTOI.TEN 



XMO* 



AVTTSAE 



X»20« 



AVTRFULN 



X f U0' 



Description 

Specifies that either a Cold 
or Warm restart is to perform 
followinq a normal quick close 
or a flush close - set by 
STARTTJP=C or STARTUP=W operand 
of the INTRO macro 

Specifies that a Cold start is 
to be performed following a 
normal quick or a flush close 
and that a Continuation Restart 
is to be performed followinq 
system failure - set by the 
STARTUP=C operand of the INTRO 
macro 

Mask to specif y '-that a warm restart 
is to be performed followinq 
a normal quick or a flush 
Close and that a Continuation 
Restart is to be performed 
following system failure - set 
by the START0P=W operand of 
the INTBO macro 

Specifies that the status of 
each invitation list is to be 
included in the checkpoint 
record - set by the STARTUP*! 
operand of the INTRO macro 

Specifies that no Continuation 
Restart is to be performed 
followinq a normal quick close, 
a flush clcse, or system 
failure - set by the STARTDP=Y 
operand of the INTRO macro 

Specifies that the maximum size 
in the 01TEST=keyword operand in 
the INTRO macro (the maximum 
number of on-line tests that 
can be performed) has been 
reached -<• set, checked, and 
reset by TOTE 

Specifies that TSO has 
abended - set by the 
Time Sharinq Abend 
module; checked by 
the TSINPUT and 
TSOUTPOT routines; reset 
by the Start Time 
Sharinq routine 

Reusable disk zone 
full - set by 
^"sability 



936 



Offset 



flame 



Bytes 



AVTFTUI? 0,2, X'B¥« 
3 

off 



AVTRECVN 



1053 (41D1 



AiVTCKRST 



1054 (41E) 



AVTDSKCT 



X'80» 



Mask to specify that 
reusable disk is ready 
to receive - checked 
by Receive Scheduler 
and line End Appendaqe; 
turned off by Reusability 

Main storaqe queue is 
full - set by Destination 
Scheduler when the number 
of main storaqe queue 
units > or = the number 
specified in the MSMAX 
operand of the TNTRQ 
macro; turned off by 
Disk I/O; checked by the 
Receive Scheduler and 
Line End Appendaqe 



Specifies; which checkpoint rpcorfl the 

TCAM restart facility should use in 
attemptinq to restructure the MCP 
environment as it existed at the 
time of closedown or system failure - 
set by the BESTART=inteqer operand of 
the INTRO macro 

Specifies the number of 
buffers on CPEs 



******************************************* 

This is the end of the basic AVT when 

ENVIBCN=TSO 

*** ******* * * **** *************************** 



10 56 (4201 
1060 (424) 



1064 (428) 



AVTMH02 
AVTCMTN 



AVTCMAX 



Address of the Destination Scheduler 

Specifies the percentaqe of the number 

of units in the messaqe queues data 

below which the data set is not crowded *» set 

by the MSMIN=inteqer operand of the INTRO 

macro 

Specifies the percentaqe of the 
number of units in the messaqe 
queues data set above which the data 
set is nearly full - set by the 
MSMAX=inteqer operand of the INTRO 
macro 



1068 (42C) 



AVTTCTNC 



Number of records in the entire 
messaqe queues data set - set 
by the MS*JNITS=inteqer operand 
of the INTRO macro 



10*72 (430) 



AV1NCPBQ 



Queue of buffers and ERBs waitinq 
to be processed 



******************************************** 

This is the end of the AVT when 
main storaqe aueuinq only is specified 
(DTSK=NO, ENVIRON=TCAM or MIXED) 
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Of fgf t JJjLSJ 

1080 (438) AVTFL 

108U (43C) AVTIA 

1088 (440) AVTCOPY 

1092 (444) ftVTPKAPQ 

1100 (44C) AVTDKENQ 

110R (454) AVTNOBFQ 

1116 (45C) AVTBEUSQ 

1124 (464) AVTINCPQ 

1132 (46C) AVTFCPB 

1136 (470) AVTCPPPT 



1140 (474) AVTIOFB 



1144 (478) AVTTOBN 



1148 (47C) AVTLOBPT 



Bytes 
4 



^he next 6-word area is initiated by 
*isk messaqe queues data set for use 
"IBBCCHF* Converter routine. 



Address of the Disk EXCP 
Driver routine 

Address of the BEDS part of the 
Heusability-Copy subtask 

Address of the Copy subtask 
QCB 

Queue of the CPBs to be processed 
by CPB Cleanup (disabled) 

Queue of CPBs to be processed 
by CPB Cleanup (enabled) 

Queue of CPBs without 
fcuffers - used by CPE 
Cleanup 

Queue of CPBs beinq returned 
to the Beusability-Copy subtask 
by CPE Cleanup 

Queue of CPBs requestinq that 
I/O be done by EXCP Driver 

Queue of inactive CPBs - the 
cpb free pool 

Address of the CPE free pool 
to be freed by the Disk 
Close routine - AVTFCPB is 
initially set to this same 
value 

Address of a series of TOBs, 
one for each extent of the 
reusable disk queue 

Address of a list of IOEs, 
one for each extent of the 
nonreusable disk queue 

Absolute disk record number that 
indicates when the BEOS part of 
the Beusability-Copy subtask 
is to activated - the initial 
value is 3/8 of the total 
number of records on the 
reusable disk messaqe queues 
data set 

the OPEN for the reusable 
by the Becord Number to 



1152 (480) 



1156 (484) 



1160 (488) 



AVTADFBB 



RVTNOVOB 



AVTBCTBF 



Address of the DEBECEA field 
in the DIB for the reusable 
disk messaqe queues data set 

Number of extents in the reusable 
disk vessaqe queues data set 

Number of records per track on the 
reusable disk messaqe queues, 
data set 
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Offset 



Name 



1164 (48C) AVTTRCYR 



1168 (490) AVTTOTNR 



Number of tracks per cylinder 
on t-he reusable disk messaqe 
queues data set 

Number of records in the entire 
reusable disk messaqe queues data 
set 



1172 (494) AVTVOLRR 



Product of the number of extents 
times the number of records 
per track on the reusable 
disk messaqe queues data 
set 



The next 7-word area is initialized by the CPEN for the non- 
reusable disk messaqe queues data set for use by the Record 
Number of MBBCCHHP Converter routine. 



1176 (498) AV'TADEBN 



Address of the DEBECEA 
field in the EEB-for the 
nonreusable disk messaqe 
queues data set 



1180 (49C) AV1N0V0N 



1184 (4A0) AVTRCTRN 4 



1188 (4A4) AVTTRCYN 



1192 (4A8) AVTTOTNN 



1196 (4AC) AVTVOLRN 



1200 (4F0) AVTHFESN 4 



Number of extents in the 
nonreusable disk messaqe 
queues data set 

Number of records per track 
on the nonreusable disk 
messaqe queues data set 

Number of tracks per cylinder 
on the nonreusable disk messaqe 
queues data set 

Number of records in the 
entire nonreusable disk 
messaqe queues data set 

Product of the number of 
extents times the number 

of records per track on 
the nonreusable disk 
messaqe queues data set 

The absolute record number 
that is the threshold tc 
cause closedown due to the 
fillincj cf the nonreusable 
disk messaqe queues daia 
set 



1204 (4B4) AVTNAPDR 



Nonreusable disk relative 
record number - next avail- 
able location 



1208 (4B8) AVTFADDF 



Reusable disk relative record 
number - next available 
location 



1212 (4*C) AVTHRESE 12 



Nonreusable threshold 
closedown element 



1223 (4C7) AVTHFESS 1 



Completion code - used to 
indicate status 
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Qffset flame R.ytes 

X'FF' - an unused element 
X'FO' - the element has been 

tposted 
X»00',X'04' - Closedown 
indication 

1224 (4C8) AVTCPBNO 2 Specifies the value coded 

in the CPB=inteqer operand 
of the INTRO macro 



TERMINAL TSELE 

m he Terminal Table (TEDQTRM) is a variable lenqth table that contains blocks of device-' 
dependent information about each terminal in the TCAM system; each such block is called a 
terminal entry. There are six types of terminal entries (shown below), each of which is 
used for a different type or qroup of terminals dependinq upon the configuration of the 

+ elet)rocessinq system. 

The Terminal Table entries are assembled and initialized accordinq to the 
specifications of the TERMINAL, TLIST, TPROCESS,, TTAEIE, LOGTYPE, and OPTION macro 
instructions. The size, structure, and contents of the Terminal Table are based en the 
information provided by the user in the above-listed macros. Each entry in the Terminal 
'"able beains on a fullword boundary. The terminal entries are located throuqh the address 
portion of the entries in the Termname Table. 

Tf the user codes an OPTION macro, three fields in the Terminal Table entry are 
initialized and bit 6 in the TRMSTATE field is set to 1. The TRMOPNO field contains the 
number of option fields specified for the entry. The option offsets are positional in 
nature, and the number of offsets is equal to all the offsets up to and includinq the last 
option specified by the user. The next field, TRMOPTBI, contains the offset to the 
beqinnino. of the Option Table data for this terminal entry. The third field, TRMOFT, is 
the first of the actual option offsets to the Option Table data, the beqinninq of which is 
pointed to by the TRMOPTBI, field. Each option offset is a one-byte index to the 
correspondinq Option Table data. There is an option offset for each possible option up to 
and including the last option specified for this terminal entry. If a particular option 
within that span is omitted, that option offset field' is initialized to X'FF*. 

The device dependent fields of an entry in the Terminal Table are used to indicate 
such information as the dial diqits or addressinq characters of the terminal. The 
specific type of information in these fields is noted in the two bytes of the device 
dependent field flaas field (TRMDEVFL) of the Terminal Table. The actual entries in the 
device dependent fields consist of one byte, which contains the lenqth of the entry, 
followed by the actual information. The location of the device dependent field is 
indicated by the bit settinqs in the first byte of the Terminal Table, If bit six 
(TRMOPTFN) in the status byte (TRMSTATE) is off, the device dependent field is located at 
+ 17 (X'11') in the table. If bit six is on, indicating that there are option offset 
fields in the table, the device dependent field starts at location 20 (X'14'j plus the 
value in the number cf option offsets field (TRMOPNO). Each option of fset is one byte 
lonq, and the first option offset is located at offset 20 in a terminal entry; the device 
dependent field starts immediately after the last option offset. 

The fiqures below show the formats of the various types of terminal entries; 
descriptions of the fields follow the illustrations. 



940 



IEDQTRM 










0(0) 


TRMSTATE 

Status Byte 


1 (1) 

TRMDESTQ 

Destination QCB Address 


4(4) 


TRMALNCT 

Automatic Line Number Count 


TRMINSEQ ] 6 (6) TRMOUTSQ 

Input Sequence Number I Output Sequence Number 

TLSTCNT TLISTEN 

TLIST Count of Entries First TLIST Entry Address 


8(8) 


TRMALTD 

Alternate Destination Termname Table Offset 


10(A) 

TRMDEVFL 

Device Dependent Field Flags 


12(C) 


TRMSTAT 

Error Statistics 

TRMSIO 
Start I/O Count 


14(E) 

TRMTEMPR 
Temporary Error Count 


15 < F > TRMSENSE 
Intensive Mode 
Recording Indicator 


16(10) 


TRMCHCIN 

DCT Index 


17(11) 

TRMOPNO 

Option Field Count 


18(12) 

TRMOPTBL 

Option Table Offset 


20 (14) 




TRIUI 


opt 





T 



Start of Option Offsets 



J 



offset 
(01 



Name 


Bytes 


Description 




TPMSTATE 


1 


Status byte 


- the bit 






definitions 


are as follows: 




Name 


Bits Value 


.fie an in a 






0*2 


E»000» 

E'OO.V 
B»010« 

BMOO' 

B'10V 


Type of entry 

Terminal, single, 

or qroup 

Process 

Cascade 

list 

line 

Loq 






3 




Beserved 




TFHACPTN 


a 


X«08» 


Terminal can accept an 
entry for processing 




TEMHELDH 


5 


X«04» 


Terminal is held or a 
process entry specified 
SYNC=YES 




TBM0PTEN 


6 


X'02' 


Option fields are used 




TBMSCN7.N 


7 


X«01» 


Control Terminal 
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Offset 
1 (D 



17 (11) 

18 (12) 
20 (14) 



Name 
TFMDESTQ 



TRMOPNO 

TFMOPTBL. 
TFMOPT 



Bytes 
3 



4 


(4) 


TPHINSEQ 


2 


4 


(4) 


TLISTCNT 


2 


6 


(61 


TFMOOTSO 


2 


6 


(61 


TLISTEN 


2 


8 


(8) 


TRMALTD 


2 





(A) 


TRMDEVFL 


2 



12 


(C) 


TPNSTAT 




12 


(C) 


TPMSIO 


2 


14 


(E) 


TPffTEMFR 


1 


15 


(F) 


TPMSENSE 


1 


16 


(10) 


TPMCHCIN 


1 



Description 

Address of the Destination QCB for 
the entry or of the distribution 
or cascade entry QCE. 

Input sequence number 

Count of entries in a TLIST 

Output sequence number 

First entry in a TLIST 

Termname Table offset of the 
alternate destination 

Device dependent field flaqs 
to indicate which fields are 
present 

Bits Va lu e Weaning 




1 
2 

3 
4 

5 

6 

7 
5-15 



X'8000« BDFSIZF specified 
X»4000' Dial digits present 
X'2000' Addressing characters 

present 
X'1000 1 BLOCK specified 
X»0800' SDPBLOCK specified 
X'0400' Transparent b,lock 

lenqth specified 
X'0200' EFDELAY specified 

X f 0100' Time Sharing field 
Peserved 



Error statistics 

Number of STAET I/O instructions 

Number of temporary errors 

Intensive mode recordinq 
indicator 

Index to the Device 
Characteristics Table 
for this entry 

Number of option fields 
for this entry 

Offset to the option table for this entry 

Start of option offsets 
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TERMINAL TABLE ENTRY TYPE 



Single 

and 

Line 



Offset 




10(A) 



12(C) 14(E) 



15(F) 



16(10) 



17 (11) 



18 (12) 



20(14) 



20 + n 



Status 


Destination 


Input 


Output 


Alternate 


Device 


Number 


Number 


Intensive 


DCT 


Number 


Option 


Start of 


Start of 


byte 


QCB address 


sequence 


sequence 


destination 


dependent 


start 


temporary 


mode 


index 


option 


Table 


option 


device 






number 


number 


offset 


field 
flags 


l/Os 


errors 


recording 
indicator 




offsets 


offset 


offsets 


dependent 
fields. 


TRMSTATE 


TRMDESTQ 


TRMINSEQ 


TRMOUTSQ 


TRMALTD 


TRMDEVFL 


TRMSIO 


TRMTEMPR 


TRMSENSE 


TRMCHCIN 


TRMOPNO 


TRMOPTBL 


TRMOPT 





Group 



Offset 




10 (A) 



12(C) 14(E) 



15(F) 



16(10) 



17(11) 18 (T2) 



20 (14) 



20 + n 



Status 


Destination 


Unused 


Output 


Alternate 


Device 


Number 


Number 


Intensive 


DCT 


Number 


Option 


Start of 


Start of 


byte 


QCB address 


X'0000' 


sequence 


destination 


dependent 


start 


temporary 


mode 


index 


option 


Table 


option 


device 








number 


offset 


field 
flags 


l/Os 


errors 


recording 
indicator 




offsets 


offset 


offsets 


dependent 
fields 


TRMSTATE 


TRMDESTQ 




TRMOUTSQ 


TRMALTD 


TRMDEVFL 


TRMSIO 


TRMTEMPR 


TRMSENSE 


TRMCHCIN 


TRMOPNO 


TRMOPTBL 


TRMOPT 





Offset 
Distribution q -| 



Cascade 



Status 


Distribution 


Number 


Offset to 


byte 


List QCB 


entries 


the first 




address 


in the 


entry in 






list 


the list 


TRMSTATE 


TRMDESTQ 


TLISTCNT 


TLISTEN 


Offset 











1 


4 


6 


Status 


Cascade 


Number 


Offset to 


byte 


list QCB 


entries 


the first 




address 


in the 


entry in 






list 


the list 


TRMSTATE 


TRMDESTQ 


TLISTCNT 


TLISTEN 



Process 



Offset 





10(A) 



12 (C) 



16 (10) 



17(11) 18(12) 



20 (14) 



Status 


Process 


Input 


Output 


Alternate 


Device 


Process 


Work unit 


Number 


Option 


Start of 


byte 


QCB address 


sequence 


sequence 


destination 


dependent 


Entry 


record 


option 


Table 


option 






number 


number 


offset 


field 
flags 


Work Area 
address 


delimiter 
character 


offsets 


offset 


offsets 


TRMSTATE 


TRMDESTQ 


TRMINSEQ 


TRMOUTSQ 


TRMALTD 


TRMDEVFL 


TRMSTAT 


TRMCHCIN 


TRMOPNO 


TRMOPTBL 


TRMOPT 



Logtype 



Offset 




10 (A) 



12(C) 14(E) 



15(F) 



16 (10) 



17(11) 18(12) 



Status 


Destination 


Unused 


Unused 


Unused 


Device 


Unused 


Unused 


Unused 


Unused 


Unused 


Buffer 


byte 


QCB address 


X'0000' 


X'0000' 


X'0000' 


dependent 

field 

flags 


X'0000' 


X'00' 


X'00' 


X'00' 


X'00' 


size (2 bytes) 


TRMSTATE 


TRMDESTQ 








TRMDEVFL 
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T^BMNAMF TABLE 

The Termanme Table has an entry that contains the name and terminal entry address for each 
terminal, terminal component, application proqram, list of terminals, and logginq media in 
the TCAM system. These entries are qenerated at assembly time from the- TEFMINAL macros in 
the order in which the macros are coded. At MCP initialization time t:he entries are 
sorted into collating sequence. 

The first 82 bytes of the Termname Table contain the Termname Table code (IEDQTNT) and 
control information. The code can be executed as a subroutine by other TCAM modules. The 
control information identifies the attributes of the table. 

The address of the Termname Table is in the AVTRNMPT field of the AVT» However, the 
individual Termname Table entries are referenced by the relative position offsets that 
precede the control data in each invitation list. When a TCAH module needs to find a 
specific entry in the Terminal Table, the module activates the Termname Table code, which 
translates the invitation list relative position offset to the address of the 
correspondinq Terminal Table entry. 



IEDQTNTD 



0(0) 



TNTCODE 

Enabled Termname Table Code 



38 (26) 



TNTSRCHX 

Search Extent 



40 (28) 



TNTENLEN 

Length of a Name 



41 (29) 



TNTMIDEN 

Middle Entry Address 



44 (2C) 



TIMTLEN 

Count of Table Entries 



46 (2E) 



TNTDCODE 

Disabled Termname Table Code 



82 (52) 



TNTFIRST 

Start of Table Entries 



I 



Format of a Termname Table Entry: 




^— 3 Bytes < 
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o ffse t 
(0) 



38 (26) 

40 (28) 

41 (29) 

44 (2C) 

46 (2E) 

82 (52) 



Jaje 
TNTCODE 

TNTSRCHX 

TNTENLEN 
TNTMIDETJ 

TNTLEN 

TUTDCODE 
TNTFIFST 




36 



Enabled Termanme Table 
code (TEDQTNT) to convert 
the relative offset to a 
Terminal Table address 

Binary search extent - used 
by the Binary Search routine 
(IEDQA1) 

length in bytes of the name 
field of an entry 

Address of the middle entry 
in the Termname Table - used 
by the Binary Search routine 
(TEDQA1) 

Total number of entries in 
the Termname Table 

Disabled Termname Table code 

The beginning of the Term- 
name Table entries 



OPTION TRELE 

The Option Ta 
by the user 
assembly time 
the order in 
by the macro 
fields of a 
the Option Ch 
in the Opti 
section.') 



ble (IEDQOPT) is a variable length table that contains the actual data coded 

in the TERMINAL and TPEOCESS macros in the message control program* At 

, this data is placed in the table with the the necessary byte alignment in 

which it is coded. An option data field, which is not directly identifiable 
in which.it is coded, can be referred to only through the- option offset 

terminal entry. If only the user-coded name for a macro is known, TCAM uses 
aracteristics Table and the terminal entry to refer to a specific data field 
on Table. (See the discussion of the Option Characteristics Table in this 



At assembly time the address cf the Option Table is placed in the AVTOPTPT field of 
the AVT. The first two words of the Opticn Table contain the address of the end of the 
Option Table and the address of the Option Characteristics Table, respectively. The 
option data immediately follows these two words. The figure below is the general format 
of the Option Table; descriptions cf the fields follow the illustration 



IEDQOPT 



0(0) 



Address of the End of the Option Table 



4(4) 



8(8) 



Address of the Option Characteristics Table 



Option Data 



7 + n 



Length 
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Offset 
(0) 

* IV) 



Name 



7+n 



Byte s 
4 



Option data n 



lenqth 



The address of the first byte (7*n) 
followinq the Option Table 

The address of the first byte of 
the Option Characteristics Table 

(IEDQCPTN) 

The actual data coded by the 
user with the necessary byte 
aliqnment, in the order in which 
the data is ceded 

The lenqth of the option data 
for the terminal or process entry 
that has the lonqest option data 



OPTION CHARACTERISTICS TABLE 

The Option Characteristics Table (TEDQOPTN) is a variable lenqth table that contains one 
entry for each OPTION macro issued in the messaqe control proqram (MCP) .. The relative 
position of an entry in the table directly corresponds to the relative position of an 
option offset in a Terminal Table entry. The option offset is an index to the actual 
Ot>tion ^able data for the option entry in the Option Characteristics Table. The Option 
Characteristics Table allows TCAM routines to use. the assembled name for an CF.TION macro 
to locate the Option Table data for a specific station (terminal) . 

Each entry in the Ootion Characteristics Tahle contains the lenqth of the 
correspondinq Option Table entry, the type of option field specified, and the user- 
soecified name of the OPTION macro. The lenoth of the table is variable and consists of 
ten bytes for each OPTION macro issued plus one byte (X'EE») to indicate the end of the 
table, storaqe is allocated and the table is initialized at assembly time. The AVT field 
AVTOPTPT contains the address of the Option Table, and the second word of the Option Table 
contains the address of the Option Characteristics Table. 



The fiqure below is the format of an entry in 
descriptions of the fields follow the illustration. 



the Cption Characteristics Table; 



Offset 



+1 



Length 


Type 


Name 



Offset 
(01 



Na me 
lenqth 



1 (D 



type 



Bytes Description 

1 The lenqth of the correspondinq 
Opticn Table entry, which is 
equal to the number of bytes of 
data specified by the TPROCESS 
and TIFMINAI macros plus any 
necessary aliqnment bytes 

1 The type of option field, indicated 
by one of the followinq bit con- 
f iqurations: 

Hex Code Type o f constant Machine Format 

Character 



00 
01 

uo 



Decimal 
Decimal 



8-bit code for 
each character 
Zoned decimal format 
Packed decimal format 
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Offset 



Same 



P_ytes 



Description 



2 (2) 



name 



81 

80 

DO 
C8 



T? f, 



T?i| 



*2 



Floatinq-Poxnt 

■""loatinq-Point 

Address 
Address 



C4 


c; 


Address 


C2 


Y 


Address 


C1 


A 


Address 


PQ 


F 


^ixed-^oint 



"^ixed-Point 

Hexadecimal 
Binary 



Lonq floating-point 

format; normally a 

doubleword 

Short floatinq-point 

format; normally a 

fullword 

Space reserved for 

a dummy section offset 

Space reserved for 

external symbol 

addresses; each 

address normally 

a fullword 

Ease register and 

displacement value; 

a halfword 

Value cf address; 

normally a halfword 

Value of address; 

normally a fullword 

Siqned, fixed-point 

binary format; normally 

a halfword 

Siqned, fixed-point 

binary format; normally 

a halfword 

1-bit code for 

each hexadecimal diqit 

Binary format 



The name of the option field -<■ this 
is the actual name the user codes in 
the name field of the OPTION macro 



DEVICE CHARACTERISTICS TABLE 

The Device Characteristics ^able (DCT) is a variable length table that contains one four- 
byte entry for each type of terminal or station defined in the TCAM system. At assembly 
time, each entry is allocated and initialized to describe the characteristics of the 
particular type of terminal or qroup of terminals; one entry is generated for all 

terminals that have identical characteristics. 

The address of the Device Characteristics Table is assembled in the AVTCSTCS field of 
the Address Vector Table. The one-byte index (TRMCHCIN) in a terminal entry in the 
Terminal Table provides the offset to the specific Device Characteristics Table entry for 
a station. 

Bits are set in the DCT entry to indicate the type of station. Combinations of these 
bit settings may be coded where applicable, The specific values for a DCT entry are 
outlined below. 



o-f *set 


Name 


.Value 


(0) 






1 (1) 


CTNHTPTT 


X«80« 




CBREfi^ 


X'40» 




CATTEN 


X'20' 


2 (2) 


CPTSYNC 


X'80» 



Description 

Reserved 

Terminal can use Read 
Inhibit CCWs 

Terminal has the Reverse 
Break feature 

Terminal has the 
Attention feature 

BSC station 
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Offset 


flame 


Bytes 




ctwy 


X'20' 




CSTNCTL 


XM0« 




CX*!TTCTL 


x'08« 




CCONTFN'V 


X'OU' 




CICCAL 


X'02' 




CAUDTO 


X'01' 


3 (3) 


CWTfR 


X'HO' 




CEflDCTL 


X'20« 




CCHECK 


XM0» 




CCCWTIN 


X'OU' 




CNOTDT.-PS 


y«02' 



Description 

TWX 3335 terminal 

terminal has the Station 
Control feature 

Terminal has the Transmit 
Control feature 

Contention device 

local device 

Audio device 

World Trade Teleqraph 

Terminal has end-to-end 
controls (2780) 
Teririnal has the Checkinq 
feature 

Terminal is capable of a 
Continue operation 

Terminal has no idles 
defined 



C2760 X'01' 2760 



SPECIAL CHAF.ACTEFS TABLE 

A Special Characters Table (SCT) is a variatle lenqth table that consists of entries 
qivinq the special characters required for device I/O for a line qroup. There is one- SCT 
for each type of line qroup in the TCAM system,, Each SCT contains a list of the 
characters that the associated-terminal or line qrcup recoqnizes. SYS1.SVCLIB contains a 
Special Characters Table for each line qrcup in the system* The various SCTs are 
initialized at SYSGE.N : time, and at open time the TCAM Line Group Open routine uses 
information from the'DCB and the terminal entry to load the appropriate Special Characters 
Table. 

An SCT is located by a three-byte address in the DCBSCTAD field of the DCB for the 
line qroup. The address of the DCB for the line qroup is in the LCBDCBPT field of the 
associated LCB. 

An SCT is used to build channel proqrams. This table is also used by the error 
recovery procedures to retry certain text errors, and by the messaqe handlinq routines to 
initiate on-line test procedures and to determine the messaqe format for line control 

insertion. 

The first 28 f bytes of an SCT comprise a fixed-lenqth directory of one-byte offsets, 
each of which when added to the SCT pointer in the DCB points to a one-byte lenqth field. 
This lenqth field is followed by a special characters entry of the length specified in the 
lenqth field. There are as many entries in the directory as there are different sets of 
special characters required by the line qroup. If a function is not defined for the 
associated terminal or line qroup, the offset field in the directory contains a X'00 1 
value. 
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The following is a list of the specific types of characters that each of the offsets in 
the first 28 tytes of a SCT represent. 

Specia l Characters 

EOT sequence 

EOS sequence 

PAD characters 

Idle or reserve characters 

Fven ACK 

caa ack 

NAK 

ENO (inquiry) 

EOE/ETE (for BSC T>IE STB) 



Special Characters 

ELE ETX (ESC) 

DIE STX (BSC transparent sequence) 

DIE/STX/ENQ (ESC transparent temporary text delay-TTD) 

SOH (BSC - start of header character) 

Cn-line Test sequence 

WACK (BSC) 

BVI (BSC reverse interrupt) 

ELE EOT (BSC aial sequence) 

EIE ENO (ESC - use in abort sequence) 

EOE sequence (used by IEDQAK and IEDCA6 
to insert line control characters') 

ITB sequence (used by IEDQAK and IED0A6 to insert 
line control characters) 

EOT sequence (used by IEDQAK and IEDQA6 to insert 
line control characters) 

ECT sequence (used by IGG019E0) 

EOE sequence (used by IGGC19B0) 

ETX sequence (ESC only) 

ENQ sequence (BSC cnly) 

SOH *' S sequence (BSC cnly) 

SOH •? 00 sequence (BSC on-line test sequence) 

SOH ^/CANCEL/ sequence (BSC on-line test cancel sequence) 



Offset 







(0) 


1 


(1) 


2 


(2) 


3 


(3) 


H 


CD 


5 


(5) 


6 


(6) 


7 


C) 


8 


(8) 


Offset 




9 


(9) 


10 


(A) 


11 


(B) 


1? 


(C) 


13 


(D) 


m 


(E) 


15 


(F) 


16 


(101 


17 


(11) 


18 


(12) 



19 



20 



21 


(15) 


22 


(16) 


23 


(17) 


24 


(18) 


25 


(19) 


26 


(1A) 


27 


(1B) 



13) 



i«n 
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PESOUBCE CONTFC1 ELOCK 

"he Resource Control Block (IEDQBECB) is a twc-word prefix to an element that allows the 
TCRM Dispatcher to determine the disposition of an element and to determine the GCE to 
which an. element will be tposted. Each element in the TCAM system is represented ty a 
Resource Control Elock. The first word of the BCB is a pointer to the QCB with which the 
element is associated; the second word is a link field which, when the element is on a 
chain, points to the next item on the chain. The first word in the associated QCB may 
point to the FCB. 

Storaae is allocated for the FCB at open time for the line qroup or for the 
application prcqram. The FCB is initialized at open time and is modified when elements 
are passed in the system. 

Below is the format of a Resource Contrcl Block; descriptions of the fields follow the 
illustration. 

IEDQRECB 



0(0) 

RECBKEY 

Key Field 


1 (1) 

RECBQCBA 

QCB Address 


4(4) 

RECBPRI 

Priority 


5(5) 

RECBLINK 

Link Field 



2lfset 


flame 


Bytes 


(0) 


FECEKEY 


1 


1 (1) 


BECEOCEA 


3 


4 iH) 


EECBPFI 


1 


5 (5) 


PECBLTNK 


3 



Descri ption 

Key field 

Address of the QCB to which this F.CB 
is tposted 

Priority of this F.CE 

Address of the next ECB in the chain 
in which this RCB is currently located 



0UETTE C0NTF0L EICCK 

A Queue Control Block (QCB) is used to requlate the sequential use of elements amonq 
requestinq tasks. Every queue, or item, that is waitinq for service in the system is 
associated with a QCB. There is a master Destination QCE for every destination message 
queue. There is another type of Queue Control Block, called a priority QCE, for each 
priority level applicable for each Destination QCB. The first priority QCE beqins at a 
displacement of UC CX'2'8 1 ) from the beqinninq of the Destination QCB. 



Note: There is no priority QCB for a ISO dedicated line, 
displacement UO (X'28«). 



The QCB is truncated at the 



A QCB has three primary fields: a pointer to the element chain, a link address, and 
a pointer to the STCB chain. The element chain consists of any elements, other than the 
requestinq resource on the ready queue, that the subtask represented by the STCE chain 
miqht need to process. The link field is used to point to another item when a QCB is on 
a hiqher queue. The STCB chain consists of pointers to the routines that are associated 
with the QCE. 

The address of the Destination QCE is in the TRKDESTQ field of the Terminal Table 
entry which is, in turn, pointed to b^ the Termname Table entry. The address of the 
Termname Table is in the AVTBNMPT field of the Address Vector Table. The 1CESCEDA field 
of the Line Control Block points to the Station Control Block. Within an SCB is a pointer 
(SCBDESTO) to the Queue Control Block. 



Storaqe is allocated for the QCB at assembly time, 
at assembly time and partially at open time. 



The QCB is initialized partially 



The fiqures below are the formats of the master Destination Queue Control 
the priority CCE; descriptions of the fields follow the illustrations. 



Block and 
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Master Queue Control Block OSECT 


: IEDQQCB 








0(0) 

QCBDSFLG 

Flag Byte 


1 (1) 

QCBELCHIM 

Element Chain 


4(4) 

QCBPRI 

Priority 


5(5) 

QCBLINK 

Pointer to the Next STCB in a Chain 


8 (8) QCBSTVTO 

Index to the Entry in the 
Subtask Vector Table 


9 QCBSTCHN 

STCB Chain 


12(C) 

QCBSTPRI 

Priority of the STCB 


13(D) 

QCBSLINK 

Pointer to the Next STCB in a Chain 


16(10) 

QCBEOLDT 

Interrupt Time 


18 (12) QCBRETCT 

TSO Retry Counters 

QCBLKRLN "" 

Lock Relative Line Number 


19(13) 

QCBSTAT 

Status of this QCB 


20(14) 

QCBSCBOF 

Offset to the Proper SCB 


21 (15) QCBINSRC 

Chain of Source LCBs Currently Sending Initiate Mode Msgs 


QCBSATCT 

Sim ATTN Output Line Count 


22(16) QCBTSOF2 

Second TSO Flag Byte 


23(17) QCBTSOF1 

First TSO Flag Byte 


24 (18) 

QCBINTVL 

Interval for Poll Delay 


26 (1A) 

QCBMSGCT 

Count of Messages in this Queue 


28 (1C) 

QCBPREN 

Address of Terminal Table Entry if QCB for a Process Entry 




QCBPRLVL 

Highest Priority 
Level Message 


29 (1D) QCBLKRRIM 

Lock Relative Line Number 


QCBCARCT 

Carriage Position Count 


30(1E) QCBTJ.D 

TSO Job Identification 


32 (20) 

QCBRELLN 

Relative Line Number 


33(21) 

QCBDCBAD 

Address of the DCB 


36 (24) 

QCB FLAG 

QCB Status Bits 


37 (25) 

QCBQBACK 

QBACK Message Chain 
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Priority Queue Control Block DSECT: IEDPQCB 






40 (28) 

QCBDNHDR 

Disk Record Number to Put the Next Header Received 


43 (2B) qcbFHDLZ 

Disk Rec. No. of First Header 
on Queue Placed on Last Zone 


Continued 


46 (2E) QCBFHDTZ 

Disk Record Number of First Header 
Placed in the Current Zone 


Continued 


49(31) 

QCBINTFF 

Disk Record Number of the First Intercepted Msg — FEFO Order 


52 (34) 

QCBINTLF 

Disk Record Number of Last Intercepted Message — FEFO Order 


55 (37) QCBFFEFO 
Disk Red. No. of First FEFO 
Message or Core Red. No. 


Continued 


58 (3A) QCBLFEFO 

Disk Red. No. of Last FEFO Msg 
Core Red. No. if Core — Only Queue 


Continued 


61 (3D) 

QCBCFHDR 

Core Record No. of First Header Appearing in this Queue 


64(40) QCBPRIPQ 

Priority of this Priority 
Level QCB 


65(41) 

QCBCPVHD 

Core Address of Last Address Placed on this Queue 
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The following is for the master QCE: 

Offset Name Eytes Description 



(0) 



QCEDSFLG 



"Plaqs that indicate a specific Destination 

QCB to the Dispatcher and which messaqe 

queues data set is to receive the messaqes 

for the destination - bit definitions are as follows; 



1 (1) 



20 (14) 

21 (15) 

21 (15) 

22 (16) 



QCBELCHN 



CCESCROF 
CCEINSRC 

CCESATCT 
CCETSOF2 



Name 

QCBFQCB 

OCBREUS 

QCBNREUS 

OCBDTSK 

QCBCOBE 



u 


(4) 


CCEPRI 


1 


5 


(5) 


OCELINK 


3 


8 


(8) 


QCESTVTO 


1 


9 


(9) 


OCESTCHN 


3 


12 


(C) 


OCESTPBI. 


1 


13 


(D) 


OCBSLTNK 


3 


16 


(10) 


OCEFOLDT 


2 


18 


(12) 


CCEBETCT 


1 


18 


(12) 


0CE.IKF1N 


1 


19 


(13) 


QCBSTAT 





Name 

OCBEOH 

QCBTRMHO 

OCBBTJFBD 

OCBSFNC 

0CERFC1V 

OCBSCHDL 

QCBCLOCK 

OCBTIHF 

1 



Bits V alue Mean ing 

6 X'02« Indicates a QCB 
3 X'10* Indicates reusable disk queuing 
2 X'20' Indicates nonreusable disk queuing 
2,3 X'30 f Disk queues are used 

1 X'40' Flaq for main storaqe queues: 
1,3 X'50' Indicates main storaqe queues 

with backup on reusable disk 
1,2 X'60' Indicates main storaqe 
queues with backup on 
nonreusable disk 

Elemert chain pointer - contains the address 
of the QCB to be tposted when this QCE is 
removed from the time delay queue. 

Priority 

Pointer to the next STCE in a chain 

Index to an entry in the Subtask 

Vector Table 

STCE chain pointer 

Priority of the STCB 

Pointer to the next STCE in a chain 

Interrupt time 

TSO retry counters 

Lock relative line number 

Status of this QCE - bit settinqs are as follows: 

Bits Value Meaning 

X'80* End of message sent 

1 X'10' Terminal was held 

2 X'20' Buffered terminal 

3 X'10' Sending to a buffered terminal 

4 X*08' Peceiving from a buffered terminal 

5 X'04 1 Put in the, time delay queue when inactive 

6 X'02« On=Clock, off=interval 

7 X*01' Delay qreater than 12 hours 

Offset tc the proper SCE for this transmission; 
X'OO 1 unless this line has buffered terminals 

Chain of source ICBs currently sending 
initiate mode messages to this Destination 
queue 

Simulated attention output 
line count - TSO 

Second TSO flaq byte * bit settinqs are as follows: 
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Offset 



flame 



Evtes 



description 



Name 



Bits Value Weaning 



23 (17) 



24 (18) 

26 (1A) 

28 (1C) 

28 do 

29 (1D> 

?° (1D) 

30 (IS) 

32 (20) 

33 (21) 

34 (22) 



CCFTSOF1 



CCBINTVL 
QCEMSGCT 
QCEPBEN 

CCEPRLVL 
OCELKF^N 

QCECABCT 

OCETJTD 

QCERELLN 

OCBDCBAC 
OCBELAG 



QCBINHBN 





X'80' 


QCBBUEQ 

QCBPOSTO 

OCBDSSMl 

QCBSATCH 

OCBSATTI 

QCBSATIC 


1 
2 
3 

5 

6 

7 


X«40» 
X'20« 
X'10' 
X'CU' 
X»02« 

roi' 



Name 


Bits 


Value 


QCBWREF.K 





X«80» 


QCBTGET 


1 


X'40« 


QCBTPUT 


2 


X«20» 


QCBNOBUF 


3 


X'10« 


QCBSATBD 


4 


X«08' 


QCBPABTO 


5 


X»04' 


QCBDELAY 


6 


X»02« 


QCBDTSC 


7 


X'01' 



37 (25) 



CCBQBACK 



Use inhibits with this 

terminal 

TCAM buffer beinq held 

QCB tpcsted to itself 

Start MI character sent - TSO 

Simulated attention by character 

Simulated attention by time 

Simulated attention by line 



First TSC flaq byte - bit settings are as follows: 



Keaninq 

Issue a write break 

TGET request 

TPDT request 

Insufficient buffers 

Simulated attention read request 

Partial output line 

QCB in time delay queue 

User to be loqqed off 



Interval for poll delay 

Count of messages in this queue 

Address of the Terminal Table 
entry if this is a QCE for a 
process entry 

fliqhest priority level messaqe 

Lock relative line number; link 
field for the QCE when its on the 
time delay queue 

Carriaqe position count 

TSO 1ob identification 

Relative line number for the 
line this QCB represents 

Address cf the ECE 

QCB status bits - bit settinqs are as follows: 

Meaning 

TSO session in proqress 

No reverse break feature 

Bead has priority 

Reusability serviced 

Queue by terminal 1. 

Currently sendinq a EEFO messaqe 

This QCE is for a process entry 

Flaq for checkpoint 

Queue-back messaqe chain 



Name 


Bits 


Value 


OCBTSSES 





X«80» 


QCBNOEEK 


1 


X«40« 


QCBBEAD 


2 


X • 2 • 


QCBRSB.V 


3 


XM0» 


QCBTEBMQ 


4 


X'08' 


OCBSDFFO 


5 


X»04« 


QCBPP.OC 


6 


X«02» 


OCBCKPT 


7 


X*01' 



Data Area Layouts 955 



Offs et Same B y tes 

The following is for a priority QCE 
40 (28) QCPDNHDR 3 



4 3 (2B) 

46 (2F) 

4P (31) 

52 (34) 

■*5 (37) 

5 8 (3A) 

6 1 (3D) 
6 4 (40) 
65 (41) 



QCEFHDLZ 3 



QCEFHDTZ 



QCEINTFF 



QCBINTLF 



QCBFFEFO 



QCELFFFO 



QCBCFHDR 



CCEPRIPQ 1 



OCBCPVHD 



Description 



Disk record number of the first unit of 
the first buffer of the next message 

Disk record number of the first buffer* 
of the first message that was placed in 
the last disk zone for this gueue 

Disk record number of the first buffer 
of the first message that was placed 
in the current disk zone for this gueue 

Disk record number of the first held 
messaqe in FEFO order 

Disk record number of the last held 
message in FEFO order 

Disk record number of the first message to 
be received. Main storage record address 
if this is a main-storage-only gueue 

Disk record number of the lqst FEFO message 
received. Main storage record address if this is a 
main-storage-only gueue 

Main storage record address of the first 
buffer of the first message appearing in 
this gueue 

The priority of this priority level QCB. 
This is X'00» if this is the lowest 
priority level* 

Main storage record address of the last 
address placed on this gueue 



SUBTASK CONTFCI BLOCK 
r" 

The Subtask Control Flock (TFDQSTCB) is a variable length table that represents the 
routine that perform the work of the TCAM system. The purpose of an STCB is to cause a 
routine to be executed. The TCAM Dispatcher uses the STCB to determine the entry point of 
a subtask that is waiting for work. The address of the STCE is in the third word of the 
OCB. 

Storage is allocated for the STCB at various times depending upon the type of QCE 
containing the STCB address. If the OCB is a Destination OCB, storage is allocated for 
the STCB at assembly time. If the QCB is in a line Control Block or is a Bead-ahead QCB f 
storage is allocated for the STCE at open time for the line group or for the application 
program DCB. If the OCE is in the AVT, storage is allocated at assembly time. In cases 
where the OCB is a prefix to a module, storage is allocated for the STCE at assembly time. 

In the same manner, initialization of the STCE depends upon the related QCB. If the 
OCB is a Destination QCE, the STCB is initialized at assembly time but is modified at Open 
time for the DCB to which it is related. If the QCE is in the LCB oris a Read-ahead QCB, 
the STCB is initialized at open time. If the QCB is in the AVT, the STCB is initialized 
at assembly time and at link edit time. If the QCB is a prefix to a module, the STCB is 
initialized at assembly time. 
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Below is the format of a Full (eight-byte) STCE; descriptions of the fields follow the 
illustration. For formats of other types of STCBs see the discussion of the Functions of 
the ^CAM Dispatcher. 

IEDQSTCB 



0(0) 

STCBVTO 

Activation Key 


1 (D 

Reserved 


4(4) 

STCBPRI 

Priority 


5(5) 

STCBLINK 

Link Field 



Offset 


game 


Bytes 


Description 


(0) 


STCBVTO 


1 


Activation key 


1 (T) 




3 


Reserved 


1 (<*) 


STCBPBI 


1 


Priority 


5 (5) 


STCBLINK 


3 


Link address - 



STCB in this STCE chain 



ELEMENT REQUEST BIOCK 

The Element Bequest Block (EBB) is a fined-lenqth table of fourteen bytes located at a 
displacement of X'4C from the beqinninq of the Line Control Block. The function of the 
EBB is to request buffers for transmissions of data. The beginning of the Element Bequest 
Block is at a displacement of ♦ Ut* (X'2C'1 from the beqinninq of the Input/Output Elock 
within the LCB. The address of the IOB is in the DCBIOBAD field of the 'Data-' -Control' 
Block. 

Storaqe is allocated for the Element Bequest Block at open time, The EBB is 
initialized at various times dependinq upon its function, When it is being used to 
request buffers, the EBB may be- initialized by the Send Scheduler, Receive Scheduler, Get 
Scheduler, and/cr the Put Scheduler. When it is beinq used to qet recalled buffers, the 
EBB may be initialized by Buffer Disposition, EOB Check, and/or the Buffer Terminal 
Scheduler. 

The format of the Element Request Block and descriptions of the fields are included in 
the discussion cf the Line Control Block. 



LTNE COW^OI BLCCK 

^fce Line Control Block (TED0LCB1 is a 
that must be maintained on a line 
f or each line group. The LCB maintai 
proqrai, the corresponding DCB, the a 
tposted, the last serviced PCI, and 
buffer chain, the subtask chain, and 
OCB, the Line Control Elock .contains 
displacement of 6 8 (X'W), is the El 
Pt,T ' see the discussion of the Element 
a displacement cf X'20' from the begi 



fixed length table that contains the information 
or line group basis. There is one Line Control Block 
ns such information as pointers to the channel 
ddress of the QCB to which recalled buffers are to be 
the chain of waiting QCBs. The LCB also contains the 
the I/C status. When the LCB is functioning as a 

the address of the first STCB. Within the 1CB, at a 
ement Reguest Block. (For further information on the 

Beguest Block) f The I/O Block is also in the LCB at 
nning. 



To find the address of a specific LCB for a line group from a DCB, the TCAM modules 

first multiply the relative line number for this line times the value in DCBEIOBX and add 

the result to the value in DCBIOBAD. The result is the address of the IOB for this LCB, 
""he LCB begins at -X'20' from the IOB address. 

Storaqe is allocated and the Line Control Block is initialized at open time for the 

^C p for the line qroup. 

The figure below is the format of the Line Control Block; descriptions of the fields 
follow the illustration. 
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IEDQLCB 



0(0) 

LCBKEY 

Element Key of Buffer 

LCBRCB 

Resource Control Block 


1 (1) 


LCBQCBA 

Address of the QCB 




4(4) 

LCBPRI 

Priority of Buffer 


5(5) 


LCBLINK 

Link Field of Buffer 




8(8) 

LCBRSKEY 

Receive Scheduler Key 


9(9) 


LCBSTCBA 

Address of the First STCB When LCB is a QCB 




12(C) 

LCBRSPRI 

Receive Scheduler Priority 


13(D) 


LCBRSLNK 

Address of the Next Item in the Chain 




16(10) 

LCBE 

End of List 


OLTD 

Time Delay 




18(12) 

LCBTDL 

Time Delay Queue Offset 


19 (13) 

LCBTSOB 

TSO Status Bits 


20(14) 

LCBCHAIN 

Disposition Status Bits 


21 (15) 


LCBINSRC 

In-source Chain 




24 (18) 

LCBNTXT 

Save Area for PRFNTXT 


25(19) 


LCBSCBDA 

Address of the SCB Directory 

f" ~ LCBLNENT [ 
j TNT Offset to Line Entry j 




28 (1C) 

LCBISZE 

Count of Idles Reserved 


29 (1D) 


LCBFSBFR 

First Buffer Assigned to this LCB 




LCBLSBFR 

Last Buffer Assigned to this LCB 


32 (20) 

LCBFLAG1 

IOS Flags 1 


33 (21) 


LCBFLAG2 

IOS Flags 2 


34 (22) 

LCBSENS0 

Sense Byte 


35 (23) 

LCBSENS1 

Sense Byte 1 


36 (24) 

LCBECBCC 

Completion Code 


37 (25) 


LCBECBPT 

Address of the ECB 




40 (28) 

LCBFLAG3 

IOS Flags 3 


41 (29) 


LCBCSW 

Last Channel Status Word 






48 (30) 

LCBSIOCC 

SIO Condition Code 


49(31) 


LCBSTART 

Address of the Channel Program 




52(34) 




LCBDCBPT 

Address of the DCB 




56 (38) 




LCBRESTR 

Error Message Data 




LCBRCQCB 

QCB to Which to Post the Recalled Buffer 


60 (3C) 

LCBI 

I 


NCAM 
OS 




LCBTTBIN 

Index to Terminal to be Connected 

LCBERRCT 

IOS Error Counters 
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64(40) 

LCBUCBX 

UCB Index 


65(41) 


LCBRCBFR 

Pointer to the Recalled Buffer 

LCBLSPCI 

Address of the Last Serviced PCI 




68 (44) 

LCBRECOF 

Offset to the Current Block 


70 (46) LCBSTATE 
Status Bits 

LCBSTAT1 71 (47) LCBSTAT2 
First Status Byte Second Status Byte 


72 (48) 

LCBTSTSW 

Test-and-Set Switch 


73 (49) 


LCBRECAD 

Address of the Current Message Block 




76 (4C) LCBERBKY 
ERB Key 
LCBERB 

Element Request Block 


77 (4D) 


LCBERBQB 

ERBQCB 




80 (50) 

LCBERBPY 

ERB Priority 


81 (51) 


LCBERBLK 

Address of the Next Item in the Chain 




84 (54) 

LCBERBST 

Status of ERB 


85 (55) 


LCBERBCH 

Address of the Chain to be Assigned Buffers 




88 (58) 


LCBERBCT 

Count Fields 




90 (5A) 

LCBTTCIN 

Index to the Terminal Currently Connected 


92 (5C) 

LCBMSGFM 
Bits to Control BSC Line 


93 (5D) 


LCBSCBA 

Address of the Current SCB 




96 (60) 

LCBERMSK 

Error Recording Mask 


97(61) 


ICBINVPT 

Address of the CuVrent Entry in the Invitation List 




100 (64) 






LCBTPCD 







TP OP Codes 



112(70) 

LCBSNSV 

Save Area for Sense Byte 



113(71) 



LCBCSWSV 

Save Area for Channel Status Word 



120 (78) 



{l41 (8D)" 



LCBERCCW 

3ERP Commands 



LCBSTICS 

Characteristics Work Area 



144 (90) 



LCBSTICS 

(Cont.) 
LCBCPA 

Channel Program Area 
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QJLfi 


;et 


.0 


(0) 





(0) 


1 


(1) 


4 


(4) 


5 


(5) 


8 


(81 


9 


(9) 


12 


(C) 


13 


(D) 


16 


(10) 


18 


(12) 


19 


(13) 



Na me Bytes Description 

LCEFCB 8 Resource control block for this LCB 

LCEKEY 1 Key field of the RGB 

LCEQCBA 3 QCB address 

LCEPRT 1 Priority of the RCE 

ICBLINK 3 Address of the next element in the chain 

in which this RCB is currently located 

ICEFSKEY 1 Receive Scheduler key field 

ICESTCBA 3 Address of the first STCB when the LCB 

is functioning as a QCB 

ICBFSPRI 1 Receive Scheduler priority field 

ICERSLNK 3 Address of the next item in the chain in 

which this STCB currently resides 

1CEEOLTD 2 End of the invitation list time delay interval 

ICPTDL 1 Time delay queue offset to QCB address for LCB = X'11' 

LCETSOB 1 TSO status byte: 

Name Bits Value Meaning 

LCBPREP X'SO* Prepare en line 
LCBWPEPK X'80* Write break in proqress 
LCBTSBUF 1 X'40» Euffer has TSO prefix 
ICBSATRD 2 X'20* Simulated attention request 
LCBSOPL 3 X'10* Start cf pollinq list 
LCBREfiE 4 X«08» Peadinq partial line 
LCBCIPCD 5 X'OH' Circle D sent to 2741 
1CBINHEN 6 X'02' Use inhibits for this terminal 
LCB2741N 7 X'OT 2741 on 2741/1050 line 

20 (14) LCBCHATN 1 Disposition status byte: 

N ame Bits Value W eaning 

LCBSCRNN X'80* Screen chanqe requested 
LCBSCFNF X*7F' Mask to specify no screen 

Off chanqe requested 

LCBEXCP 1 X'40' Delay EXCP until association 
LCBEPMSG 2 X'20» ERP messaqe waitinq 
LCBNOPTY 3 X'10' Text retry not possible 
LCBUREQN 4 X'08' Unit request in proqress 
LCBUPEQF 4 X«F7« Mask to specify that a unit 

Off request is not in proqress 

ICBBFRS7 5 X'04' Queue manaqement flaq 
ICPTETEN 6 X'02' U,ser requested tete-a-tete 
LC^T P TE 17 6 X'FD' Mask to specify that tete-a-tete 

Off is riot requested 

LCBABF^N 7 X'01' Abort sequence must be sent 
LCBABPTF 7 X'FE' Mask to specify that an abort 

Off sequence is not required 

21 (15) ICFINSPC 3 Tn-source chain 

24 (18) LCBNTXT 1 Temporary save area for PRFNTXT 

25 (19) ICESCBDA 3 Address of the SCB directory 

26 (1A) ICB1NENT 1 Termname Table offset to the line entry 
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Offset Name Bytes 

ICETSZF 1 Count cf idles (reserve characters) reserved 

LCBFSBFF 3 ^irst buffer assiqned tc this LCB 

ICFLSEFF 3 Last luffer assiqned tc this LCP 

ICE^LAGI 1 IOS flaqs 1 

ICEFLBG2 1 IOS flaqs 2 

LCBSFNSO 1 Sense byte 

LCBSENS1 1 Sense byte 1 

ICEECBCC 1 Completion code 

ICBFCEPT 3 ECE address 

ICEFLAG3 1 IOS flaqs 3 

1CPCSW 7 Last CSV! 

LCPSIOCC 1 SIC condition code 

ICESTAFT 3 Address of the channel troqram 

LCBDCPPT 4 Address cf the correspondinq DCE 

LCPPFSTP Start of error roessaqe data 

1CEFC0CE 4 Address of the QCB to which recalled buffers 

are tc be toposted 

LCETNCAM 2 IOS 

ICETTBIfl 2 Index of the terminal tc be connected 

ICP^RFC"' 2 TCS error counters 

TCPUCFX 1 HCT? index 

ICPFCBFP 3 Pointer to a recalled buffer 

ICPLSPCT 3 Address cf the last serviced PCI 

LCPT^ST 2 Offset tc the start of the Buffer Translation 

routine 

LCFSTA^E 2 Status bits 

LCPS* T, A' T 1 1 ^irst status byte - bit definitions are as follows: 

J1§J.§ ! if s Value Meaning 

1.CBRCI1N X' 80* Pecall beinq performed 
LCB^CIIF X«7F' Mask to specify that no recall 

Off is beinq performed 

LCBCTLMD 1 S'40' line is in control mode 
ICBCVPSP 1 X'40' First BSC output conversational 

block 
LCBOCNI 2 X^O* Don-immediate operator control 

operation is in progress 

1CBTNTTN 3 X • 1 ' Peceivinq initiate mode messaqe 
LCBINTTF 3 X»EF« Mask tc specify no initiate 

Off mode messaqe 

LCBCONT 4 X'08' Continue or reset operation in progress 
LCBFPFFN 5 X f 04' Line is free 



28 


[in 


29 


(1D) 


29 


MD) 


32 


(20) 


3 3 


[21) 


34 


22) 


35 


(23) 


36 


(24) 


3-7 


25) 


40 


28) 


41 | 


29) 


48 ( 


30) 


4^ I 


31) 


52 


3U) 


56 


38) 


56 


38) 


50 I 


3C) 


62 I 


3F) 


5 2 


1 v ) 


£4 


4 0) 


£ 5 


41) 


6^ 


41) 


^8 ( 


44) 


70 


4P) 


70 < 


46) 
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71 (U7) 



LCB STB. T 2 



LCBFREFF 5 • X ' FB • ("ask tc specify that the line 

Off is not free 

LCERECBN 6 X'02' line is receivinq 

ICBSFNDN 7 x'01' Line is sendinq 

(Line is stopped if bits 5 r 6, S 7 are off.) 

Second status byte - bit settinqs are as follows: 

Name Bits Value Meaning 

LCBTRACF. X'80' I/O trace active for this line 

LCBLOCK X»80 f Line is in lock mode 

LCBTPCOF 8 X'7F' Mask to specify that I/O trace 

Off is not active for this line 

LCBMSGNN 1 x»40' MSGGEN or Startup messaqe 

LCBMSGNF 1 X'BF' Mask to specify that this is not 

Off a MSGGEN or Startup messaqe 



n -P f s e> + 



wain? 



Bytes Descri pti on 

LCPB*OTN 2 x»20' FOT frcm a buffered terminal (no ECM) 
ICBBEOTF 2 X'DF* Mask tc specify a reqular EOM 

Off if EOT from a buffered terminal 

T CBSNDFR 3 XMO' Send priority switch set by the 

Send Scheduler 
ICBNEGFP U X'08' Neqative response to pollinq 
LCBSYNC 5 X'04' Line is binary synchronous 
LCBDIAI 6 X'02' This is a dial LCB 
LCBFESP 7 X'01 A response needs to be sent to 

this line 



72 


(48) 


LC^TSTSV 


1 

NT a me 
LCBCONCT 


73 


(49) 


ICP^ECAD 


3 


76 


(UC) 


LCEFFB 


4 


7* 


(4C) 


LCPEPPKT 


1 


77 


("D) 


I.CPEPFQB 


3 


RO 


( c 0) 


1CBF°BPY 


1 


R1 


(51) 


TCEE^PLK 


3 


Ra 


(54) 


LCBE^S^ 


1 



Name 



^est-and-set switch: 

Pits Value Meaning 

X'80* Cornection established 

Address of the current messaqe block 

Start of the FRE for this LCB 

Element Request Block key field 

Address of the QCB to which this ERB is 
currently tposted 

ERB priority 

Address of the next item in the chain 
in which this ERB currently resides 

E R B status - bit settinqs are as follows: 

Bits Value Meaning 



End of initiate mode 

End of messaqe read from disk 

Loqical read error 

Mask to specify no 

read error 

ERB is waitinq for buffers from 

IEDQHM 

Error on the send side 

After the initial request is 

satisfied, tpost the ERB to the 

QCB specified in LCBRCQCB 

Cisk request is complete 



LCBMSG 
ICBFOMSG 
LCB^DERR 
LCBPDEPF 

LCBINQ, 



1 
2 
2 
Off 
3 


X«80' 
X«40» 
X'20' 
X*DF« 

X« 10' 


LCBERROR 
LCBPRCPG 


5 
6 


X«04' 
X»02' 


LCBCOMPL 


6 


X»02' 
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LCBDLNKN 7 X'01' Delink switch - IRB is not tposted, 

tut is eliqible to be tposted 

LCBD1NKT 7 X'FE' Mask to specify that the EPB is 

Off tposted, sc PCI cannot tpost 



9-iLfset 

85 -(55) 
88 (58) 
90 (5M 
92 (5C) 



Name 

1CEEPFCH 
ICEFPBC rn 
ICETTCTN 
LCEMSGFM 



.By te s 

3 

2 

2 

1 

Name 

LCBNAK 
LCBACK1 



Desc ription 

it aqain 
Address of the chain to be assiqned buffers 
Count fields 

Index to the terminal that is currently connected 
Bits to control the BSC line 
Bits Value Keaninq 



X'80« 
X*40» 



Bequest to send a NAK response 
ACK counter - 



93 (5D) 



1CBSCEA 



The followinq two bits indicate whether a scan of 
line ccntrol has been accomplished and the type of 
line control received. 



Valid start sequence 

Error start sequence 

Temporary time delay recieved 

ENC received 

EOT first character 

Address ef the current SCB 



Address of the current SCB 



LCEVS^PT 


2 


X»20' 


LCBBSTFT 


3 


XMO' 


LCBTTD 


4 


X'08' 


LCBENQ 


5 


X»04« 


ICBEOT 


6 


\ : 02» 


LCBOLT 


•7 


X«01' 



<>6 (60) 

01 (61) 

100 (64) 

112 (70) 

113 (71) 
120 (78) 
141 (8D) 
144 (90) 



LCEEPMSK 
LCEINVPT 

ICETPCD 

ICBSNSV 

ICBCSWSV 

ICEFFCCW 

ICESTICS 

LCECPA 



1 

3 

12 

1 

7 

24 

3 



Error recordinq mask 

Address of the current entry in the 
invitation list 

TP operation codes 

Save area for the sense byte 

Save area for the CSW 

Three EPP commands 

Characteristics work area 

Channel proqram area 
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STATION CONT^OI EIOCK 

There is at least one Station Control Block (SCB) associated with each 1CB in the TCAM 
system. With buffered terminals there is one SCB per terminal on a line. A buffered 
terminal sends a block or a part of an entire transmission at a time; while that terminal 
is preparinq tc send a subsequent block, TCAM examines and receives from other terminals 
on the same line. TCAM uses the SCBs to keep track of one transmission from each buffered 
terminal on the ^.ine. 

If the terminals on a line are not buffered, or if,. the line with which the SCB is 
associated is a dial line, one terminal at a time completes its transmission. There is no 
need to keep track of many transmissions in parallel, so one SCB is sufficient for the 
entire line. In this case the address of the SCB is the LCBSCBA field of the 1CB. 

The address of the SCB Directory is in the LCESCBDA field of the line Control Elock f 
The offset to the current SCB is in the LCBSCBO field of the LCB. 

To obtain the address of any SCB associated with a QCE, TCAM first locates the LCB, 
This is done by multiplyinq the relative line number (in QCBRELLN) by the size of an LCB 
(DCBETOBX) and addinq the address of the pseudo IOB (DCBIOBAD) , This qives TCAM the 
address of the IOB. At a displacement of -X'20* from the beqinninq of the IOB is the 
beqinninq of the LCB. TCAM then multiplies the SCB size (located in the AVTSCBSZ field of 
the Address Vector Table) by the offset in QCBSCBOF and adds that total to the address of 
the SCB Directory (LCBSCBDS) . This sum then points to the desired Station Control Block, 

Storaqe is allocated for a station Control Block at assembly time for leased lines and 
at open time for dial lines. The SCB is initialized by STABTMH,.- 

The fiqure belcw is the format of the Station Control Block; descriptions of the 
fields follow the illustration. 



964 



I EDQSCB 

0(0) 



SCBSTATE 

Status Bits 



1 (1) 



SCBDESTQ 

Pointer to the Destination QCB 



4 (4) SCBSNDCT 

Message Limit On Send Side 

SCBRCVCT 
Message Limit On Receive Side 



5(5) 



SCBMACR 

First/Next IN/OUTMSG Macro to be Executed 



SCBMBHEN 

Address of the Multiple Header Buffer Entry 



8(8) 

SCBPRI 

Priority Index to the QCB 



9(9) 



SCBBKFCT 

Count of Message Length for Break 



•Tb(A)' 



SCBEOBSZ 

Size of Logical Blocks 



~\ 



12(C) SCBSALEV 
Simulated Attention Level Req 
SCBQTYPE 



13(D) 



SCBMRFPL 

Address of Forward Parameter List 



16(10) 



SCBERR1 

First Byte 



|17(1D SCBERR2 
Second Byte 



SCBERRST 

Error Word Bits 

18(12) 



SCBERR3 

Third Byte 



.19 (13) SCBERR4 

Fourth Byte 



20(14) 



22 (16) 



SCBMRFSD 

Multiple Router First Secondary Destination 



SCBEOBAC 

Accumulated Count Between Blocks 

SCBDLPTR 

Distribution List Pointer 



24(18) SCBBSCFM 

MSGFORM Dynamic 
Block Changes 



25(19) 



SCBMBSSA 

Multiple Buffer Scan Save Area 



32 (20) 

SCBCPBNO 

Number of Next Sequential CPB 



33(21) 



SCBDCHDR 

Disk Address Current Header 



36<24) SCBDESTL 
Length of Destination Names 



37 (25) 



SCBCCHDR 

Main Storage Address of the Current Header 



40 (28) 



41 (29) 



SCBITBSZ 

Size of Logical Subblocks 



SCBSCSEG 

Current Segment Being Read 

SCBDNSEG 

Disk Address of the Next Segment to Send from the Disk 



44 (2C) 

SCBHBFNO 

Number of Buffers in 
Multiple Header 



45 (2D) 



SCBSCHDR 

Current Header Being Sent 

SCBCLSEG 

Main Storage Address of the Last Message Segment 



48 (30) 

SCBITBAC 

Accumulated Count 
Between ITBs 



49(31) 



SCBFEFO 

Saved FEFO Pointer 



SCBDCSEG 

Disk Address of the Current Segment 



52 (34) 



SCBDEOB 

Disk Information On the Last EOB 



56 (38) 



SCBSRCE 

Message Buffer Source Saved 



58 (3A) 



SCBSIZE 

Message Buffer Size Saved 



60 (3C) 



SCBSTAT1 

Status Byte 



61 (3D) 



SCBXTRA 

Address of Additional Records Saved 



SCBCORE 

Address of the Record in the Core Queue Saved 



64 (40) 



SCBSEQ 

Sequence Out Number 

SCBSCAN 

Scan Pointer 



66 (42) 



SCBTQBCK 

Text Segment Chain Saved 



SCBNTXT 

Address of the Next Text Segment Saved 



Continued 
Continued 



69 (45) 



SCBCRCD 

Address of the Current Segment Saved 
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72(48) SCBNHDR 

Address of the Next Header Segment Saved 


75 (4B) SCBNXCPB 

Next CPB Number from Disk 


SCBCHDR 

Address of the Current Header Segment Saved 


SCBLCSEG 

Main Storage Address of 
Current Segment 




78(4E) SCBEOB 

Pointer to First EOB Saved 


Continued 


80 (50) SCBUNTCT 

Count in Disk Record of 
First Byte of Data 


81 SCBTRANS 

Current Translate Table Address 


84 (54) 

SCBRGSAV 

Save Area for User MH Registers — if Specified on INTRO 



Offset 
(0) 



Name 
SCESTBT* 



1 


(D 


a 


(4) 


« 


(4) 


5 


(5) 


5 


(*) 


q 


<«> 





(9) 


10 


(A) 


12 


(C) 


12 


m 



SCPDFSTQ 
SCESNDCT 
SCB^CVCT 
SCEMAC* 

SCEMBHFN 

SCBPPT 

SCFBKFC^ 

SCFBOBS? 

SCFSAIEV 

SCE0TYP p 



Bytes 

1 

Name 

SCBTPANP 
SCBMGFMN 
SCFMGFMF 

SCBSFQTN 

SCBLCK1F 

SCEMSGIN 
SCBMSGLF 

SCBCKPT 
SCBPRFP 
SCBCODF 

3 

1 

1 

3 

3 
1 
3 
1 
1 



Name 

SCBCOPF0 

SCBPSUS 

SCBNPFtS 

SCBNOFF 

SCBBFTM 

SCBBFMM 



D es cr j pt ion 
Status tits: 
Bits Value 



Meanin 




1 
1 

Off 

1 

2 

Off 

u 
n 

Off 
5 
€ 
7 



X«80» 
X'40' 
X'BF' 

rio' 

X'DF* 

X'08' 

X'F7» 

X'04' 
X»02' 
X'01» 



Messaqe in transparent mode 

MSGFCFM requested 

Mask to specify MSGFORM 

not requested 

Sequence-in has been executed for the 

current messaqe 

Mask to specify that a messaqe 

is not beinq received in Lock 

Messaqe lock 

Mask tc specify extended lock 

Checkpoint requested 
Previous EOE/ETB error 
Translation requested 



Address of the Destination QCE 

MSG1IMIT on Send side 

MSGIIMTT on Receive side 

First or next TNMSG cr ODTMSG macro to 
be executed 

Address of the multiple-buffer-header entry 

Priority index to the QCE 

Count of messaqe lenqth for Break 

Size of loqical blocks 

Simulated attention level request - TSO 

Queuinq medium for this messaqe: 

Bits Value Meaning 

1 X'40' Main stcraqe queues 

2 X'20' Reusable disk queues 

3 XMO' Nonreusable disk queues 

5 X f 0a* Reusability has updated SCEEEFO 

6 X'02' Buffered terminal SCB 

7 X'01' Buffered terminal in middle 

of messaqe 
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nf 4 


: set 


Name 


Bjyt.es 


13 


(T>) 


SCPMFFPL 


3 


16 


(10) 


SCFE"PPST 




1(= 


(10) 


SCPEFF 1 


1 



1*7 (11) 



SCFE*P2 



1« (12) 



SCPERF3 



Descri ption 

Address of the FOFWAFE parameter list 

Frror word bits 



Name 



First byte: 
Bits Value 



Weaning 



SCBHDFFN 





X 


•80' 


Incomplete header 


SCBHDFHF 



Off 


X 


7F' 


Mas* to specify not an 
incomplete header 


SCBNOICG 


o 


X 


80' 


Invalid Loqon messaqe - TSO 


SCBOFTGN 


1 


X 


40' 


Invalid oriqin 


SCBOFIGF 


1 

Off 


X 


BF' 


Mask to specify a valid oriqin 


SCBHANG 


1 


X 


40' 


loqon requests hanqup messaqe - TSO 


SCBNOTFM 


2 


X 


»20« 


Hot a TSO terminal - TSO 


SCBSEQHN 


3 


X 


10' 


Sequence hiqh 


SCBSEOBF 


3 
Off 


X 


EF' 


Mask to specify that sequence 
is not hiqh 


SCBNOTSO 


3 


X 


10' 


TSO is not in the system - TSO 


SCBSEOIN 


4 


X' 


08' 


Sequence low 


SCBSEQLF 


4 

Off 


X 


F7' 


Mask tc specify that sequence 
is not low 


SCBNOVAC 


4 


X' 


08' 


Too many TSO users - TSO 


SCBNOBFN 


6 


X' 


02' 


Insufficient buffers 


SCBCUTFN 


7 


X 


01' 


CUTOFF error 


SCBCUTFF 


7 

Off 


X' 


EE« 


Mask to specify no 
CUTOFF error 


SCBPVTSI 


7 


X' 


01' 


FVI to selection on a buffered 
terminal 



Name 

SCBCPMTN 

SCBCFMAX 

SCBCODEP 

SCBALN 

SCBOLTP 

SCBABPTN 

SCBFFflDN 



Name 

SCBLOSTN 
SCBIOSTF 

SCBXPI 

SCRTMIfiN 
SCBTMIDF 

SCBXPD 
SCBSATTN 
SCEUSEFN 
SCBUSEF* 

SCBFOFM ; N 
SCEATTN 
SCBXCEFN 
SCBXCE^F 



Second byte 
Bits Value 



X'80* 
X'40' 
X ' 20 ' 
X' 10' 
X'08« 
X'04' 
X'02« 



Third byte: 
Bits Value 







Off 



1 
1 

Off 

1 

3 

4 

4 

Off 

6 
7 
7 

Off 



X'80' 
X'7F« 

X'80' 

X'40' 

X'BF« 

X«40' 
XM0« 
X«08' 
X'F7« 

X'04' 
X'02' 
X'01' 

X'FE' 



Meaning 

Main storaqe minimum passed 
Main storaqe maximum passed 
Error in dynamic translate - TSC 
Automatic line numberinq - ISO 
TOTE not in the system 
fibort - ESC terminal 
Terminal FOEWAFD error 



Meaning 

Messaqe lost (overlaid) 
Mask to specify 
messaqe processed 
Attention - Send - I - TSO 

TD from terminal invalid 

Mask to specify that terminal 

identification is valid 

Attention - Send - - TSC 

Simulated attention received - TSO 

User error 

Mask to specify 

no user error 

Format error - BSC messaqe 

Hardware Attention - TSO 

Unit exception 

Mask to specify no 

unit exception 
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CfJs°l Jame Bytes Description 

19 (13) SCBEFP4 1 fourth byte: 

Name Bits Value Meaning 

SCBSLCTN X'80» Error durinq selection 

SCBSLCTF X r 7F' Mask tc specify no 

Off selection error 

SCBTXTTN 1 X'40' Error durinq text transfer 

SCBTXTF 1 X'BF' Mask to specify no 

Off text transfer error 

SCBCONNN 2 X'20 f Error in Connect/Disconnect 

SCBCONNF 2 X'DF« Mask tc specify no 

Off Connect/Disconnect error 

SCBTRMLN 3 X'10' Terminal error 

SCBTRMLF 3 X'EF* Mask to specify 

Off no terminal error 

SCBCTIUN 5 X'04' Error in the control unit 

SCBCTIOF 5 X'FB' Mask to specify no 

Off control unit error 

SCBCHANN 6 X«02' Error in channel 

SCBCHANF 6 X'FD' Mask tc specify 

Off no error in channel 

SCBUNEFN 7 X f 01' Undefined error - should net occur 

SCBONDFF 7 X'EF' Mask tc specify 

Off no undefined error 

20 (14) SCPMFFSD 2 Multiple routinq first secondary destination 
22 (16) SCBEOBRC 2 Accumulated count between blocks 

22 (16) SCPDLPTF 2 Distribution list pointer 

24 (18) SCBBSCFM 1 MSGFCFM dynamic block chanqes: 

Name Bits Value Meaning 

SCBTPNSP X'80* Peceivinq transparent 

SCBPCVTX 2 X'20' ETX received from BSC 

SCBNONTR 1 X'40' Peceivinq non-transparent 

SCBN0E0T 6 X'02' ESC Eial no EOT before read 

SCBMLMTN 7 X'OT MSGLTMTT has been exceeded 

SCBMTMTF . 7 X'EE' Mask tc specify that 

Off MSG1IMTT is not exceeded 

2=5 (19) SCEMESSA 7 Multiple buffer scan save area 

32 (20) SCBCPPNO 1 Number of the next sequential CPB to be read 

froir disk 

33 (21) SCEDCFD^ 3 Disk address of the current header 
3* (24) SCBDESTL 1 Lenqth of destination names 

3" T (25) SCPCCHDP 3 Main stcraqe address of the current header 

ft A (28) SCEITPS7 1 Size of loqical subblccks 

tt1 (29) SCESCSFG 3 current seqment beinq read 

41 (29) SCEDNSFG 3 Disk address of the next seqment from the disk 

to send 

44 (2C) SCPHPF^to 1 Number of buffers in the multiple-buffer header 

45 (2D) SCBSCPDP 3 Current header beinq sent 

4 s ; (2D) SCPCLSFG 3 Main storaqe address of the last message sent 



968 



Same 

SCEITPAC 

SCBFB^O 

SCEDCF^G 

SCEDFOB 



Ho±e: The section in bytes 
prefix processed. 




^4 


(38) 


SCESRC - * 


2 


^8 


(3A) 


SCEST7F 


2 


f 


(3C> 


SCESTAT1 


1 


f 1 


(3D) 


SCEXTFA 


3 


*1 


(3D) 


SCPCOFF 


3 


pa 


(40) 


SCEOSFO 


2 


PU 


(40) 


SCBSCAN 


2 


66 


(42) 


SCETOBCK 


3 


66 


(42) 


SCBNTXT 


3 


69 


(45) 


SCECECD 


3 


72 


(48) 


SCBflHDB 


3 


7 2 


(48) 


SCBCHD* 


3 


75 


(4B) 


SCENXCPB 


1 


75 


(4B) 


SCECCSEG 


3 


78 


(4E) 


SCEEOB 


2 


BO 


(50) 


SCEUNTCT 


1 


81 


(51) 


SCETFAtfS 


3 


34 


(54) 


SCBBGSAV 


4 



B l& fi S Description 
1 Accumulated count between ITBs 
3 Saved FEFO pointer 

3 Disk address of the current segment 

4 Disk information on the last BOB 
54-79 is a copy of the last buffer 

Messaqe buffer source 

lessaqe tuffer size 

Status byte 

Address of additional records 

Address of the record in the main storage 

Sequence-out number 

Scan pointer address 

Text segment queue-back chain 

Address of the next text segment 

Address of the current segment 

Address of the next header segment 

Address of the current header segment 

Next CPB number from disk; 
if zero - no multiple routing 

Main storage address of the current segment 

Pointer to the first EOB 

Count of the first byte of data in the disk record 

Current translation table address 

Save area for user HH registers if specified 
on INTBO 



CHANNE1 PPCGPAM ELOCK 

^he Channel Proqram Block (IEDQCPB) contains the disk channel program and other 
information pertinent to the disk I/O involved. Within the channel program the CPB 
contains pointers to its associated unit and to the next CPB as well as the actual number 
of the unit beinq processed and its HBBCCHHB equivalent. The address of the first CPB is 
in the AVTCPBPT field of the Address Vector Table, The same address is in the AVTFCPB 
field of the AVT at INTBO execution time, but this field changes during the execution of 
the channel proqram as it always points to the first CPB in the LIFO CPB queue. 

Storage is allocated and the CPE is initialized at execution time for the IHTBO macro, 
Pt INTBO time, each CPB in the CPB free peel has a unit assigned to it. Initially this 
unit is contiguous with the CPB, but as processing continues, the unit may be frcra the 
buffer unit pool. The CPBXBEA field points to the associated unit, which is actually the 
disk data area. 

The figure belcw is the format of the Channel Program Block; descriptions of the 
fields follow the illustration. 
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IEDQCPB 



0(0) 








CPBHEADF 

Seek Head CCW 










CPBSEEK 


[I (1) 




CPBHEAD 










OP Code 


I 

i 




Head ID Address 








4(4) 








CPBHEADF 

(Cont.) 










CPBSEKFL 


>5(5) 


Reserved 


| 6 (6) 




CPBSEKCT 






Seek Flag 


1 


1 




Seek Count 




8(8) 








CPBSRECF 

Search ID Equal CCW 










CPBSRCH 

OP Code 


1 

1 




CPBSREC 

Record 1 D Address 








12(C) 








CPBSRECF 














13(D) 




(Cont.) 










CPBSRHFL 

Search Flag 




Reserved 


]"l4(E) 
1 




CPBSRHCT 

Search Count 




16(10) 








CPBTICSF 

TIC to Search CCW 










CPBTIC1 


J1 (1) 




CPBTICS 










OP Code 


I 




Search CCW Address 








20(14) 








CPBTICSF 

















(Cont.) 














CPBUNUSD 
















Reserved 








24(18) 








CPBAREAF 

Read/Write CCW 










CPBRDWR 


J 25 (19) 




CPBAREA 










OP Code 


1 

i 




I/O Area Address 








28 (1C) 








CPBAREAF 

(Cont.) 










CPBRWFL 


~]29(1D) 




[30 (IE) 

l 




CPBCOUNT 




Read/Write Flag 


1 

I 


Reserved 


Number of Bytes to Read or Write 




32 (20) 








CPBXREAF 

Second Read/Write CCW 










CPBXDWR 


Tib (21 ) 




CPBXREA 






• 




OP Code 


l 




I/O Area Address 








36 (24) 








CPBXREAF 

(Cont.) 










CPBXWFL 


T37 (25) 


Reserved 


T38 (26) 




CPBXOUNT 




Read/Write Flag 


l 


1 

1 


Number of Bytes to Read or Write 




40 (28) 








CPBNEXTF 

TIC to Next CPB CCW 










CPBTIC2 

OP Code 


] 41 (29) 
I 




CPBNEXT 

Next CPB Address 








44 (2C) 








CPBNEXTF 

(Cont.) 










CPBFLAG 

Flag Byte 


~1 

I 

• 




CPB ADD R 

Absolute Record Number 








48 (30) 








CPBABSAD 

MBBCCHHR Value 








56 (38) 


CPBINWKA 




57 (39) 


CPBTOUNT 


58 (3A) 

CPBWKACT 




59 (3B) 

CPBNUMB 




Work Area Data Count 




Data to be Moved Count 


Work Area Start Address 


Current CPB Number 




60 (3C) 


CPBUNTCT 

Unit Data Count 


1 61 (3D) 

I 




CPBAERBF 

ERB Address 

CPBAERB 

ERB Address 
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o-pfse+: 





(0) 





ro) 


1 


d) 


4 


[4) 


6 


(*) 


8 


( p ) 


9 


[<n 


12 


(c) 


13 


[P) 


14 


[?) 


1* 


[10) 


16 


[10) 


17 


[11) 


2^ 


(14) 


24 { 


18) 


24 


[18) 


25 { 


19) 


2« 


1C) 


30 


MP) 


32 


[20) 


32 


[20) 


33 


21) 


36 ( 


24) 


38 


26) 


U0 ( 


28) 


40 


28) 


41 ( 


29) 


44 ( 


2C) 



Name 

CPEHEAEF 

CPESFFK 

CPBPFAP 

CPFSEF'L 

CPESFKCT 

CPES^CH 

CPESTFC 

CPFS^P^L 

CPES^PCT 

CPPTTCSF 

C'PPTICI 

CPETTCS 

CPBPNUSD 

CPFRPFAF 

CPFPPWP 

CPBAPFA 

CPEPWFL 

CP"COPNT 

CPPXRPRF 

CPEXDVP 

CPEXPEA 

CPEXWFI 

CPBXOPNT 

CPP*TFYTT 

CPETTC2 

CFENEXT 

CPEFLAG 



Bytes 

1 
3 
1 
2 
1 
3 
1 
1 
3 

1 

3 



D escription 

Start of the Seek Head CCW 

Seek Heaa OP Code 

Pointer to the head IE 

Seek CCW flaq, command chaininq 

Seek count of 6 

Search TD Fqual OP Code 

Pointer tc the record IP 

Search CCW flaq 

Reserved 

Search count of 5 

Start of the TTC to Search CCW 

TTC OP code 

Address of the Search CCW 

Reserved 

Start of the Fead/Write CCW 

fead/Write OP Code 

Address of the I/O area 

Pead/Write flaq 

Numter of bytes to be read or written 

Start of the second Pead/Write CCW 

Pead/Write CP code 

Address of the I/O area 

Pead/Write flaq 

dumber of bytes to be read or written 

Start of the TIC tc Next CPB CCW 

be next CFB 

Meanin g 

Special CPE belonqs to the 
Peusability subtask 
Special CPE belonqs to the 
Copy subtask 
Peusable disk 
Kon-reusable disk 



1 


TTC 


CP cod 


3 


Pointer to 


1 


Flaq 


tyte: 


Name 


Bits 


Value 


CPBPEUSN 





X'80' 


CPBCOPYN 


1 


X'40' 


CPE^DSKN 


2 


X'20« 


CPBNDSKN 


3 


X'10' 
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'he following list settinas are for the reusafcility-copy function: 



Offset Name Bytes 



44 


(2C) 


CPFAflriP 


4 


48 


(30) 


CPEABSAD 


8 


56 


pp> 


CFBINWKA 


1 


56 


(38) 




4 


57 


(39) 


CPBTOUNT 


1 


^8 


(3A) 


CPBWKACT 


1 


59 


(3B) 


CPBNUI«B 


1 



4.6 X'OA 1 Update the FEFO queue pointer 

4.5 X'OC Bead the disk data field tc 

qet the destination FEFO 
pointer for a messaqe beinq 
serviced; always followed 
by a X'OE' 
4,6,7 X'0B« Write the disk data field of 

the last held messaqe to relink 
the held FEFO queue into the 
destination FEFO queue in 
order to obtain one queue 
(dene at the start of 
servicinq the Destination 
Priority QCB) 

4.7 X«09' Write the "serviced" bit in 

the oriqinal first unit after 
the entire messaqe has been 
moved to the messaqe queue 
for the alternate destination; 
usually followed by a X'OA' 

4 X^S' Fead the first unit of the 

additional records; always 
followed by a X'05' 
5,6,7 X«07« Write the additional units 
for each messacre buffer; 
always follows a X'06' 

5.6 X'06' Read the additional units 

for each messaqe buffer; 
always followed by a X'07' 

5.7 X'05' Write the first unit of 

each messaqe buffer to the 
alternate destination 

5 X'04» Write the disk data field 

relink the ,FE^O queue to 
bypass the old messaqe; 




usually follows a X'OS' 
Fead the key and data fields 
of a subsequent messaqe that 
has to be assiqned to an 
alternate destination 

6 X'02' Fead the disk data field 

of the first messaqe to 
check the FEFO pointer 

7 X'OV Bead the key and data fields 

of the first messaqe that 
has to be assiqned to an 
alternate destination 
X*00' Cancel the record (text 
is all 'C's) 

Absolute record number 

MBECCRFF value 

Count of the data in the work area 

LCB address, if the CPB is for IGG019FP 

Count of the data to be moved into a unit 

Where to start in the work area 

Sequential number of the current CPB 
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offset 


N.ame 
CPEAEPBF 


Bj 


rtes 


60 (3C) 


4 




^o on 


CPEUNTCT 


1 




61 (3D) 


CPEAP^E 


3 





Description 

Address of the EBE, or the work area unit 
address (for IGG019PP) 

Count of data already in the unit 



T he follo'wincr are the CCW hit definitions: 



ccw ^laas: 



Name 



Jit s Valu e Meaning 



CCW Commands: 



CPBCDC X'80' Data chaininq 

CPBCCC 1 X'HO* Command chaininq 

CPBSLIC 2 X'20' Suppress incorrect lenqth 

CPBSKIPC 3 nO' Skip data 



CPETTCC 4 x«08' TIC command 

CPBSF.EKC 3,4, X'1B' Seek Head command 

6,7 

CPBPDKC 4,5,6 X'0E» Bead Key and Data command 

CPBWPKC 4,5,7 X'OD' Write Key and Data command 

CPBPDC 5,6 X ' 06 • Pead Data command 

CPBWRC 5,7 xroS" Write Data command 

CPBSRCHC 2,3,7 X'31* Search ID Equal command 

CPBNOPC 6,7 X'03' NO OP command 

CPBWPTTE 7 X'01» Write Data or Key and Data bit 

CPBKEYB 4 X f 08» Key tit 



DATA CONT^OI FICCK 

^he ^ata Control Block (DCE) is a storaqe area throuqh which information needed for the 
access routines tc store and retrieve data is communicated. The format of a TCAM ECE is 
determined by the character of the data set it represents. There are five types of Data 
Control Blocks used in TCA1 messaqe control prcqrams and application proqrams They are 

line Groups 
tfessaae Queues 
Checkpoint 
Messaqe loqqinq 
application Proqram 

T he TCAW DC P is divided into three seqments - Prefix, Ecundation, and Extension. The 
contents of the foundation seqment chanqes durinq processinq. Storaqe is allocated for 
t>>e DCB at assembly time, and it is initialized partially at assembly time and partially 
at execution time accordinq tc the parameters specified on the DD card. Before open time, 
the first doutleword of-the foundation seqment (at a displacement of 40 (X'28) from the 
beqinnina of the DCB) contains the ddname of the data set to be opened. After the data 
set is opened, the same doubleword contains the address of the Data Extent Block. This 
address is used to set up. linkaqes in the TCA'M execution. 

The address of the TCA1 Data Control Blcck is in the DEEDC'BAD field of the Data Extent 
p lock. The same address is also in the QCBtCEAD field of the Destination Queue Control 
Block. 



The . fiaure below is 
^ollow the illustration. 



the format of a Data Control Blcck; descriptions of the fields 
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Data Control Block DSECT (IHAOCB) 
Data Sat Interface 



Line Group 






20 (14) DCBUFOU 
DCBUFIN 

Number of Buffers 


21 (15) 

DCBMH 

MH Address for this Line Group 


24 (18) DCBINTVL 
Invitation Delay 
Interval 


25 (19) 

DCBPCI 

PCI Byte 


26 (1A) 

DCBOSORG 

Data Set Organization 


28 (1C) OCBUFMA 

Maximum Buffer Count ( DCBIOBAD 
fpr_Jrajisfex. \ IOB Base Address 


32(20) 

DCBCPRI 

Priority 


33(21) 

DCBTRANS 

Translation Table Address 


36 (24) DCBEIOBX 

Extended IOB Index 


DCBEXLST 

Exit List Address 



Menage Queues 










20(14) 




Reserved 




26 (1A) 

DCBDSORG 

Data Set Organization 


28 (1C) 

Reserved 






DCBIOBAD 

Before Open, AVT Address 






32(20) 

DCBTHRES 

Disk Threshold Value 


33(21) 


Reserved 


36 (24) Reserved 




DCBEXLST 

Exit List Address 



Checkpoint 



20(14) 


Reserved 






26 (1A) 


DCBDSORG 

Data Set Organization 


28 (1C) Reserved , 


DCBIOBAD 

Before Open, AVT Address 




32 (20) 


Reserved 




36 <24) Reserved | 


DCBEXLST 

Exit List Address 





I 
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Data Set Interface (Cont.) 

r 



Message Logging 



|20(14) 



1- 



Reserved 



32(20) 



DCBEODAD 

OECB Pointer 



36(24) 



Reserved 



Application Program 



20(14) 










Reserved 




24(18) 




DCBBUFL 

Buffer Length 






26(1 A) 


DCBDSORG 

Data Set Organization 


28 (1C) 










Reserved 




32 (20) 










DCBEODAD 

End-of-File Routine Address 




36 (24) 


DCBRECFM 

Record Format 


I 
1 

_ J 






DCBEXLST 















J 
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Foundation 

r 



Before OPEN 



J* 



40 (28) 



DCBDDNAM 

Data Set Name 



"X 



48(30) 



DCBOFLGS 

Open Flags 



49(31) 



DCBIFLG 

IOS Error Flags 



50(32) 



DCBMACR 

Macro Instruction Reference 



After OPEN 



40(28) 




DCBTIOT 

DO Offset 




42 (2A) 


DCBMACRF 

Macro Instruction Reference 


44 (2C) 


DCBIFLGS 

IOS Error Flags 


■ i 

1 

1 


OCBDEBAD 

DEB Address 




48(30) 


DCBOFLGS 

Open Flags 













Extension 

I 

Line Group 



48 (30) Reserved 



DCBSCTAD 

Special Characters Table Address 



52 (34) OCBILCT 
Count of 
Invitation Lists 



53 (35) 



DCBUNTCT 

Unit Count 



54(36) 



DCBBUFSI 

Buffer Size 



56(38) 



OCBRESER 

Reserve Bytes Counts 



60 (3C) 



OCBINVLI 

Invitation List Address 



OCBINVLI 



OCBINVLI 



OCBINVLI 



Menage Queues/Checkpoint 



48(30) 



Reserved 



52(34) 



DCBOPTCD 

Code Byte 



53 (35) 



Reserved 



976 



Extension (Cont.) 

48(30) Reserved *" 



DCBREAD. DCBWRITE 

READ or WRITE Module Address 



52(34) 



Reserved 



72 (48) DCBNCP 

Count of Write 
Operations 



73 (49) 



Reserved 



"L 



Application Program 



48(30) 


Reserved 


1 
. J 






DCBREAD, DCBWRITE 
DCBGET DCBPUT 








READ/WRITE or GET/PUT Module Address 


52(34) 


DCBOPTCD 

Code Byte 


1 
J 




DCBCHECK 

CHECK Module Address 


56(38) 






Synchror 


DCBSYNAD 

izing Routine Address 


60(30 




Reserved 






62 (3E) 

DCBBLKSI 

Maximum Block Size 


64(40) 








Reserved ^ 



82 (52) 



DCBLRECL 

Logical Record Length 



84(54) 



DCBCNTRL, DCBNOTE, DCBPOINT 

CNTRL or NOTE/POINT Routine Address 






J 
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Offset Jganig 
LINE GROUP TNT*FF»CE 



Bytes 



20 (14) 



21 (15) 

2'4 (18) 
24 (19) 



26(1A) 



28 (1C) 



28 (1C) 



32 (20) 



DCEBUFIN/ 
CCBBUFOH 



DCEMH 

TXFTNTVL 
BCB°CT 



DCPDSOPG 



DCEBUFMA 



DCBIOBAD 



DCEC*>FT 



Description 



Bits 0-2:. 

Numter of buffers assigned 
initially for receiving operations, 
for each line in line group 

Bits 4-7: 

Number of buffers assigned initially 
for sending operations, for each line 
in the line group 

Address of the message handler for 
this line group 

Numfcer of seconds on invitation delay 

°rogram-Controlled Interruption 
handling byte: 

Bit Value Meaning 



2 X'20' 

3 X'10* 

4 X'08' 

5 X'04' 

6 X'02 1 

7 X'01» 



FCI=(A,) 
FCI=(,A) 
PCI=(N,) 
FCI=(,N) 
PCI*(F,) 
PCT=(,P) 



Data Set Organization: 
Byte - Code = TX 

laximum number of buffers to be 
used for data transfer for each 
line in this group 

Befcre open - address of AVT; after 
open - base for addressing IOBs 
(Base=address of first IOB minus 
length of one LCB) 

Relative priority to be given to 
sendino and receiving operations 

Bits Value Meaning 

0-4 Reserved bits 

5 X'04' R - Receiving has priority 

6 X'02' E - Receiving and sending have 

egual priority 

7 X'01 f S - Sending has priority 



3^» (21) 



DCPTRANS 



Address of the translation table 



Table 



Code 



TE?010 


1030 


IEDQ11 


1050 


TED012 


105F 


TRD013 


1060 


TFDQ14 


2260 


TFD015 


226* 


TEDC16 


2740 


TBDQ17 


274F 


IEDQ18 


ITA2 


TEDQ19 


ZSC3 


TEDC20 


TTYA 


TEDQ21 


TTYE 



978 



20 


(14) 




4 


24 


(18) 


DCPBUEL 


2 


26 


(1A) 


DCBDSORG 


2 


28 


<1C) 




1 


28 


(1C) 


tCPIOBAD 


4 


32 


(20) 


DCBTHPES 


1 



TED022 TTYC 

TEDQ23 6BTT 

TEDQ24 ASCI 

TEDQ25 EBCD 

1113026 EC41 

TEDQ27 IB41 

IEDC28 CR41 
user 

table user table 

36 (24) ECPEIOBX 1 Extended TOE index (size of an 1CB) 

36 (24) DCEEXIST 4 Address of the exit list 

T)TqECT ACC ESS STO PAGE DEVICE MESSAGE 
QUEUE TWTFPERCi, CHEC KPCIN '! DATA-SIT 
tv^ERTACE. MESSAGE LOGGTNG INTERFACE, 
1*211 S M TON , PPCGPAM.TNTEPEftCE 

Reserved 

Lenqth of the buffer 

Data Set Organization 
Byte - Code = TQ 

Reserved 

Before open - address of the AVT 

Percentaqe of the nonreusable disk 
messaqe queue records to be used 
before a flush closedown of the 
systero is initiated 

32 (20) ECBEODAD 4 Messaqe loqqinq - work area used 

as a EECB pointer; 
application proqram - address 
of user end-of-f ile routine 

36 (24) ECBRECEM 1 Record format 

36 (24) DCPEXIST 4 Address of the exit list 



^FOUNDATION SEGMENT-BEEORE OPEN 
40 (28) DCBPDNAM 8 Data set name 

48 (30) DCBOELGS 1 Elaqs used by OPEN: 

Bits Value Meaning 

0,1,2, Reserved 
4,5,6 
3 X'10* Cpen has been successfully 

completed 
7 x*01* DCE is beinq processed by I/O 
support routine 

49 (31) ECBIEIG 1 Used by IOS for error conditions 
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Offset 


Name 


Ely teg 


description 




50 (32) 


DCEMAC? 


2 




Macro instruction reference: 










Bits Value 


Weanino 






Byte 


1 


0,2,3, 
4,5,6,7 
1 X'40« 


Reserved 
GET 






Byte 


2 


0,2,3, 
4,5,6,7 

1 x'40« 


Feserved 

PTJT 



40 


(28) 


DCBTIOT 


2 


42 


(2M 


DCPMACRF 


2 


4 4 


(2C) 


ECPIFLGS 


1 


45 


(2D) 


TCEDEPAD 


3 


48 


(30) 


DCPOFLGS 





FOUNDATION SEGMENT-AFTER OPEN 

Offset of the DD entry from beginning 
of the TIOT 

Same as DCBMACR before OPEN 

Same as DCBIFIG before OPEN 

Address of DEE 

Same as DCBOFIGS before OPEN 



LINE GRCOP EXTENSION 

Address of Special Characters Table 

Count of invitation lists 

Before open - numerical value of the SCT 
After open - count of units for one buffer 

Size cf all buffers used for this line group 

4 one-byte values (zero default value) 

Number of bytes reserved in the buffer 

receiving the first incoming segment 

of a message 
byte 2 Number of bytes reserved in all buffers 

except the one containing the first 

segment of a message 
bytes 3-4 Reserved 

60 (3C) CCBINVLI 4n times 4-byte address for each (n) invitation 

list 

Bits Value Weaning 

0,1, Feserved 

3,5, 

6,7, 

2 off r A, 1 

4 off r ,A 1 

2 on f B, 1 

4 en T ,B 1 

p vtes 2-4 Reserved 



49 


(31) 


DCBSCT'AD 


3 


52 


(34) 


ECETLCT 


1 


53 


(35) 


DCFUNTCT 


1 


54 


(36) 


ECBBUFST 


2 


56 


(38) 


DCPRESER 
tyte 1 


4 



980 



offset 



Name 



Bvtes 



Description 



49 (31) 
52 (34) 



53 (35) 



DCEOPTCD 



MESSAGE QUEUES/CEECKPOINT EXTENSION 



Reserved 
Code tyte: 
Bits Value 



X'20' 
X»02» 
X«01» 



Reserved 



Meaning 

Checkpoint 

Nonreusable disk queues 

Reusable disk queues 



MESSAGE LOGGING EXTENSION 



48 


(30) 


DCEREAD, 
ICPWFT^E 


4 


Address of the BEAD or WRITE 
module 


52 


(34) 




20 


Reserved 


72 


(48) 


ECPNCP 


1 


Number of Write operations 
that can be performed 


73 


(49) 




15 


Reserved 



48 (30) 

^2 (34) 

52 (34) 

56 (38) 

6 (3C) 

6 2 (3E) 

64 (40) 

8 2 (52) 

84 (54) 



APPLICATION PROGRAM EXTENSION 
4 



DCEREAD, 
TCPWRTTE 
DCEGET,DCBPUT 

TTCEOPTCD 

CCRCWECK 

ECESYNAE 



ECEBL*SI 



ECBI*ECL 

DCECNTRL, 

DCENOTE, 

tCEPOI*JT 



1 
4 
4 

2 

2 

18 

2 



Address of the READ or WRITE 

module 

Address of the GET or PUT module 

Opticn codes 

Address of the CHECK module 

Address of the user synchronizinq 
routine 

Reserved 

Maximum block size 

Reserved 

Loqical record lenqth or block size 

Address of the CNTPL 
or the NCTE/PCTNT 
module 
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DATA EXTENT BICCF 

m he Data Extent Block (DEB) is a fixed length control block with a 36-byte prefix. The 
DEB describes the extents of the data set with which the DEB is associated. The DEB 
contains such addresses as the DCB, the UCB, and the TCB. The number of extents 
associated with the data set is also in the DEB, For line groups, the DEB contains the 
number of lines in a line group and with which line number the data set is used. For a 
message gueue, the DEB contains the number cf extents of the data set and their size. The 
Data Extent Block prefix contains the addresses of the data set appendaqes (the PCI 
Appendage, the Channel End Appendage, and others) . 

The address of the DEBTCBAD field of the Data Extent Elock is in the DCEEEEAE field of 
the Data Control Elock. The address of the beginning cf the DEB prefix is at a 
displacement of -36(-X'24M from the address of the DEBTCEAD field. Storage is allocated 
for and the DEB is initialized at open time. 

H°t§* The displacements on this control block dc not agree with the TDEBD macro, which has 
the relative zero displacement at EEBEOEA. The disk messaqe gueues routines use the TDEBD 
macro onsets. The AVTACEBN and AVTADEBP fields of the TCAM AVT contain the address of 
the DEBEOEA field of the DEB. 

^he figure below is the format of the DEB prefix and the Data Extent Block itself; 
*escrit>tions of the fields follow the illustration. 
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IEDQDEB 



-36 (-24) 


DEBEOEA 

Address of the End-of-Extent Appendage 


-32 (-20) 


DEBSIOA 

Address of the Start I/O Appendage 


-28(-1C) 


DEBPCIA 

Address of the PCI Appendage 


-24 (-18) 


DEBCEA 

Address of the Channel End Appendage 


-20 (-14) 


DEBXCEA 

Address of the Abnormal End Appendage 


-16 (-10) 

DEBWKARA 

I/O Support Work Area 


-15 (-F) 

DEBDSCBA 

Address of the DSCB 




-8 (-8) 


DEBDCBMK 

DCB Modification Mask 


-4 (-4) 


DEBLNGTH 

Length of the DEB in Double Words 


(0) DEBNMSUB 

Number of OPEN Subroutines 


I 

| DEBTCBAD 

' Address of the TCB 


4 (4) DEBAMLNG 

Length of Access Method Section 


DEBOEBAD 

Address of the Next DEB 


8 (8) DEBOFLGS 
Data Set Flags 


1 

I DEBIRBAD 

' Address of the IRB 


12 (C) DEBOPATB 

Type of I/O 


■ DEBSYSPG 

Address of the First IOB in the System Purge Chain 


16(10) DEBNMEXT 

Number of Extents 


1 

1 DEBUSRPG 

Address of the First IOB in the User Purge Chain 


20(14) DEBPRIOR 
Zero 


1 

I DEBECBAD 

i Address of the Parameter List to-Find the Purge ECB 


24(18) DEBPROTG 

Protection Key DEB ID 


1 

I DEBDCBAD 

1 Address of the DCB 


28 (1C) DEBEXSCL 
Extent Scale 


1 

| DEBAPPAD 

i Address of the I/O Appendage Vector Table 


32 (20) DEBDVMOD 
Device Modifier 


1 

| DEBUCBAD 

1 Address of the UCB 
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0_ffS€ 


t 


.Name 


Bytes 


-36 


r-24> 


DFBEOEA 


4 


-32 


[-20) 


DFESTOA 


4 


-28 


(-1C) 


DFEPCIA 


4 


-24 I 


-18) 


DEECEA 


4 


-20 


-14) 


DEBXCEA 


4 


-16 


r-io) 


DFEWKAFA 


1 


-15 < 


r--p) 


DEEDSCBA 


7 


-8 I 


-8) 


DEEDCMK 


4 


-U 


r-4) 


DEFLNGTH 


4 





0) 


DEENMSUB 


1 





[0) 


DEETCPAD 


4 


4 I 


4) 


DEEAMLNG 




4 


[4) 


EEEDEFAD 


4 


8 


f8) 


DFEOFIGS 


1 


9 ( 


8) 


DEBTFDAD 


4 


12 


[C) 


PEEOPATE 


1 


12 | 


C) 


DFPSYSPG 


4 


16 


[10) 


DEENMEXT 


1 


16 


10) 


DEPUSP^G 


4 


20 


[14) 


DEEP^IOP 


1 


20 


f14) 


DEBECBA 


4 


24 


(18) 


DEPPFOTG 




2a 


[18) 


DEEDCBAD 


4 


29 


r lC) 


EEEEXSCL 


1 



Description 

Address of End-Of-Extent Appendage 

Address of Start I/Q Appendage 

Address of PCI Appendage 

Address of Channel End Appendage 

Address of Abnormal and Normal line End Appendage 

I/O Support work area 

Address of DSCE 

ECB modification mask 

length of the DEE in doublewords 

Number of OPEN subroutines 

Address of the TCB 

length access method section 

Address of the next DEB 

Data set flags 

Address of the IEB 

Type of T/O 

Address of the first IOB in the System 
Purge chain 

Number of extents 

Address of the first IOB in the User 
Purge chain 

Zero 

Address of the parameter list to find the 
purge FCE 

Protection Key DEB ID 

Address of the DCB 

Extent Scale 
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Offset 


Name 


Bytes 


2R (1C) 


PEEAPPAD 


4 


32 (20) 


DEEDVMOD 


1 


32 (20) 


DEEUCBAD 


4 



description 

Address of the I/O Appendaqe Vector 
Tatle 

Device modifier 

Address of the UCB 



T>ATA EVENT CCN1BCI BLOCK 

The Data Event Control Block (DECB) is created when a BEAD or WEITE macro instruction 
is expanded. It contains information about the input or output operation that is 
requested by the macro instruction. 

The fiaure below shows the format for the Data Event Control Block; descriptions of the 
fields follow the illustration. 



DECB 










0(0) 




DECSDECB 

Event Control Block 




4(4) 


DECTYPE 

Reserved 




6(6) 


DECLNGTH 

Length of Data or of Key and Data 


8(8) 




DECDCBAD 

DCB Address 




12(C) 




DECAREA 

Read/Write Area Address 




16(10) 




DECIOBPT 

Reserved 





HfJset 


Name 


EjYtes 


(0) 


tECSDECB 


4 


4 (4) 


DECTYPE 


2 


6 (6) 


DECLNGTH 


2 


3 (9) 


DECDCBAD 


4 


12 (C) 


BFCABTA 


4 


M (10) 


CECTOBPT 


4 



Description 

Event Control Elcck 

Reserved 

lenqth of key and data (if there is a key) ; 
lenqth of work area for an application program 

Address cf the DCB to which this 1/0 
request is related 

Address of the read/write area; address cf 
work area for an application proqram 

Eeserved 
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nc: T /0 D^VIC" 17 CBA FACTB.BTS7TCS TABU 

""he OS T/C Tevice Characteristics Table is a va 
fwelve-bvte entry for each direct access device in th 
information as the number cf cylinders, the number 
for each intermediate record on the track, and the to 
record. The OS T/O device Characteristics Table is u 
routine (ICGC1949) to obtain data about the speci 
checkpoint data set. The table is also used by the D 
f' r GG01930) to determine the number of tracks per cy 
ooened (to determine whether the device is a 2311 or 



riable length table that contains one 
e system. The table contains such 
of tracks per cylinder, the overhead 
lerance factor for each intermediate 
sed by the Checkpoint Disk Allocation 
fie direct access device used for the 
isk Message Queue Open - 1 routine 
linder for the current data set being 
a 2314) . 



The address of the OS I/O Device Characteristics Table is in the CVTZDTAB field of the 
r 'VT. Th° Unit Control Block contains the irdex tc the specific entry in the table. 

Storaae is allocated for the OS T/0 Device Characteristics Table and it is initialized 

at OS TT5 I time. 

m he fiaure below is the format of one entry in the OS I/O Device Characteristics 
m able; descriptions of the fields follow the illustration. 



IEDQDCTD 



0(0) 

Reserved 


1 (1) 

DCTCYL 

Cylinder Count 


2(2) 

DCTRACKS 

Number of Tracks Per Cylinder 


4(4) 

DCTBYTE 

Number of Bytes Per Track 


6(6) 

DCTINTRO 

Overhead 


7(7) 

DCTLASTO 

Overhead 


8(8) 

DCTKEY 

Overhead 


9(9) 

Reserved 


10(A) 

DCTOLERN 

Tolerance Factor 



<~>f fs 


St 


Name 


Bytes 


n 


(0) 




1 


1 


(1) 


DCTCYL 


1 


2 


(2) 


DCTRACKS 


2 


4 


(4) 


DCTBYTE 


2 


6 


(61 


DCTINTRO 


1 


7 


(7) 


DCTLASTO 


1 


8 


IB) 


DCTKFY 


1 


9 


( Q ) 


DCTOLEBN 


1 


10 


(A) 


BCT0LFPN 


2 



Description 

Beserved 

Number of cylinders 

Number of tracks per cylinder 

Number of bytes per track 

Cverhead for each intermediate 
record 

Cverhead for the last record 
en a track 

Cverhead if keys are not used 

Beserved 

Tolerance factor for each 
intermediate record 
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BUFFER PREFIX 



First buffer of a message: 

Offset 

1 



8 



12 (C) 



13(D) 16(10) 18(12) 20(14) 



21 (15) 



24(18) 26 (1A) 



29 (1D) 32(20) 35(23) 



38 (26) 40 (28) 



Key 
PRFKEY 



CCWOP 
Code 



PRFOPCDE 



QCB address 
PRFQCBA 

or 

Next 
address 
to be 
transferred 



PRFIOADR 



Priority 
PRFPRI 



ccw 

flags 



PRFFLAGS 



Link field 
PRFLINK 



Unused 



CCW 
count 



PRFCOUNT 



Link to 
next 
unit and 
TIC CCW 



Number 
of units 
in this 
buffer 



PRFTIC PRFNBUNT 



LCB 
address 



PRFLCB 



Source 
offset 
in the 
Termname 
Table 



PRFSRCE 



Size of 
data in 
this 
buffer 



PRFSIZE 



Status 
byte 



PRFSTAT1 



Pointer to 
additional 
records on 
disk 

PRFXTRA 
or to the 
current 
record in 
main storage 

PRFCORE 



Scan 

pointer 

offset 



PRFSCAN 



Pointer to 
next buffer 
of this 
message if 
not last 
buffer 
PRFNTXT 
or text queue- 
back chain if 
last buffer 

PRFTQBCK 



Pointer 

to the 

first 

unit of 

the 

current 

buffer 



PRFCRCD 



Pointer 

to the 

first 

buffer 

of the 

next 

message 



PRFNHDR 



Queue-back 
chain of 
the first 
buffers of 
messages 



PRFHQBCK 



Input 

sequence 

number 



PRFISEQ 



Destination 
offset 
in the 
Termname 
Table 



PRFDEST 



■RCB- 



The first 12 bytes are not placed on the 
queue for the message queues data set. 



12 (C) 



42 (2A) 



Unit control area 



First buffer prefix 
PRFSUNIT 



Start of the message header or data 
PRFSHDR 



First or 30-byte Buffer Prefix 



Subsequent buffer of a message: 
Offset 






1 


4 


5 




8 


12(C) 


13(D) 


16 (10) 


18 (12) 


20(14) 


21 (15) 


24(18) 


26 (1A) 


29 (1D) 


32 (20) 


Key 


QCB address 


Priority 


Link field 


Link to 


Number 


LCB 


Source 


Size of 


Status 


Pointer to 


Scan 


Pointer to 


Pointer 


Pointer 


PRFKEY 


PRFQCBA 


PRFPRI 


PRFLINK 


next 


of units 


address 


offset 


data in 


byte 


additional 


pointer 


next buffer 


to the 


to the 










unit and 


in this 




in the 


this 




records on 


offset 


of this 


first 


first 










TIC CCW 


buffer 




Termname 


buffer 




disk 




message if 


unit of 


buffer 


or 


Next 


or 










Table 






PRFXTRA 




not last 


the 


of the 




address 






CCW 














or to the 




buffer 


current 


current 


CCWOP 


to be 


CCW 


Unused 


count 














current 




PRFNTXT 


buffer 


message 


Code 


transferred 


flags 


















record in 
main storage 




or text queue- 
back chain if 
last buffer 






PRFOPCDE 


PRFIOADR 


PRFFLAGS 




PRFCOUNT 


PRFTIC 


PRFNBUNT 


PRFLCB 


PRFSRCE 


PRFSIZE 


PRFSTAT1 


PRFCORE 


PRFSCAN 


PRFTQBCK 


PRFCRCK 


PRFCHDR 


-^ rcb k 




-^ 












The first 12 bytes are not placed on the 




^^ 












queue for the message queues data set. 

















1 


2(C)^"^^ 






35 (23 


_____ — 





















Unit control area 



Subsequent buffer prefix 
PRFSUNIT 



Continuation of message header or start or 
continuation of message data 



PRFSTXT 



Buffer Prefix 
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IEOQPRF 

0(0) 



PRFRCB 

Resource Control Block 



PRFOPCDE, PRFKEY 

OP Code or Key 



1 (1) 



PRFIOADR, PRFQCBA 

QCB Or Next I/O Address 



4(4) 



PRFRCB 

(Com.) 



PRFFLAGS, PRFPRI 

CCW Flags Or Priority 



5(5) 



PRFLINK 

Buffer Link Field 



1(6) 



PRFCOUNT 

CCW Count 



8(8) 



PRFTIC 

TIC CCW Or Link to Next Unit 



12(C) 

PRFSUNIT, PRFNBUNT 

Number of Units in this Buffer 



13(D) 



PRFLCB 

LCB Address 



16(10) 



PRFSRCE 

Termname Table Offset for Source of Message 



18(12) 



PRFSIZE 

Size of Data irnihis Buffer 



20 (14) 



PRFSTAT1 

Status Byte 



21 (15) 



PRFSTSO 

Start of TSO Data 



PRFXTRA 

Address of Additional Records 



PRFCORE 

Address of the Current Record 



24(18) 



PRFSCAN 

Scan Pointer Address 



26(1 A) 



PRFNTXT 

Next Text Segment Address 

PRFTQBCK 

Text Queue-Back Chain 



28 (1C) 

PRFNTXT, PRFTQBCK 

(Cont.) 



29 (1D) 



PRFCRCD 

Current Segment Address 



32 (20) 



PRFNHDR 

Address of_the NextJHeader Segment 
"~ PRFCHDR 

Address of the Header of the Current Message 



35 (23) PRFSTXT 
Start of Text 



PRFHQBCK 

Header Queue-Back Cha i n 



36 (24) 



PRFHQBCK 

(Cont.) 



38(26) 



PRFISEQ 

Input Sequence Number 



40 (28) 



PRFDEST 

Termname Table Offset for Destination of Message 
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offset 


Name 


(0) 


pp-cTJCE 


(0) 


FR-POPCDE 



Bytes 



(0) 

1 (1) 



1 (D 

4 («) 

4 (4) 

.5 (5) 

6 (6) 

■8 (8) 

12 (C) 

12 (C) 

13 (P) 
16 (10) 

18 f 12) 

20 (14) 



PFFKFY 
r F*TOADP 



PFFOCPA 

FFFFIAGS 

FPFPRI 

PPFLINK 

FPFCOUNT 

PPFTIC 

opFSUNTT 

FP'NBHST 

FPFtCE 
FRFSPCE 

PFFSTZE 
PRFSTAT1 



3 
2 

2 
1 

N ame 

PRFCNCLN 

PRFCNCIF 



Description 

Resource Control Block 

CCW Operation Code, 
when I/O is beinq 
performed 

Element key of the buffer 

Next data byte 
(address) to be 
transfered (read) , 
when I/O is beinq 
performed 

QCB address, when the 
buffer is an element 

CCW flaqs, when I/O 
is beinq performed 

Priority of the buffer, 
when it is an element 

Link field of the buffer, 
unused when a CCW 

CCW (Pead/Write) 
count 

TIC CCW & link to the 
next unit 

Start of the loqical 
unit 

Number of units in this 
buffer 

Pointer to the LCE 

Termname Table offset for 
the source of the messaqe 

Size cf data in this buffer 

Status byte: 

BjLts Value Meaning 

X»80' 



All X»FF« 

on 
PFFE W MGN 1 X»40' 
PBFF«MGF 1 X'EF' 

Off 
PPFITCPN 2 X'20' 
PRFITCPF 2 X'DF» 

Off 
P^FTSEU* 3 X» 10» 
PB^DUFLN 4 X»08» 
PRFDUPIF 4 X«F7» 

Off 
PRFEOFN 5 X»04» 
*RFFOFF 5 X'FB* 

Off 
PP'LOCK'PRFqFN 



Cancel messaqe has 

been executed 

Mask to specify that the messaqe 

is not canceled 

Error messaqe is in this buffer 

Mask to specify that this is not 

an error messaqe buffer 

Messaqe is beinq held 

Mask to specify that the messaqe 

is not beinq held 

This is a TSO buffer 

Duplicate-header buffer 

Mask to specify an oriqinal 

buffer 

SETEOF was executed 

Mask to specify that SETEOF 

was not executed 

10CK executed this messaqe 
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PFFNLSTN 


6 


X'02« 


PFFNT.STF 


6 
Off 


r?c 


PFENHDFN 


7 


X f 01' 


PFFNHPFF 


7 

Off 


X'FE* 



Not the last buffer of a messaqe 

Mask to specify the last 

buffer of a messaqe 

Not the first buffer of a messaqe 

Mask to specify the first 

buffer of a messaqe 



21 (15) PFFS^SO Start of time sharinq data 

21 (15) PPFXTFA 3 Pointer to the additional records 

21 (15) P^TCOBF 3 Pointer to the current record 

24 (18) FF^SCAN 2 Scan pointer address 

26 (1M ^F^NTXT 3 Pointer to the next text seqment 

26 (1A) PFFTOBCf 3 Queue-back chain of text segments 

29 (1D) PFFCFCD 3 Pointer to the current seqment 

^2 (20) PPFNHDF 3 Pointer to the next header 

seqment 

32 (20) PFFCHPF 3 Pointer to the header of 

the current messaqe 

35 (23) PF.^STXT Start of text data in 

a sutsecruent buffer 

35 (23) F^HOPCK 3 Queue-back chain of 

header seqments 

38 (26) PFFTSFQ 2 Input sequence number 

40 (28) PPFDEST 2 Termname Table offset 

for the destination 
of the messaqe 



DISK DATA AREA 

m ^<? *isk record is composed of count, key, and data. The count field is set "at disk 
initialization time. when a unit is used as a disk buffer,. the data portion of the disk 
r<=cor<3 comes from the first six bytes of the unit, and the key portion of the disk record, 
which contains the text of the messaqe itself, comes from that portion of the unit 
followina t^e twelve-byte unit prefix. ^he risk Data Area is the first six bytes of the 
unit prefix. When the unit is a disk buffer or is qoinq throuqh the channel, the address 
o* the ^isk ^ata Area is in the Bead or Write Data CCW in the Channel Proqram Block. The 
address of the Disk Data Area is usually also in the CPPXREA field of the Channel Proqram 
n lock. 

Storaqe is allocated for the Disk Data Area at IEDQXA execution time. At that same 
■t-ime, the Disk Data Area is initialized tc zeroes. The actual data in the Disk Data Area 
is olaced there either by Destination Scheduler (IFDQHM) or by Reusability-Copy 

The first six bytes of the IEDQDATA DSECT. defines the data portion of the disk record 
(the Disk Data Area). The last twc bytes cf the DSECT are bytes. seven and eiqht of the 
unit prefix and are used only in main storaqe (they are not written to disk and are, 

therefore,: not part of the Disk Data Area). 

The fiqure below is the format of the IFDQDATA DSECT; descriptions of the fields 
follow the illustration. 



Data Area Layouts 991 



IEDQDATA 










0(0) 

DAT FLAGS 

Flag Byte 


1 (D 




DATFEFO 

FEFO Pointer 




4 (4) DATCOUIVIT 
Text Byte Count 
DATSEQOT 

Output Sequence Number 


6<6) 




DATSCAN 

Scan Pointer Save Area 



Offset 
(0) 



Name 
DATFLRGS 



1 (D 
6 (6) 



Bjtes 

1 
Name 
DATNPPFX 

DATSFNT 

DATCNCID 

DATLOSTN 



BATT'FFO 



DPTCOUNT 



DATSFOOT 1 



SftTSCAV 



Description 

'laq byte; 

Bits Value Meanin g 





1 
Off 

1 

1 
Off 

2 

2 
Off 

3 
Off 



X'80' 
X»7F' 

X'40' 
X'BF« 

X'20< 
X'DF' 

X'EF' 



C'C 



No prefix in record 
Mask to specify that a 
prefix is in the record 
Kessaqe has been serviced 
Mask to specify that the 
message has not been serviced 
Message is canceled 
Mask to specify that the 
message is not canceled 
Mask to specify that a 
message is lost from 
main storage queue 
IGG019FP has canceled 
an unused header 



FE^C pointer to the next message to be 
completely received for this destination 

^or text records only, the number of 
bytes of significant text in this 
record key field, or zero if not the last 
text record 

For header records only, the sequence- 
out number 

Saves the scan pointer (number of reserve characters 

remaininq) while buildinq a buffer 

from this unit; not used in a main storage 

disk message gueue data set and not part 

of the Disk Data Area 



APPLTCA^TQW PFQGFflM PA^A A^FAS 

■°F0CFSS CCNTFOI EtOCF 

T he Process Control Block (TFDQPCE) is a fixed lenqth table that serves as a named control 
block to permit inter-reqion communications between application programs and the message 
control proqram. There is one Process Control Block per application proqram. 

The Process Control Block can be addressed by several means. The PEPCBAD field of 

orocess entry work area contains the address of the PCE, as do the 1CBDCBPT field of the 

application prcqram LCB, the DEBPCPAD field of the Data Extent Block, and the QCBDCBAD 
field of the Destination QCB. 

storaqe is allocated for the Process Control Block at assembly time for the message 
control proqram. The control block is initialized partially at assembly time for the MCP 
and partially at the application proqram cpen time. 
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The fields PCBBTJFTN anri PCBBUEO take up one byte in main storage. PCBBUFIN represent? 
the first four bits of the byte and indicates the initial buffer request for POT or WRITE, 
^CBBTFO represents the last four bits and indicates the initial buffer request for a 
GET/B^RD operation. 

The fiqure below is the format of the Process Control Block; descriptions cf the 
fields follow the illustration. 



IEDQPCB 



i 



a 



0(0) 



Reserved 



8(8) 



PCBRTQCB 







Message Retrieval QCB 




20(14) PCBBUFIN 
PUT/WRITE Buffer Request 

PCBBUFO 

Max No. of Full QCB Buffers 


21 (15) 


PCBMH 

Address of the Message Handler 


24 (18) 

PCBUCNT 

Use Count 


25(19) 


PCBLINK 

Link Field 


28 (1C) 

PCBBUFMX 

Read-Ahead Buffer Limit 


29 (1D) 


Reserved 


32 (20) 


PCBLCBAD 

Address of the Line Control Block 


36 (24) 

PCBTJID 

TSO Job Identifier 


38 (26) 

PCBCKPT 

Checkpoint Offset 


40 (28) 


PCBTCBAD 

Address of the Task Control Block 


44 (2C) 

PCBOFLG 

Flag Bit 


45 (2D) 


Reserved 


48(30) 

Reserved 


49(31) 


Reserved 


52 (34) 

Reserved 


53 (35) 


PCBUNTCT 

Unit Count 


54 (36) 

PCBBFSZE 

Buffer Size 


56 (38) 

PCBRSERH 

Header Buffer Reserve 


57 (39) 

PCBRSERT 

Text Buffer Reserve 


58 (3A) 

PCBORC 

Open Return Code 


59 (3B) 

Reserved 


60(30) 




PCBV 


VRKA 





Operator Control/Application Program Interface Work Area 



s 



88 (58) PCBEND 

End of the PCB 
PCBSIZE 

PCB Size in Bytes 
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Offset Name Bytes Description 

(0) 8 Reserved 

P (8) PCEPTOCB 12 Messaqe Retrieval QCE 

20 (14) PCBBUFIN 1 Initial buffer request for 

PUT or WPTTE 

20 (14) PCBBUFO 1 Maximum number of full buffers 

on the Read-ahead QCB 

21 (15) FCEMH 3 Address of the message handler 
24- (18) PCBUCNT 1 Use ccunt 

25 (19) PCBLINK 3 Link field 

28 (1C) PCBBUFMX 1 Read-Ahead buffer limit 

29 (1D) 3 Reserved 

32 (20) PCBLCPRD 4 Address of the Line Control Block 

^6 (24) PCFTJTD 2 TSO icb identifier 

38 (26) PCBCKPT 2 Checkpoint offset 

40 (28) PCBTCBAD 4 Address of the Task Control Block 

for the related application proqram 

44 (2C) PCEOFLG 1 Flaq byte - bit settinqs for 

this field are as follows: 

N ame Bits Value Meaning 

PCBRORIN X'80' Application proqram 

can be rolled out 
PCBRORI* X«7F' Mask to specify that an 
Off application proqram 

cannot be rol t led out 
PCBTSON 1 X'40' Application proqram is TSO 
PCBTSOF 1 X'BF' Mask to specify that an 
Off application proqram is 

not TSO 
PCBCKPTN 2 X'20' Environment checkpoint 

has been taken in the MCP 
PCBCKPTF 2 X'DF' Mask to specify that an 
Off environment checkpoint 

has not been taken in the MCP 
PCBRETVN 3 XMO' Subsequent retrieval 
PCBRFTVF 3 Mask to specify no 

Off subsequent retrieval 

45 (2D) 3 Reserved 
U8 (30) 1 Reserved 
49 (31) 3 Reserved 
52 (34) 1 Reserved 
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offset 



Name 



Bytes 



Description 



bj 


(35) 


PCEDNTCT 


1 


5H 


(36) 


PCRBESZE 


2 


56 


(38) 


PCBRSERH 


1 


57 


(39) 


PCBRSERT 


1 


58 


(3A) 


FCEORC 


1 


59 


(3B) 




1 


60 


(3C) 


PCBWRKA 


28 


88 


(58) 


PCEEND 


1 


88 


(58) 


PCESTZE 


1 



Unit Count 

Buffer size 

Header buffer reserve 

Text buffer reserve 

Open return code 

Reserved 

Operator Control/Application 
Proqram interface work area 

End of the PCE 

Size in bytes of the PCB 



DATA EXTEND BLOCK EOE APPLICATION PROGRAMS 

There is a special application proqram Data Extent Elock (DEB) that has 
the same DSECT name, IEDODEB, as the reqular TCAM DEB. 

The figure belov is the format of this special DEB and descriptions of 
the fields follcw the illustration. 



IEDQDEB — Application Program 



0(0) 

DEBT AMID 

TCAM DEB Identifier 


1 (1) 


DEBTCBAD 

Address of the TCB for this DEB 


4(4) 

Reserved 


5(5) 


DEBDEBAD 

Address of the Next DEB 


8(8) 

Reserved 


9(9) 

DEBPCBAD 

Address of the Process Control Block 


12(C) 

DEBTAMOS 

Process Entry Termname Table Offset 


14(E) 

DEBSOWA 

Size of Locate Mode Work Area 


16(10) 

DEBTAMPP 

Post Pending Flag Byte 


17 (11) 


DEBQCBAD 

Address of Read-Ahead QCB 


20 (14) 

Reserved 


21 (15) 

DEBTAMWA 

Address of TCAM Access Method Work Area 


24 (18) 

Reserved 


25 (19) 


DEBDCBAD 

Address of the DCB for this DEB 


28 (1C) 

Reserved 


29 (1D) 


DEBLCMWA 

Address of Locate Mode Work Area 


32 (20) PEBEND 
End of DEB 
DEBSIZE 

Size of DEB 
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Offset 

(0) 

1 (1) 

5 (5) 

8 (8) 

9 (9) 

12 (C) 

1U (F) 

16 (10) 

17 (11) 

20 (14) 

21 (15) 

2 U (18) 
25 (19) 
28 (1C) 
20 (1D) 

32 (20) 

3 2 (20) 



Name 
DFETAMT0 

DEETCBAD- 
DFEDEBAD 

DEBPCBAD 

DFBTRMOS 

DERSOWA 

DEBTAMPP 

DEEQCEAD 

DEETAMWA 

DEBDCBAD 

DEELCNWA 

BEEEND 
DEESIZE 



Description 

TCAM DEB identifier 

Address of the TCE fcr this DEB 

Reserved 

Address of the next DEB in the 
same task 

Reserved 

Address of the process control block 
for this task 

Offset to the Termname Table entry 
for tie correspcndinq process entry 

Size cf the Locate Mode Work Area 

Post-pending flaq byte 

Address of the Bead-ahead QCB 

Reserved 

Address of the TCAM Access Method 
Work Area 

Reserved 

Address of the DCB fcr this DEB 

Reserved 

Address of the Locate Mode Work 
Area 

End of the DEE indicator 

Size of the DEB in bytes 



ACCESS METHOD WO*K AREA 

•"he access method work area (IED0WRKA) is a variable lenqth table- that provides 
intermediate stcraqe fields, pointers to control blocks, switches, and space for a work 
area. When a DCB in an application proqram is belnq opened, the GET/PUT and REAE/WRTTE 
Ooen Executor (TGG01946) allocates main stcraqe for and initializes the access method work 

area. 

The Open Executor puts the address of the work area in the DEBTAMWA field of the Data 
p xtent Block (SEE) for the application prcqram. The address of the DEB is in the ECBDEBAD 
field in the .associated Data Control Block (DCB) in the application proqram. The DEB 
address is also in the PEWADEB field of the process entry work area in the MCP so that 
routines in the MCP can refer tc the access method work area by first examininq the DEB. 



The acces 
user specifi 
the fullword 
such a routin 
The status i 
method work a 
indicators f 
■fourteen-byte 
work units a 
b.yte. when t 
work area ove 



s method 
ed a SYN 
field GWA 
e, the fi 
ndicators 
rea when 
or the 
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re out of 
his bit i 
rf low. 



work area is va 

AD exit routine 

STAT/PWASTAT is 

eld GW&STA'VPWA 

are in a fourt 

required by 

SYNAD routine. 

hen this bit is 

seauence. The 

s set to 1, an 



riable in lenath depending upon whether or not the 

If the user does not specify a SYNAD exit routine, 

set tc zero (0). If, however, the user does specify 

STAT contains the address of the status indicators. 

een-byte field that is added to the end of the access 

a SYNAD routine request. There are two status 

The first is Sit zero of the second byte of the 

set tc 1 , the command issued is rejected because 

second status indicator is bit one of the thirteenth 

incorrect lenqth has been specified, thus creatinq a 



The fiqure below shows the format of the Recess method work area; descriptions of the 
fields follow the illustration. 
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IEDQWRKA 



0(0) 


PWASAVE 
GWASAVE 

Address of User's Register Save Area 




4(4) 


PWAPEWA 

Address of the Process Entry Work Area 




8(8) 


GWAPEB 
Address of a Part-Empty Buffer 




12(C) 


PWASTART 

Address of the First Byte of Data in the Work Area 






GWAMOVE 

Address of the Next Byte in a Buffer to be Moved 




16(10) 


PWACKPT 
GWACKPT 

Address of the User's Checkpoint Routine 




20(14) 


GWAPEWA 

Address of the Next Empty Byte in. the User's Work Area 




24(18) 


PWAECB 

PUT/WRITE ECB 




GWAECB 

GET/READ ECB 


28 (1C) 


PWAELEM 









VSVVMCi-EIVI 

Special AQCTL Element 




48 (30) 




PWALIST 







— 


GWALIST 

A&CTL Parameter List 

MOVEAD 

Address of the Field to be Moved 


, 


52 (34) 




TARGETAO 

Address of Where the Data is to be Moved 




56 (38) 

PFLAG 

End-of-List Indicator 


57 (39) 


LENGTHAD 

Address of the Length of the Field 




JB0 (3C) 




PWASAVA 

PUT /WRITE Save Area 









gwasaVa 

GET/READ Save Area 






132 (84) PWA 
PUT /WRITE Reader Needed 


^FLG 

EOM Processed GET/READ 


134 (86) 

Reserved 


136 (88) 


IOBPSAVE 

Address of a Partly Empty Buffer Unit 






140 (8C) 




GWASTAT 

Address of GET/READ Status Indicators 

PWASTAT 
Address of PUT/WRITE Status Indicators 












144 (90) 


PWASOWA 
GWASOWA 

Size of the User's Work Area 


146 (92) pwACTL 

Work Area Contents 
Descriptor Byte 


147 l93 ' GWABDEL 

Record Delimiter 


148 (94) 


GWABUFL 

Size of an MCP Buffer 


150(96) PWAOPTCD 
GWAOPTCD 

General Switches 


151 (97) PWARECFM 
GWARECFM 

General Switches 
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152(98) 


GWALRECL 

Size of a Logical Work Unit 


154 (9A) 

PWAOFF 

Termname Table Offset for Message Destination 


156(9C) 


CTLADDR 

Address of the Work Area Control Byte 


160 (AO) 


GWASCAN 

Size of Field to be Scanned 


162 (A2) 

BUFCIMT 

EmptyTBuffer Counter 


164 (A4) 


IOBUSZE 

Count of Data in a Logical Buffer 


166 (A6K 

IOBPSZE 

Prefix Size Work Area 


168 (A8) 


IOBSRCE 

Termname Table Offset 


170 (AA) 

Reserved 


172 (AC) 


GWA 


RTVE _ 



T 



Message Retrieval Work Area 



s 



v ote; when there are two field names for cne field, those field names beqinninq with P 
are used when the user is codinq in PUT mode, and those field names beqinninq with G are 
used when the user is codira in GET mode. 



Offset 





(0) 





(0) 


4 


(4) 


8 


(8) 


12 


(C) 


12 


(C) 


16 


(10) 


16 


(10) 


20 


(14) 


24 


(18) 



Name 

PWASAVE 

G^ASAVE 

PWAPEWA 

GWAPEE 

FWASTAFT 

GWAMOVE 

PWACKPT 
GWRCKPT- 
GWAPEWA 

FWAECF 



Bytes 
4 
4 
4 
4 



Descri ption 

Address of the user reqister save area 

Address of the user reqister save area 

Address of the process entry work area 

Address of a partially empty buffer - the 
one fceinq used 

Address of the first byte of data in the 
user nork area 

Address of next byte to be moved in a 
buffer 

Reserved 

Reserved 

Address of next empty byte in user 
work area 

TUT/WETTE ECB 



998 



DJJset 


Name 


.IXtes 


24 


(18) 


GWAECB 


4 


28 


(1C) 


PVAEIFM 


20 


?8 


net 


GWAELFM 


20 


48 


(30^ 


FWALIST 


4 


U8 


(30) 


GWALTST^ 


4 


48 


(30) 


MOVFAD 


4 


S2 


(34) 


^APGETAD 


4 


^6 


(38) 


PFIAG 


1 


«?7 


(39) 


IFflGTHAD 


3 


60 


(3C) 


PWASAVA 


72 


60 


(3C) 


GWASAVA 


72 


132 


(84) 


PWAFIG 
PWAFIG+1 


2 


136 


(88) 


TOEPSAVF 


4 


140 


(8C) 


GWASTAT 


4 


140 


(8C) 


PWASTAT 


4 


144 


(90) 


PWASOWA 


2 


144 


(90) 


GWASOWA 


2 


146 


(92) 


PWACTL 


1 



Eits 



Description 

GET/PEAD ECB 

Special AQCTL element 

Special AQCTI element 

AQCT1 parameter list 

AQCTI parameter list 

Address of the field to be moved 

Address of the area into which data is to be moved 

Indicator of end of parameter list 

Address of the lenqth field of the parameter 
list 

PUT/WBTTE save area 

BEAB/CHECK save area 

X^O' header needed (PUT/WRITE) 
X'PO' EOH processed (GET/READ) 

Address of partially empty buffer unit 

Address of status indicators 

Address of status indicators 

Sire of user work area 

Size of user work area 

Work area contents descriptor byte - 
contains a value indicating whether 
the messaqe in the work area is the 
first, intermediate, or last segment of 
the messaqe. The followinq are 
the bit settinqs: 



Value 



0,1,2,3,7 X'P1' 
0,1,2,3,6 X«F2« 
0>1,2,3,6,X'F3' 
7 

X«40« 









1 


147 


(93) 


GWAPDEL 


1 


148 


(94) 


GWABUFL 


2 


150 


(96) 


PWAOPTCD 


1 
Name 
FIPSTPUT 



Meaning 

first seqment (header) 
last seqment (EOM) 
entire messaqe 

intermediate seqment 



End of record for GET/PUT - copied from 
the process entry 

Size cf MCP buffer 

General switch - bit settinqs as follows: 

Bits Value Weaning 



X»01« 



first-time switch for 
locate mode 
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Offset 

150 (96) 



Name 
GWflOPTCD 



151 (97) 
151 (97) 



152 (98) 

154 (9ft) 

156 (9C) 

160 (A0) 

1^2 (A2) 
164 r "(A4) 

1K6 (A6) 

1*8 (A8) 

1^0 (AA) 

172 (AC) 



PFflSECEM 
GWAFECFM 



GVALFFCI 
FFftOFF 

C" I A DDE 

GFBSCAN 

BUFCNT 
TOBUSZB 

TOBUSZB 

TOESFCE 

GWAFTVF 



E.ytes 

1 

Name 

TNMFFLG 
MSGFLG 

CTLBYTE 

EODADFIG 

FECDE.L 

RTV^LG 

PA^TBUF 

SYNADFIG 

1 

1 

Name 

FFT'PLG 

TNCWA 



Description 

General switch - bit settinqs as follows: 

Bits Value Meaning 

X'80' CPTCD=W (source terminal field) 

1 X*40' OPTCE=0 (message rather 

than record format) 

2 X'20« OPTCD=C (Control byte flag) 

3 XM0 f EODAD exit flag mask 

4 X'08» First- time F.ECDEL flag 

5 X'04' Fetrieve mode switch mask 

6 X'02' Fartially empty buffer left 

on main storage QCB 

7 X'01' DCEOPTCD bit which, if set, 

effects exit to SYNAD routine 

PDT/WFTTF - no bits set 

GBT/FEAD - bit settings are as follows: 

Bits Value Meaning 
5 X»04' Petrieve mode may be entered 
7 X'OV Incomplete work area 

Size cf logical work unit 

PUT Scheduler - Termname Table offset 
for message destination 

Address of work area control byte; 
address of PWACTL within the work area 

Size of field to be scanned 

Empty-buffer counter 

Count of data in a logical buffer - number of bytes 
in a tuffe'r unit 

Number of bytes in a buffer - prefix 
size work area 

Termname Table offset 

Reserved 

lessage retrieval work area 



ACCESS PNTPY WCFK AFEA 

The process entry work area (TEDQPEWA) is a fixed-length table in the message control 
program. This work area provides a logical extension of the process entry for the 
associated application program. The work area alsc provides storage for the control 
blocks for the GET and POT Schedulers. The function of the work area varies depending 
upon the functions of the GET or POT Scheduler. 

The address of the process entry work area is in the TFMSTAT field of a terminal entry 
when that entry has been generated by a TFFOCESS macro instruction. The address is also 
in the ^tf APEWA field of the access method work area in the associated applica-tion program. 

When a DCB in an application program is being opened, the OPEN/CLOSE subtask (IEDQEU) 
allocates main storage for and initializes the process entry work area. 

The figure below shows the format of the process entry work area; descriptions of the 
fields follow the illustration. 



1000 



IEDQPEWA 



J? 



(0) 



PEWARES 

Reserved 



1 



8(8) 



PEWAISZE 

Count of Idles Reserved 



12(C) 



PEAQCTL 

AQCTL Parameter List 



24 (18) 



PEWAECBA 

Address of the Application Program ECB 



28 (1C) 



PEWASOWA 

Work Area Data Length 



29 (1D) 



PEWAFLG 

General Flag Byte 



30 (1E) 



PEBFCT 

Buffer Limit 



32 (20) PEUNCT 

Units Per Buffer 



PEPCBAD 

Address of Process Control Block 



36 (24) 



PERCQCB 

Address of the QCB Associated with the ERB Below 



40 (28) 



Reserved 



44 (2C) 



PEWALCBA 

Address of the LCB 



48 (30) 



Reserved 



52 (34) 



PECBUF 

Address of First Empty Byte in Current Unit — for PUT 
Address of the Chain of Read-Ahead Buffers Not Processed by MH — for GET 



56 (38) 



PEERB 

Element Request Block 



80 (50) 



PEWAELEM 

Special Element 



96(60) 



PERAQCB 

Read-Ahead QCB 



108(60 



EOMSAVE 

Address of the Last EOM for GET 



PEWATIC 

Current Unit Address for PUT 



112(70) 



PEPSSTCB 

Put Sche duler S TCB 

PEGSSTCB 
Get Scheduler STCB 



120(78) 



PEWADEB 

Data Extent Block Address 



124 (7C) 



H 



PEGFSTCB 

Get FIFO STCB 



r 
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132 (84) 



PEWAPROC 

Address of the Process Entry 



136 (88) 



PESAVE 



DJtfsgt 


Name 


BY 





(0) 


FFWAFFS 


8 


8 


(8) 


PFWAISZE 


4 


12 


(C) 


PFAQCTL 


12 


24 


(18) 


PFWAECEA 


4 


28 


(1C) 


FFWASOWA 


2 


30 


(1F) 


PEWAFLG 


1 



«-p Register Save Area ""P 



Description 

Reserved 

Count of idle (reserve) characters reserved 

A OCT parameter list 

Address of the application program ECB 

Work area data lenqth 

General flaq byte - bit settings are as follows: 

For the GET Scheduler: 

Meaning 

.EPB tpcsted to the Disk I/O QCE 

Closedown in progress 

Need to tpost the application 

proqram EBB 

First-time Retrieve flag 

Buffer may be tposted to the 

message handler 

Retrieve mode 

31 (1F) PEPFCT 1 Buffer limit - number of buffers that may 

be on the Bead-ahead QCE at any one time 

32 (20) PFUNCT 1 Number of units per buffer - fixed per process 

entry 

33 (21) FFfCBAD 3 Address of the Process Control Block 

36 (24) PFTCOCB Address of the QCE associated with the 

EPB below 

40 (28) 4 Reserved 

44 (2C) PF^ALCPA 4 Address of the ICB 

48 (30) 4 Reserved 

52 (34) PFCBDF 4 Tf FUT Scheduler - address of the first 

empty byte in the current unit; GET 
Scheduler - address of the chain of read 
ahead buffers not processed by the messaqe 
handler 

56 (38) FFFRF 24 Element reguest block 

«0 (^0) PFWAJ5LEH 16 Special element 



Wage 


Bit Value 


ERBBTJSY 


X»80« 


CF1G 


1 X'40' 


POSTAP 


2 X'20' 


FIRST* 


5 X»04« 


MHOK 


6. X'02» 


RFLG 


7 X'OV 


1 


Buffer lira 



1002 



offset 


Name 


Pytes 


96 


(60) 


FFRAOCE 


12 


108 


(6C) 


FOMSAVE 


4 


108 


(6C) 


FFWATTC 


4 


112 


(7 0) 


PFFSSTCB 


8 


112 


(70) 


PFGSSTCB 


8 


120 


(78) 


PEWADEE 


4 


124 


(7C) 


PEGESTCB 


8 


132 


(84) 


FFX5APROC 


4 


136 


(88) 


F^SAVF 


56 



Description 

Read-ahead QCB 

Address of the last EOM for GET 

Current unit address for POT 

PUT Scheduler STCB 

GET Scheduler STCE 

Address of the Data Extent Block 

GET FIFO STCE 

Address of the process entry 

Register save area 



OPERATOR CONTROL TATA AFEAS 

OPERATOR CONTROL fiDDPESS VECTOR TABLE 

""he Operator Ccntro'l Address Vector 'T'able (IFDOOPC) is 

a fixed lenqth table that serves as a qeneral work area for the use of operator control. 

""he table is never referred to unless an operator control command is entered. 

nnce such a command is entered, the Operator Control Address Vector Table contains 

entry points for modules, two save areas, bit switches, pointers, and checkpoint element. 

The address of the Operator Control Address Vector Table is the AVTOCGET 
field of the Address Vector Table- 

Because the Operator Control AVT is an attached module, 
storaqe is allocated for the table at the time of execution of 
the INTRO macro. 
'"he table is initialized at assembly time. 

The Operator Control control mcdule work area is a table cf approximately 
400 bytes that is attached to the end of the Operator Control AVT 
at. a displacement of X'FI'. 
•"his area is not discussed below. 

The figure below is the format of the Operator Control Address 
Vector Table: descriptions of the fields fellow the illustration. 
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I EDQOPC 

0(0) 



OPCINPUT 

Address of Input Data 



4(4) 



OPCAVTAD 

Address of the TCAM AVT 



8(8) 



OPCDOUBL 

Doubleword Work Area 



16(10) 



OPCWORK 

Fullword Work Area 



20 (14) 



OPCEPS 

EPLOC for the IEDQG1 Module 



28 (1C) 



Reserved 



31 (1F) 

OPCCOUNT 

Return Code or Count 



32 (20) 



OPCSAVE1 

Save Area for the IEDQCA Module 



104 (68) 



OPCSAVE2 

Partial Save and Work Area 



144 (90) 



OPCPPL 

Post Parameter List for AQCTL SVC 102 



152(98) 



OPCSCAN 

Address of the IEDQCA02 Subroutine 



156 (9C) 



OPCERMSG 

CANCEL Command Message Area 



205 (CD) 

OPCBITSW 

OP CTL Switches 



206 (CE) 



Reserved 



207 (CF) 

OPCCKBIT 

Checkpoint/Restart 



208 (DO) 



OPCCKELE 

The Common Input Area 



s 



240 (FO) 

OPCMISC 

Miscellaneous Data 



O-ff spt 


Name 


pytes 


(0) 


O^CTNPUT 


i\ 


H (H) 


OPCAVTAD 


H 


% (8) 


CFCDOUBL 


P 


1* (10) 


CFCWCPK 


a 


20 (14) 


OPCFPS 


8 



Des cription 

Address of the input data 

Address of the TCAK Address Vector Table 

Doufcleworc! work area 

Eullword work area 

Entry point for IECQC1 used by 
the control module for 'operator 
control (IEDQCA) 



1004 



O-FfsP 


St 


Name 


Fytes 


28 


(1C) 




3 


31 


(1') 


CPCCOUNT 


1 


3 2 


(20) 


OPCSAVF1 


12 


104 


(68) 


OPCSAVE2 


40 


144 


(90) 


C PC PPT. 


8 


152 


(98) 


CPCSCAN 


4 


156 


(9C) 


CPCEPMSG 


49 


205 


(CD) 


CPCBTTSW 


1 



Description 
?eseryed 

Count or return code 

IFDCCA save area 

Partial save area and work area 

Tpost parameter list for IGC102 

Address of TETQCA02 - SCAN subroutine 

Cancel command messaqe 

Operator control bit switches: 



Name Bits Value Meaning 



OPCCONSN X'80' Source is the system console 

OPCMPPN 1 X'40' Source is an application proqram 

OPCMCPN 2 X'20' Source is the messaqe control prcqram 

OPCPPOCN 3 X'10« Process bit on 

OPCPKCCF 3 X'FF' Process bit off 

Off 

OPCFPSTN 4 X«08' First-time bit on 

OPCFPSTF 4 X»F7' First-time bit off 

Off 

OPCLCIN 5 X'04' local wait bit on 

OPCLCIF 5 x«FB« local wait bit off 

Off 

OPCQUCKN 6 X«02» Closedown is quick 

OPCF1SHF 6 X»FD» Closedown is flush 

Off 

OPCTEWPN 7 X'OV Work bit on 

OPCTEMPF 7 X'FE» ttork bit off 

Off 
206 (CE) 1 One-byte work area referred to 

only by IEDQCA 
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2 0n7 (CF) 



CPCCKFIT 



Name 

OPCRSTN 
OPCRSTF 



OPCCKFTN 
OPCCKPTF 

OPCTNVN 

OPCTNVF 



Checkpoint/Restart tits - 

bit settinqs for this field are 

as follows: 

Bit s Value Meaning 







Off 

1 
1 

Off 
2 

2 
Off 



X' 80' 

X'7F' 



X'40» 
X'BF» 

X'20' 

X'DF' 



Restart in proqress 
Mask tc specify first 
restart not in 
proqress 

Checkpoint to be done 
Mask tc specify no 
checkpoint to be done 
Checkpoint for 
invitation lists 
Mask to specify no 
checkpoint for 
invitation lists 



208 (DO) 



OPCCKEIE 



32 



Common input tlock for the operator 
control routines 



The fields in the common input block are 
represented as follows: 



Field 



Label 



240 (F0) 



CPCMTSC 



OPCED =0PCCKE1F 1 

OPCTND =OPCCKEIF+1 1 

OPCBIT1 =0PCCKElF+2 1 

OPCBTT2 =OPCCKFIE+3 1 

OPCLFN =0PCCKFIE+4 1 

OPCFLN =O^CCKFLF+5 3 

OPCTNMF =OPCCKFIE+8 8 

0PCVBCD1=0PCCKE1F+16 1 

OPCVBCD2=OPCCKE1F+17 .1 

OPCFLG =OPCCKFIE+18 1 

OPCTNFO =OPCCKEIE+19 1 

OPCSNSE =OPCCKFIE+20 2 

OPCOTfr? =OPCCKEIF+22 2 

OPCOPFLD=OPCCKFIE+24 8 



Data for TEDQCA 



Restart flaq 

ID for routine to te loaded 

Internal flags 

Internal flaqs 

Lenqth of relative line 

number 

Relative line number 

Terminal name, ddname, 

or address 

First verb code 

Second verb code 

Command dependent flaq tits 

Internal flaqs 

MODIFY interval sense value 

MODIFY interval sense count 

Option field name for 

DISPLAY option and MODIFY 

option commands 



1006 



COMMAND INPUT EUFFER 

^he Command Input Buffer (IEZCTE) is a variable lenqth communication parameter list that 

is used by ODerator Control to process a command. The buffer describes the command sent 

from the console. The CTB shows the command code, the identification of the console that 
issued the command, and the actual data in the command, 

When the INTRO macro instruction is expanded at TCAM execution time, the INTRO macro 
aenerates linkaqe to a module that issues an EXTRACT macro. The FIELDS- parameter 
specified on the EXTPACT macro is ?IELDS=COMM, which calls for the communication Parameter 
List. AVTCOMPT is specified as the answer area address on the EXTRACT macro. The 
Operatina System places the address of the Communication Parameter List (Command Input 
Buffer) in the AVTCOMPT field of the Address Vector Table. 

when a command is entered, SVC 34 oerforms a GETMAIN for the area required by the 
Command Input Puffer, and the buffer is initialized at that time. 

^he fiqure telow shows the format of the Command Input Buffer; descriptions of the 
^ields follow the illustration. 



IEZCIB 



0(0) 






CIBNEXT 

Address of the Next CIB in the Queue 




4(4) 


CIBVERB 

Code Byte 


5(5) 


CIBLEN 

Buffer Length 


6(6) 


Reserved 












12(C) 


CIBCONID 

Console ID 


13(D) 


Reserved 


14(E) 


CIBDATLN 

CIB Data Length 


16(10) 






CIBE 


>ATA 





H 



CIB Data 



J 



Offset 


Name 


Byte 


(0) 


CIBNEXT 


4 


u cm 


CTPVFFB 


1 



D escription 

Address of the next CIB in the queue (0 for last) 

Bits settinqs for this field are 
as follows: 



Name 









CIBSTAFT 








CTBMODEY 








CTBSTOP 








CIBVARY 








CIBHALT 








CIBDTSFL 








CTBHOLD 








CIBRELSE 


5 


(M 


CIBLEN 


1 


(- 


(6) 




6 


1.2 


(C) 


DTBCONI^,. 


1 


13 


(D) 




1 



Bits 

1*5 
1,2;5 
2,U 
2,3,M,5 
1,2, a 
1,2,«, 5 
1,2,3 



Value Meaning 

X'04' START command code 

X'U4« MODIFY command code 

X'64' STCP command code 

X'28» VARY command Code 

X'SC* HALT command code 

y«68» DISPLAY command code 

X'6C» HOLD command code 

X'70' RELEASE command code 



lenqth of the buffer (includinq control fields) 
in doublewords 

Reserved 

Identifier of the console issuinq the command 

Reserved 
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offset 



Name 



Bytes 



Description 



14 (?) 
16 (10) 



CIEDATLN 



CTPDATA 



lenqth of data in the CIB 
Beqinninq of the data from the command operand: 



S T A^T da+;a - contains the fourth positional parameter, • PAFMVALUE' 

MODIFY data - contais the residual operand image following the comma, 

terminatinq the first positional parameter 

STOP data .- none, CIB qenerated only to give the console IT> to the 

recipient task 

VA^Y data -fcontains the operand field for the command issued 

BAIT data - contains the operand field for the command issued 

DISPLAY flat a - contains the operand field for the command issued 

BOLD data - contains the operand field for the command issued 

PEIFASF data - contains the operand field for the command issued 



C"FCKPOTN ,T1 DATA A^FAS 

Checkpoint Elements 

Environment Checkpoint p equest Element: 
Define* at RVTCKFIF in the AVT 
^our words lohq 
T <py field - always P'01110000' 
Source flaq - 

BMOOOOCOC - requested by FEADY 
B'01000000' - requested by MCPCLOSE 



Offset 



*' n C010000 



requested by the Checkpoint- 
No incident Records routine 



^'OOIOOOOO* - requested by other routines 

"*F Checkpoint Feauest Element: 
Defined as the TCB 
Key field - always B'00000000 1 



12 
(O 



Offset 



Key 
X'70' 


QCB address 


Link address 


Source 
flag 


Reserved 


Checkpoint 
time interval 


Time of Reserved 
interrupt 






Key 
X'OO' 


Checkpoint QCB 
address 


4 


Link address 


60 
(5A) 


Terminal 
name offset 





Offset 



TCHNG 



Application Proqram Checkpoint Bequest Element 

defined at ^CFWFKA in the PCF - one for 
each application proqram 

T our words lonq 

Key field - depends on the macro 
3«01100000» - requested by CKREO 
B'00010000' - requested by TCHNG 






Key 
X'10' 


Checkpoint QCB 
address 


4 


Link address 


8 


ECB 


12 

(C) 


Terminal 
name offset 


Reserved 



1008 



Offset 



CKREQ 



operator Control Checkpoint Request Element: 

defined at AVTCCELE in the AVT 

"wo words Ion a 

Key field - F'01000000' - requested by 

VARY, UCDTEY, FELFASE, HOLD, TCHNG, MFF1EASE, 

or feteasep: 

checkpoint OCE: 

Defined at AVTCKPTP in the AVT 

^hree words lonq 

^hir* word always points to the key 
field of this OCE. The key field 
is the offset to the Checkpoint STCB 

Kev ^ieM - P»00000C10« - tells the TCAF. 
Dispatcher to POST the T CP in the 
second word and to chain the element at 
the top c* the ready queue off the 
request element chain 

in the first word. 






Key 
X'60' 


Checkpoint QCB 
address 


4 


Link address 


8 


ECB 


12 
(C) 


DEB chain address 


Offset 





Key 
X'40' 


Checkpoint QCB 
address 


4 


Link address 


Offset 





Key 
X'02' 


Request 
element chain 


4 


ECB 


8 


Address of the STCB 
code offset 



checkpoint work Area 

m he checkpoint work area is a local constants and variables area that is used by all of 
+he checkpoint routines. This work area contains the checkpoint data set control record, 
as well as pointers +o the other checkpoint records. The checkpoint work area is 
allocated by a GETMATN in the Checkpoint Open routine (IGG01941) , which also places the 
address of the work area in the AVTCKGET field of the AVT. Durinq a cold startup, the 
constant fields in the work area are initialized by the Checkpoint Open routine, the 
Checkpoint Disk Tnitiali2ation routine (IGGC1942) , and the Checkpoint Disk Allocation 
routine (TGnCI^UC). Th e variable fields in the checkpoint work area are initialized and 
c^anqed as required by the checkpoint routines. 
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IEDQCKPD 

JoW— 





CKPSAVE1 

Save Area for the Load Module 




72 (48) 


CKPIOB 

IOB for Checkpoint Disk I/O 


CKPI0FL1 


CKPIOFL2 | CKPIOSIM0 , CKPIOSN1 


76 (4C) 


CKPIOECB 

ECB Address 


80 (50) 

CKPIOFL3 


81 (51) 

CKPIOCSW 

Channel Status Word 




88 (58) 

CKPIOSIO 

Condition Codes 


89 (59) 

CKPIOCPA 

Channel Program Address 


92 (5C) 

Reserved 


93 (5D) 

CKPIODCB 

DCB Address 


96 (60) 

Reserved 


97(61) 

CKPIORST 

Restart Address 


100 (64) 

CKPI 

Block Coun 


OBCI 

t Increment 


102 (66) 

CKPIORC 

Error Count 


104 (68) 

CKPIOM 

M Seek Address 


105(69) 

CKPIOBB 

BB Seek Address 


107 (6B) 

CKPIOCC 

CC Seek Address 


Continued 


109 (6D) 

CKPIOHH 

HH Seek Address 


111 (6F) 

CKPIOR 

R Seek Address 


112(70) 


CKPECB 

ECB Posted by I OS 


116(74) 


CKPEXCP 

Address of the Current Record Being Written 


120(78) 


CKPCNVRT 

Label Used for the CVD Instruction 


CKPECBL 

ECB List for WAIT 


CKPEPLOC 

EPLOC for the LOAD Macro 


128(80) 


CKPIOQF 

Address of the First Record On the Checkpoint Disk I/O Queue 


132 (84) 


CKPIOQL 

Address of the Last Record On the Checkpoint Disk I/O Queue 


136(88) 


CKPLREB 

Address of the Last Request Element for Which a Record Was Built 



1010 



140 (8C) 



CKPLDRB 

Address of the Last Disk Record Built 



144 (90) 



CKPCTTRB 

Beginning of the CKREQ-TTR Table 



148 (94) 



CKPCPARM 





Parameters for th< 


j Convert Routine 




156 (9C) 

CKPCRLEN 

Control Record Length 


157 (9D) CKPSWCH1 
Switch for the 
Checkpoint QCB 


158 (9E) C KPSWCH2 
Switch for the 
Checkpointed Invitation List 


159 (9F) CKPERRCT 

Count Or Read Errors 
Found by IGG01943 


160 (A0) 


CKPCCWS 

Channel Program 





CKPSEEKC 

Seek Cylinder 



168 (A8) 



CKPSCHID 

Search ID 



.176 (BO) 



1181 (B5) 



CKPTIC 

TIC Command 

TTR of the Last Segment Written 



184 (B8) 



CKPRW 

Read /Write 



192 (CO) 



248 (F8) 



CKPGETML 







GETMAIN P 


arameter List 






202 (CA) 


CKPWKALN 

Checkpoint Work Area Length 


204 (CO 


CKPMSG 
CKPMSGLN 

Message Buffer Length 




206 (CE) 


Reserved 


208 (DO) 




CKPM 

Messac 


SGTX 

je Text 





CKPSAVE2 

Save Area 



245 (F5) 



CKPMSGTP 

Type of Checkpoint Record 



246 (F6) 



CKPRCDSR 

No Segments in One Environment Checkpoint 



| 250 (FA) 
I 



CKPTRKSA 

Number of Tracks Available 
r^oT (fb) "CKPMSGL Message Length" 
' CKPMSG PN Process Entry Name 



252 (FC) 



CKPMSG PN 

(Cont.) 



265 (109) 



CKPMSGGL 

GETMAIN Length That Was Not Satisfied 



268(100 CKPMSGGL 

ICorvL) _ _J 



CKPTRMAD 

Terminal Entry Address 



272(110) 



X 



CKPCNTLR 

Beginning of the Checkpoint Control Record 



T 
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Temporary Use of the Checkpoint Work Area During Checkpoint Open: 



116(74) 


CKPCYLNO 

Cylinder Number 


118(76) 


CKPHEDNO 

Head Number 


120(78) 

CKPRCDNO 

Record Number 


121 (79) CKPKEYLN 

Key Length 


122 (7A) 


CKPOATLN 

Data Length 


124 (7C) 


CKPCTTRC 

Current Entry in the CKREQ-TTR Table 




128(80) 




CKPDATIM 





Date and Time of the Last Environment Checkpoint 



136(88) CKPIPERE 

Number of Incident Or CKREQ 
Records in One Environment Record Segment 



138 (8A) 



Reserved 



140(80 



CKPCTTRA 

Address of the TTR of the Environment Record 
to be Used for Restart 



Offs 


et 


Name 


Bytes 





(0) 


CK*"SAVE1 


72 


72- 


(«»8) 


CKFT0E 


40 


72 


(48) 


CKFT0FL1 


1 


73 


(49) 


CKPI0FL2 


1 


in 


(4A) 


CKPIOSNO 


1 


75 


(4B) 


C* FI0SN1 


1 


76 


(4C) 


CKPT0FCB 


4 


80 


(50) 


CKPI0PL3 


1 


91 


(51) 


CKPI0CSW 


7 


88 


(58) 


CKPT0SI0 


1 



Desc ription 

Save area for the lead module 

IOB for the checkpoint disk 
T/C operations 

I/O error flaqs 

T/0 error flaqs 



T5CB address 
T/0 error flaqs 
Channel Status Word 
Start T/0 condition codes 
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Offset 


Name 


Bytes 


89 


(59) 


CKFTOCPA 


3 


Q2 


(5C) 




1 


93 


(5D) 


CKFTCDCE 


3 


96 


(60) 




1 


Q7 


(61) 


CKFIOBST 


3 


100 


(64) 


CKFTOBCI 


2 


102 


(66) 


CKFIORC 


2 


104 


[68) 


CKFTOW 


1 


105 


(69) 


CKFIOBB 


2 


10*7 


(6B) 


CKFIOCC 


2 


109 


(6D) 


CKFTOFH 


2 


111 


(6?) 


CKFIOF 


1 


112 


[70) 


CKPECB 


4 


1 16 


["74) 


CKFEXCP 


4 


1 16 


(74) 


CKFCYINO 


2 


118 


(76) 


CKFHEBNO 


2 


120 


[78) 


CKPCNVPT 


8 


120 


[78) 


CKFECFL 


8 


120 


78) 


CVPEPIOC 


8 


120 


78) 


CKFRCDNO 


1 


121 


79) 


CKFKEYLN 


1 


122 ( 


7R) 


CKFDA^LN 


2 


124 I 


7C) 


CKFCTTFC 


4 



128 
128 

132 

1?6 



8,0) 
P0) 

84) 
88) 



CKFTOOF 



CKFDATI1 



CKEIOOL 



CKFLPEB 



Description 

Channel proqrara address 

Reserved 

DCB address 

Reserved 

Restart address 

Block count increment 

Error count 

H seek address 

BB seek address 

CC seek address 

HH seek address 

R seek address 

ECP tested by the I/O Supervisor 

Address of the current record 
beinq written 

Durinq checkpoint open, the 
cylinder number 

Durinq checkpoint open, the 
head numter 

Label used for the CVD 
instruction 

ECB list for WAIT 

EPicc for the LOAD macro 

Durinq checkpoint open, the 
record number 

Durinq checkpoint open, the 
key lenqth, 

Durinq checkpoint open, the 
data lenqth 

Address of the current entry in 
the CKPEC-TTF Table - used for 
restart open 

Address of the first record on 
the checkpoint disk I/O queue 

Date and time of the last 
environment checkpoint, used 
durinq checkpoint open 

Address of the last record on 
the checkpoint disk I/O queue 

Address of the last request 
element for which a checkpoint 
record was built 
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QfJset 

136 (88.) 

140 (8C) 

140 (8C) 

144 (90) 

148 (94) 

156 (9C) 

157 (9D) 

158 (9E) 



Same- Bytes 

CKFTPEPE 2 

cfcFLDPE 4 

CKFCTTRA 4 

CKFCTTRB 4 

CKFCPAEM 8 

CKPCRLEN 1 

CKPSWCH1 1 

CKPSWCH2 1 



159 


(9?) 


CKPERRCT 


1 


160 


(A0) 


CKFCCWS 


32 


160 


(A0> 


CKPSEFKC 


8 


168 


(A8) 


CKFSCHTD 


8 


176 


(BO) 


CKPTTC 


8 


181 


(B5) 


CKPTTELT 


3 


184 


(B8) 


CKPEW 
CKPREAD 
CKPWEITE 
CKPWCKD . 


8 


192 


(CO) 


CKPGETML 


10 


202 


(CM 


CKPWKALN 


2 


204 


(CC) 


CKPHSG 




204 


(CC) 


CKPHSGLN 


2 


20.6 


(CB) 




2 


208 


(DO) 


CKPMSGTX 


37 


208 


(DO) 


CKPSAVE2 


15 


245 


(F5) 


CKPHSGTP 


20 


1014 







Description 

During checkpoint open, the 
number of incident cr CKPEQ 
checkpoints in one environment 
record seqment 

Address of the last disk 
record built 

Durinq checkpoint open, the address 
of 'the TTR of- the environment 
record being used for restart 

Address of the beqinninq of the 
CKPEQ-TTR Table 

Parameters for the Convert 
routine: the address of the 
DEE and the address for the 
conversion result 

Lenqth of the control record 

Switch used for ccmparinq a 
QCB to see if it has been 
checkpcinted 

Switch used for comparinq an 
invitation list to determine 
whether it has been checkpointed 

Count of the read, errors found 
by IGG01943 

Channel proqram 

Seek Cylinder command 

Search ID command 

TTC command 

TTE of the last environment 
seqment written 

Read/Write command 

Bead Data CCW 

Write Data CCW 

Write Count, Key, and 
Data CCW 

GETMATN parameter list 

lenqth of the checkpoint 
work area 

Nessaqe buffer used for WTO 

lenqth of the aessage buffer 

Reserved 

Hessaqe text 

Temporary storaqe area 

Type of checkpoint record 



Offset 

246 ITS) 

2U8 (F81 

250 (FA) 

251 (FB) 
251 (FB) 
265 (109) 

268 (10C) 

272 (110) 



Same 


Bytes 


CKPRCDSR 


2 


CFPCKDLT 


2 


CKPTRKSA 


2 


CKPHSGL 


U 


CKPHSGPN 


U 


CKPMSGGL 


U 


CKPTRHAD 


4 


CKPCNTLR 





Description 

Number of seqments in one 
environment checkpoint 

Reserved 

Number of trades available in the 
checkpoint data set 

Hessaqe lenqth 

Process entry name 

GETHAIN lenqth that could not 
be satisfied 

Terminal entry address 

Beqinninq of the Checkpoint 
Control Record 



Checkpoint Disk Records 

C heckpoint Control Record ; The checkpoint control record is written on disk from the area 
startinq at CFPCNTLR in the checkpoint work area each time that an environment checkpoint 
record is written. 



Offset 






1 


2 


3 


4 


5 


8 


Flag 
byte 

CKPFLAGS 


Index to the 
current 
environment 
record 

CKPTTRCT 


Number 
of 

incident 
records 

CKPINCNT 


Number of 
available 
incident 
records 

CKPINCNO 


TTR of the last 
CKREQ record 
on first CKREQ 
records track 

CKPCRRNO 


TTR of the 
first CKREQ 
record 

CKPTTRCR 


TTR of the last incident 
record on the first 
incident records track 

CKPINRNO 



Offset 
9 



12(C) 



14(E) 



15(F) 



16(10) 



17(11) 



TTR of the 
first incident 
record 

CKPTTRIN 


Number qf bytes 
in an environment 
record segment 

CKPBPERR 


Value of the 
INTRO operand 
CKREQS 

CKPCKRQS 


Value of the 
INTRO operand 
CPRCDS 

CKPCPRCD 


Number of 
incident 
records 
per track 

CKPIPERT 


Number of 
CKREQ records 
per track 

CKPCPERT 



18(12) 



20(14) 



21 (15) 



24 (18h 



26 (1A) 



29(1D) 



Length of 
a CKREQ 
record 

CKPCKRLN 


Number of 
environment 
record segments 
per track 

CKPRPERT 


TTR of the 
last incident 
record 
written 

CKPTTRLI 


Length of 
an incident 
record 

CKPINCLN 


TTR of the 
first 

environment 
record 

CKPTTRT1 


TTR of the 
second 
environment 
record 


) J 
TTR of the 
last 

environment 
record 
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Of fse+ 



o (0) 



Name 
CKP^LAGS 



Bytes' 
1 



D escri ption 



Init i alized B y Altered By 



1 (1) 

2 (2) 

3 H) 

4 (4) 

5 (5) 

8 (8) 

9 (9) 
12 (C) 

14 (7?) 



CKFTTPCT 



CKFTNCNT 



CKFINCNO 



'CKFCPPWO 



CKPTTPCR 



CKFINFNO 



CK^TTFTN 



CKFBPEBR 



CKPPKRQS 



Flaq 
X'RO' 
clcs 

XM0» 

X«20' 

X'40' 
ment 

X'08' 
ment 

X , 04« 
star 
that 
whet 
list 
chec 

X , 02» 
rono 

X'OV 
cent 
reco 



tyte: 

-normal 

edown 



Set by IGG01943 
Turned off ty 
IGG01944 

- Open CKREQ 

- Cpen incident 

- Open environ- 

- No environ- 
records are available 

- Value of Set by IGG01949 
tup parameter 

indicates 
her invitation 
s are to be 
kpointed 

- OS synch- 
us checkpoint IGG01949 

- Operator 
rpl incident 
rds are present 



TGG01944 
TGG01944 
IGG01943 



IGG01943 
IGG01943 



Index to the cur- 
rent environment' 
checkpoint record 



Total number of 
incident records 
in the data set 



IGG01942 in- 
itializes this 
field to 1 



IGG01949 



Number of incident Cold start- 
records that are IGG01949 
available for use Warm start- 

IGG01941 



TTP of the last 
CKBEQ record on 
the first track 
that contains 
,CKPEC records 

TTP of the first 
CKPEC record 

TTP of the last 
incident record 
on the first track 
that contains 
incident records 

TTP of- the first 
incident record 

Numter of bytes 
in each environ- 
ment record seq- 
ment 

Value of CKFEQS 
(from INTRO) 
for the last 
startup - used 
at restart time 
instead of the 
correspondinq 
value in the AVT 



IGG01942 



IGG01942 



IGGC1942 



IGG01942 



IGG01949 



Cold start 
IGG01942 

Warm start 
IGG01944 



IGG01949 



IFDQNP chanqes 
this field 
after each en- 
vironment check- 
point 



IEDCNG,IEDQNH r 
IEDQNI,IEDQNJ, 
IEDQNO 



1016 



15 (?) 



C^PCPPCD 



16 (10) 
1 -7 (11) 



1" (12) 

20 (14) 

21 (15) 

24 L(18) 
26 (1A) 



CKPIPEPT 



CKPPFONO 



CKPCPE^T 



CKPCKFLN 



CKPPPFPT 



CKPTTFLT 



CKPINCLN 



CKPTTF.T1 



Value of CPPCDS Cold start - 
(from TNTPO) for IGG01942 
last startup - Warm start - 
used at restart IGG01943 
time instead of 
the corresponding 
value in the RVT 

Numter of incident IGG01949 
records per track 

Maximum number of IGG01949 
priority QCBs used 
by an OS synchro- 
ncus process entry 

Number of CKBEQ TGG01949 
records per track 
(overlays CKPPBCNO) 

Lenqth of a CKBEQ IGG01949 
record, depends on 
the number of 
option fields 

Numfcer of environ- IGG01949 
ment record seq- 
ments per track 

TTB of the last IGG01941 
incident record 
written 

Lenqth of an inci- IGG01949 
dent record 

TTB of the first IGG01942 
environment record 



IEDQNP 



IEDQNP, 
IGG01943 



■"here are as many three-byte TTB fields for environment checkpoint records as there are 
records indicated in CKPCPRCD. 

Environment Checkpoint Pecord Segment: Main storaqe in which to build an environment 
checkpoint record seqment is obtained by the Environment Checkpoint routine (IEDCNK) each 
time that an environment checkpoint is requested. The format and lenqth of an environment 
checkpoint vary accordinq to Option Table and Terminal Table entries. The entire Option 
^able is included in the environment record, and there is one section of data for each 
sinqle, aroup, line, and process entry of the Terminal Table in the record. 



Offset 


Name 


B^tes 


(0) 


CD*>DJTE 


4 


4- (4) 


CBBTTME 


4 


fl (8) 


CKFKEY 


1 



Des cri ption 

Date cf the check- 
point 



I nitialize d B y 

TECQNP 



Time that the record IEDQNP 
is written 



Key tyte: 

X'1C ■«■ last seqment 
of an environment 
checkpoint record 

X'20» - a seqment 
that is not the 
last seqment of 
an environment 
checkpoint record 



IEDQNK 
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Offset 



Name 



Bytes 



Initial ized By 



9 (9) 



CD^TTPLI 3 



TTP of the last 
incident record 
written 



IEECNP 



12 (C) 



Termname Table off- IEDQNK 
set to the primary 
operator control 
terminal - from the 
AVT field AVTOPCON 



14 (E) 



Number of seconds in IEDQNK 
a system delay - 
from the AVT field 
AVTIKTIV 



16 (10) 



TCAM status byte - TEDQNK 
from the AVT field 
AVTBTT1 



17 (11) 



TCAM status byte - IEDQNK 
from the AVT field 
AVTBIT2 



18 (12) 



Nonreusable disk re- IEDQNK- 
lative record 
address - from the 
AVT field AVTNADDE 



22 (16) 



Peusahle disk 
relative reccrd 
address - frcm the 
AVT field AVTPADDF 



IEDQNK 



24 (1A) 



26 (1A) 



CKFTTPT1 



Opticn Table - the IEDQNK 
address of the Op- 
ticn Table is in 
AVTOFTPT and the 
first word of the 
table contains the 
address of the end 
Of the table; the 
address of the end 
less the address of 
the beqinninq equals 
the lenqth 



TTP of the first 
environment record 



IGG01942 



IEDQNP, 
IGG01943 



There are as many three-byte TTP fields for environment checkpoint records 
records indicated in CKPCPRCD. 



as there are 



Environment Checkpoint Reccr d Segment ; Main storaqe in which to build an environment 
checkpoint reccrd seqment is obtained by the Environment Checkpoint routine (IEDQNK) each 
time that an environment checkpoint is requested. The format and lenqth of an environment 
checkpoint vary accordihq to jOption Table and Terminal Table entries. The entire Option 
'T'able is included in. the environment record, and there is one section of data for each 
sinqle, qroup, line, and process entry of the Terminal Table in the record. 
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Offset 


Name 


P^tes 


(0) 


CPPDATE 


a 


1 (<*) 


CDBTIWF 


4 


8 (*) 


CPPKEY 


1 



9 (0) 

12 <C) 

14 (F) 

16 (10) 

17 (11) 

18 (12) 

22 (16) 

24 (1R) 



CDPTTFLI 



26+n 



D escription 

Date of the checkpoint 

Time that the record is written 

Key byte: 

X'1C* - last seqment of an environ- 
ment checkpoint record 

X'20* - a seqment that is not the 
last seqment of an environment 
checkpoint record 

TTB of the last incident record 
written 

Termname Table offset tc the 
primary operator control terminal - 
from the AVT field AVTOFCON 

Numrer of seconds in a system 
delay - from the AVT field 
AVTIMLV 

TCAM status byte - from the AVT 
field AVTBIT1 

TCAM status byte - from the AVT 
field &VTBIT2 

Nonreusable disk relative record 
address - from the AVT field 
AVTflADDP 

Reusable disk relative record 
address - from the AVT field 
AVTRADPB 



n Option Table - the address of the 
Opticn Table is in AVTOPTPT and 
the first word of the table contains 
the address of the end of the table; 
the address of the end less the 
address of the beqinninq equals the 
lenqth 
This is the point at which the checkpointed fields 
from the Terminal Table start. Only sinqle, qroup, 
line, and process entries are checkpcinted , and 
different fields are included under different 
conditions. These conditions are stated as each 
item is described. Each entry is checkpoint as 
follows: 

Byfc ss Pe scrj.pt jj.on 

1 Terminal entry status byte (from 

THMSTATE) included only for a sinqle, 
qroup, or line entry 



Initiali zed By 
IEDCNP 
IFDQNF 
IIEQNK 



IECQNP 
IEDQNK 

IEDQNK 

IEDQNK 
IEDQNK 
IEDQNK 

IEDQNK 
IEDQNK 



Initialized Bv 
IEDQNK 



Input sequence number (from TPMINSEQ) IEDQNK 
included only for a sinqle, qroup, 
line^ or process entry that is disk 
queued 



Output sequence number (from 
TRMOtJTSQ) included only for a sinqle. 
qroup, line, or process entry that 
is disk queued 



IEDQNK 
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2 Count of messages for this IEDQNK 
destination (from QCBMSGCT in the QCB 
referred to by TBMDESTQ) included 

for any single, group, line, or 
process entry that has not had its 
QCB checkpointed 

3 Queue-back message chain pointer IEDQNK 
(from QCBQBACK) included for any 

single, group, line, or process entry 
that has not had its QCB checkpointed 

21 t)isk pointers from QCEDNHDB through IEDQNK 
QCB-IEEFC in a priority level QCB that 
is attached to this Destination QCB; 
there is one of these 21-byte entries 
for each priority level QCB attached 
to a Destination QCB that' is fceing 
checkpointed 

3 LCBSTAT1, LCBSTAT2, DCBINTVL for any IEDQNK 
single, group, or line entry 

n Invitation list for any single, line, IEDQNK 
or qroup entry that has not had its 
Destination QCB checkpointed; 
OCBDCBAD points to the DCB, ana 
DCPINVII points to the invitation 
list: the lenath of the list is 
equal to the number of entries 
times the length of each entry plus 
8 control bytes 

'v. summary, the ger.pral fcrmat of an environment checkpoint record is as follows: 



Offset 

4 



Date 


Time 


Key 
X'20' 


AVT 
Fields 


Terminal Table 
data for the 
first entry 


Option fields 
for the 
first entry 


QCB data 
for the 
first entry 


LCB data 
for the 
first entry 


DCB data 
for the 
first entry 


Invitation 
List for the 
first entry 


Terminal Table 
data for the 
second entry 


Option fields 
for the 
second entry 



Key 
X*1C 



QCB data 
for the 
second entry 



LCB data 
for the 
second entry 



DCB data 
for the 



second entry second entry 



Invitation 
List for the 






Terminal Table 
data for the 
last entry 



Option fields 
for the 
last entry 



QCB data 
for the 
last entry 



LCB data 
for the 
last entry 



DCB data Invitation 



for the 
last entry 



List for the 
last entry 



Incid ent C heckpoint B ecord for the CHBCKP T 
routine (TEDONG) issues a GETMAIN for main 
checkpoint record and places the address 
area. If the CBECKPT macro is issued in th 
the current buffer is checkpointed. If th 
of MH, the terminal that is to receive the 
this record depends on which Option Tabl 
checkpointed. The Incident Becord for MH 
to the current Termname Table entry, as inp 
the correct terminal entry address. The te 
beginnincr of the Option Table fields for th 
offset from the terminal entry to the Opt 
refer to the beginning of the Option Table 
option entry offsets in the terminal ent 



Macro: The Build Incident Becord for MH 
storage in which to build this incident 
of this area at CKPLDBB in the checkpoint work 
e incoming group of MH, the terminal that sent 
e CHECKPT macro is issued in the outgoing group 
current message is checkpointed. The length of 
e fields are used for the terminal being 
routine uses the LCB field LCBTTCIN, the offset 
ut to the Termname Table code (IEDQTNTj to get 
rminal entry field TBMOPTBL is an offset to the 
is terminal. The routine adds the Option Table 
ion Table address (from AVTOPTPT in the AVT) to 
data for this terminal and uses the individual 
ry to refer to the specific option data entries 
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for this terminal. The second word of the Option Table contains the addre 
Characteristics Table, each entry cf which corresponds in consecutive orde 
entry offset in a terminal entry. If the Build Incident Becord for MH rou 
a halfword option entry offset in the terminal entry does not contain X 1 
qets the address of the option data by addinq the halfword option entry 
beqinninq of the opticn data for this terminal to qet the beqinninq of 
qets the lenqth of this option data field for the correspondinq Option 
Table entry, and moves the option data to the next available location 
checkpoint record. 



ss of the Option 

r to each option 

tine finds that 

FI", the routine 

offset to the 

this data field, 

Characteristics 

in the incident 



Offset 


Same 


Bytes 


(0) 


CDBDATE 


i\ 


U (4) 


CDBTIME 


H 


8 (8) 


CD3KEY 


1 



9 (9) 

11 m 

12 (C) 



D escription 

Date of the checkpoint 

Time that the record is written 

Key byte: 

D«00' - CHECKPT record 

The offset to the terminal that 
is currently connected on the line 
of the LCB that is the request 
element - from LCBTTCIN 

The terminal status - from TBMSTATE 

Beqinninq of the option fields 
defined for the terminal referred 
to by the offset in bytes 9-10. 
The manner in which IEDQNG check- 
points these option fields is 
described in the write up that 
precedes this record layout. 



I nitialized By 
IEDQNE 
IEEQNP 
IEDQNG 

IEEQNG 

IEDQNG 
IEDQNG 



Tn summary, the qeneral format of an incident checkpoint record for the CHECKPT macro is 
as follows: 



Offset 




11 (B) 



12(C) 



Date 


Time 


Key 
D'OO' 


Terminal 
offset 


Terminal 
Status 


Option data fields 



Incident Ch eckpoint for Operator Control : The Build Incident Checkpoint for Operator 
Control routine (IEDONJ) issues a GETMAIN for main storaqe in which to build this incident 
checkpoint record and places the address of this area at CKPLDRB in the checkpoint work 
area. This routine initializes this checkpoint record from the operator control 
checkpoint element at OPCCKELE in the Operator Control AVT. 
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Offset 





(0) 


4 


(4) 


8 


(8) 


9 


(9) 


12 


(C) 



Name 
CDRDATE 
CDFTTME 
CDRKEY 



Bytes 

a 
1 

3 
32 



Description 

Date of the checkpoint 

Time that the record is written 

Key byte: 

D'16' - Operator Control record 

Reserved 

Operator Control checkpoint element 
from CPCCKELE in the Operator Control 



Initialized By 
IEDQNP 
TEDQNP 
IEDQNO 

IEDQNJ 



AVT 

Tn summary, the format of an incident checkpoint record for operator control is as 
follows: 



Offset 

4 



12(C) 



Date 


Time 


Key 
D'16' 


Reserved 


Operator Control Checkpoint Element 



Incident , Checkpoint .. for the TCHNG Macro: The Build Incident Checkpoint for TCHNG routine 
(TED0NH1 issues a GETMATN for main storaqe in which to build this incident checkpoint 
record and places the address of this area at CKPLDEB in the checkpoint work area. The 
checkpoint of the option data fields is handled exactly as explained in the Incident 
Checkpoint for the CHECKP^ 1 Macro discussicn. 



Offset 


Name 


By 


(0) 


CDFDATE 


4 


4 (4) 


CDFTTFE 


4 


8 (8) 


CDRKEY 


1 



(9) 



11 (B) 



12 (C) 



Initialized By 

IEDCNP 
IEDQNP 
IIEQNH 

IEDQNH 



Date of the checkpoint 

Time that the record is written 

Key byte: 

D«04» = TCHNG record 

Offset tc the Termname 
Table entry for the terminal 
beinq checkpcinted - frcm 
bytes 12-13 of the checkpoint 
request element 

Terminal entry status byte - 
from TFMSTATE 

Beqinninq of the option fields 
defined for the terminal re- 
ferred to by the offset in 
bytes 9-10. 

Jr. summary, the qeneral format of ah incident checkpoint for TCHNG record is as follows: 



IEDQNH 



IIDQNH 



Offset 




11 (B) 



12(C) 



Date 


Time 


Key 
D'04' 


Terminal 
offset 


Terminal 

status 

byte 


Option data fields 
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CKREO Checkpoint Pecord: The Build CK^EQ Disk Beccrd routine (IEDQNM) issues a GETMAIN 
macro for main storaae in which tc build this CKP.EQ checkpoint record and places a pointer 
to this area in the CKPIDRB field of the checkpoint work area. The format and length of 
this checkpoint record depends upon the number of priority QCBs associated with the 
Destination OCB that is beinq checkpcinted; there is one 21-byte area of QCB disk pointers 
for each priority level. The checkpoint of the option data fields is handled exactly as 
explained in the Incident Checkpoint for the CHECKPT Macro discussion. The CKKEQ record 
DSECT is IEDQCEFD. 



Offset 

(0) 

1 (D 

6 (6) 

10 (ft) 

12 (C) 

14 (?) 

1"» (11) 



Name 
CDPCKFLG 



Bytes 
1 



CDRCKTN 



CDPC^'CUT' 



CDPCK-OFF 



CD^CKMSG 



CDFCKOFC 



CDTCKOCE 



21 



Flaq tits: 

Bit - On - CKBEQ is not complete 
Off- CKEEQ is complete 

Link address of the Checkpoint 
Disk I/O queue - from CKPIOQE 
and CKPTOQL in the checkpoint 
work area 

Input sequence number - from 

TBMTNSFQ in the terminal entry 
that is referred tc by the offset 
at CDPCKOFV 

Output sequence number - from 
TFMOUTSQ in the terminal entry 
that is referred to by the offset 
at CDPCKCFF 



Termname Table offset - from IEDQNM 

DEBTAMOS in the associated DEB 

QCB messaqe count - from IEDQNM 

QCFMSGCT in the Destination QCB 

Queue-back chain pointer - from IEDQNM 
OCPQEfiCK in the Destination QCB 

Priority QCP disk pointers - from TIDCNM 
the first 21 bytes of the priority 
level QCE: 

OCBDNDHP - disk record number for the 
next first unit of a messaqe received 

0CPPHDI7 - disk record number of the 
first unit, of the first messaqe in the 
last zone used for this queue 

OCBEHETZ - disk record number of 
the first unit of the first messaqe 
for this queue in the current zone 

QCBTNTFF - disk record number of the 
first held messaqe in FEFO order 

QCBINTIF - disk record number of the 
last held messaqe in FEFO order 

QCBFFEFO - disk record number of the 
first messaqe received in FEFO order 

QCBIFEFO - disk record number of the 
last messaqe received in FEFO order 



Initialized By 

IEDQNM 

IEDQNM 

IEDQNM 

IEDQNM 
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17 + (21 7 nl 

where n is the 

number of 



CPPCKO^T Beqinninq of the option fields IEDQNM 
defined for the terminal referred to 
by CDBCKOFF 



Driority level OCBs 
T n summary, the qeneral format of a CKFFO checkpoint record is as follows: 



10(A) 



12(C) 



14(E) 



Flag 


Link 


Input 


Output 


Key 


Unused 


Terminal 


QCB 


Queue- 




address 


sequence 


sequence 


D'18' 




name 


message 


back 






number 


number 






offset 


count 


chain 
pointer 



17(11) 






17 + (21 xn) 




Priority 




Priority 




Option 


QCB disk 




QCB disk 




data 


pointers 




pointers 




fields 


for the 




for the 






first 




last 






priority 




priority 






level 




level 







^R^Aq-pTER T ISTS FCP THE HFSSSGE HfcNELING WACFC FXPANSIONS 

'"he followinq are the formats of the input parameter lists for the routines called by the 
"tessaqe handlirq macro expansions throuqh the User Interface routine (IEDQUI) . The User 
T nterface routine uses the value in the first byte as an index into a VCCN table at 
AVTMSGS in the AVT. Fach entry in the VCCN table is an address of a messaqe handlinq 
routine. If a macro is not listed, its expansion does not use a parameter list. 
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MACRO 



CANCELMG 



PARAMETER LIST 




Index to 
IEDQAR and Bits 



Parameter List 
Length and Logical 



X'OO' 



4l 



Mask 



Bits 6 Recall Necessary 

7 Unconditional Mask 

Logical 7 AND 



CHECKPT 



CODE 



Status X'80' Use the Translation Table address in the DCB 

X'40' A nonstandard Translation Table 

X'20* Entry from INBUF or OUTBUF 

X'10' Entry from INMSG or OUTMSG 

X'OO' A standard Translation Table 



Mask 










1 




2 


3 






Index to 
lEDQBB 


Parameter List 
Length - X'04' 


X'OO' 


X'OO' 









1 


2 


3 






Index to 
I EDO AW 


Parameter 
List Length 


X'OO' 


Status 


4 




Address of the " 


rranslation Table 


I 
I 

: 



ROUTINE 
CALLED 



IEDQAR 



lEDQBB 



IEDQAW 



COUNTER 



Index to 
IEDQAI 


Parameter List 
Length - X'04' 


Register 
15 Offset 


Variable 

Length 

indicator 


Blank 
Character 


Address of Characters 


There is no input parameter list for this routine. 

12 3 


Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field, 
Offset 


Register 
15 Offset 



IEDQAI 



IEDQAQ 



IEDQAE 
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MACRO 



CUTOFF 



PARAMETER LIST 




Index to 
lEDQAU 


Parameter List 
Length - X'04' 


Requested Cutoff 
Length 



ROUTINE 
CALLED 



lEDQAU 



DATETIME 






1 


Index to 
IEDQAF and Bit 


Data Type Flag 



Bit 6 ON — To request the expand buffer function 
1 



IEDQAF 



Index to 
IEDQAC 


Parameter 
List Length 


Count of Bytes 
to be Inserted 



IEDQAC 



ERRORMSG 



4 | 








1 




2 




3 






Index to 
IEDQAZ and Bits 


Parameter List 
Length and Logical 


Status 


Mask 



















12 



16 



20 1 



IEDQAZ 



Bits 



Destination 
Status 



Status 



Index to 
IEDQAT 



Count 



Mask 
I 



I 
Variable Data 



Parameter List 
Length 



Index to 
IEDQAF 



Index to 
IEDQAO 



I 
Address of the Message 



I 

Address of the Exit Routine 

I 

I 



IEDQAT 



6 Recall is necessary 

7 Unconditional Mask 



Logical 7 AND 



X'01 ' indicates that the IEDQAT parameter 
list follows 



Destination Status and Variable Data 

C'S' + AL3 (0) - send to the source 
CD' + AL3 (0) - send to the destination 
C'N' + AL3 (destination name) — send to the 

named destination 
CO' + MAE) + AL1 (opfield) + AL1 (16) - 

send to the destination named in the option field 
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MACRO 



FORWARD 





PARAMETER LIST 



1 


2 


3 




Index to 
IEDQA5 


Parameter 
List Length 


Status 


Index to 
IEDQBA 


4 


EOA String 
Length 


1 

1 

I Address of EOA String 

I 




8 




1 
Address of the Exit Routine 

1 




12 




1 

1 
Variable Data 

I 




16 


Index to 
IEDQA1 


Parameter 
List Length 


X'00' 


Length j 


20 


■ 


1 

Address of the Character String 

i 





ROUTINE 
CALLED 



IEDQA5 



IEDQA1 



HOLD 



Status Destination = Name 

1 Destination = Option Field 

2 Destination in Buffer 

3 Exit specified 

4 EOA specified 

Variable Data 

Index to IEDQAE, Length, Option Offset, X'16' or 
Index to IEDQAI, Length, X'16', Address Field Length 



Index to 
I EDO A J 


Parameter List 
Length - X'08' 


Length 


Register 
15 Offset 


X'40' 


I 

Address of the EOA String 

• 





There is no input parameter list for this routine 
1 



Index to 
lEDQASand Bits 



Parameter List 
Length and Logical 



X'00' 



4 I 



Interval 



Mask 



X'00' 



Bits 6 Recall is necessary 

7 Unconditional mask 

Logical 7 AND 



Mask 



X'00' 



IEDQAJ 



IEDQAV 



IEDQAS 
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MACRO 



INBUF 



PARAMETER LIST 




Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



ROUTINE 
CALLED 



IEDQAE 



INEND 






1 


Index to 
IEDQA4 


Parameter List 
Length - X'02' 



IEDQA4 



Index to 
IEDQAK 


Parameter List 
Length - X'04' 


Index to 
IEDQAF 


Index to 
IEDQAO 



IEDQAO 



INHDR 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



INITIATE 



Index to 
IEDQAI Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Length 


Blank Character 




Address of Characters 





Bit 7 No Blank Character 
1 



IEDQAI 



INMSG 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



Index to 
IEDQAK 


Parameter List 
Length - X'04' 


Index to 
IEDQAF 


Index to 
IEDQAO 



IEDQAK 






1 


Index to 
IEDQA4 


Parameter List 
Length - X'02' 



IEDQA4 
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MACRO 



LOCK 



PARAMETER LIST 




LOCOPT 



Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Variable 
Length 


Blank 


. 


Address of Characters 





Bit 7 No Blank Characters 
1 



ROUTINE 
CALLED 



IEDQAI 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
Offset 



IEDQAE 



LOG 










1 


2 


3 






Index to IEDQBY 
and Bits 


Parameter List 
Length - X'08' 


X'OO' 


X'OO' 


4 




I 
Address of LOGTYPE Entry 

• 






IEDQBY 






1 


Index to 
lEDQBX 


I i 
. i 

1 Address of DCB ! 
! 1 



lEDQBX 
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PARAMETER LIST 



MACRO 



ROUTINE 
CALLED 



MSGEDIT 





0' 


1 




2 


3 




Index to 
IEDQAN 


Parameter List 
Length 


Index to 
IEDQAF 


Index to 
IEDQAO 


4 


Index to 
lEDQAJ 


Blank 
Character 


Number 
of Entries 


Reserved 


8 


Reserved 


Address of the Characters Table 


12 


Key 


Status 


Data Description 


16 


"FROM" Delimiter 
Description 


"TO" Delimiter 
Description 


20 













IEDQAN 



T 



A Total of 31 Entries 



T 



Key 






Status 





Data = Characters 




1 


Data = Idles (Reserve Characters) 




2 


Data = CONTRACT 




3 


TO = Character String 




4 


TO = Offset or SCAN 




5 


TO = Count 




6 


Inclusive FROM 




7 


Inclusive TO 





Data = REPLACE, TO = 



Character String: 
1 




2 


3 




Index to IEDQAP 
and Bit 


Status 


Index to 
IEDQAF 


Index to 
IEDQAO 


4 


Insert Data 


8 


Index to 
lEDQAJ 


Parameter 
List Length 


X'00' 


Register 
1 5 Offset 


12 


Blank 

Character 

(optional) 


Character String Address 



IEDQAP 



16 



"AT" 
Offset 
(optional) 



Bit 



ON— Remove at Scan Pointer 
OFF— Remove at Specified Offset 



Status See MSGEDIT parameter list for IEDQAN 

Insert Data 

Characters: Length of Character String (1 byte), Address 

of Character String (3 bytes) 
Idles: Number of Idles (1 byte). Idle Character (1 byte), X'0000" 
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MACRO 



MSGEDIT 
(Cont.) 



PARAMETER LIST 

Data = REPLACE, TO = Extent or Offset: 








1 






2 






3 






Index to IEDQAP 
and Bit 


Status 


Index to 
IEDQAF 


Index to 
IEDQAO 


4 


Insert Data 


8 


"TO" Extent 
or Offset 


"AT" Offset 
(optional) 



ROUTINE 
CALLED 



IEDQAP 



Bit See first MSGEDIT parameter list for IEDQAP 

Status See MSGEDIT parameter list for IEDQAN 

Insert Data 

See first MSGEDIT parameter list for IEDQAP 



Data = CONTRACT, TO = Character String: 
1 



12 



Index to IEDQAP 
and Bit 


Status 


Index to 
IEDQAF 


Index to 
IEDQAO 


Index to 
IEDQAJ 


X'08' 


X'OO' 


Register 
15 Offset 


Blank 

Character 

(optional) 


Character String Address 


"AT" Offset 
(optional) 

J 









IEDQAP 



Bit See first MSGEDIT parameter list for IEDQAP 

Status See MSGEDIT parameter list for IEDQAN 



Data = CONTRACT, TO = Extent or Offset: 
1 



Index to IEDQAP 
and Bit 


Status 


Index to 
IEDQAF 


Index to 
IEDQAO 


'TO" Extent 
or Offset 


"AT" Offset 
(optional) 



IEDQAP 



Bit See first MSGEDIT parameter list for IEDQAP 

Status See parameter list for IEDQAN 
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MACRO 

MSGEDIT 
(Cont.) 



PARAMETER LIST 

Offset specified in MSGEDIT Macro: 
1 



Index to IEDQA2 
and Bit 


Parameter List 
Length - X'OA' 


Index to 
IEDQAF 


Index to 
IEDQAO 


Insert Data 


"AT" Offset 









Bit 



7 ON-Data = Idles 

OFF— Data = Characters 



Insert Data 

See first MSGEDIT parameter list for IEDQAP 



Insert at Scan Pointer: 



Bit 



7 ON-Data = Idles 

OFF— Data = Characters 



Insert Data 

See first MSGEDIT parameter list for IEDQAP 



Bit 7 ON-Data = Idles 

OFF— Data = Characters 

Insert Data 

See first MSGEDIT parameter list for IEDQAP 



ROUTINE 
CALLED 



IEDQA2 










1 




2 




3 






Index to IEDQA2 
and Bit 


Parameter List 
Length - X'08' 


I ndex to 
IEDQAF 


Index to 
IEDQAO 


4 


Insert Data 



IEDQA2 



Index to IEDQA8 
and Bit 


Parameter List 
Length - X'OC 


Index to 
IEDQAF 


I ndex to 
IEDQAO 


Insert Data 


Extent between 
Inserts 


Index to 
IEDQAE 


Option Field 
Offset 



IEDQA8 
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PARAMETER LIST 



MACRO 



MSGGEN 



Status X'80' Use Table in DCB 
X'OO' Use Table Specified 








1 


2 




3 






Index to 
IEDQBL 


Parameter 
List Length 


Status 


Mask 


4 


Mask 
I 




! 


8 


l 

1 

Address of Message 

i 
l 


\ I 
I I 
I 1 


12 


I 

1 

Address of Table 

i 


I 1 
1 • 

! i 



ROUTINE 
CALLED 

IEDQBL 



MSG LIMIT 



Index to 
IEDQAE 


Parameter 
List Length 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



Reserved 


Limit 



IEDQAG 



MSGTYPE 



ORIGIN 



Index to IEDQAI 
and Bit 


Parameter 
List Length 


Register 
15 Offset 


Length 


Blank 
Character 


■ 


Address of Characters 






Bit 7 No Blank Character 



Index to IEDQAI 
and Bit 


Parameter 
List Length 


X'OO' 


Length 


Blank 
i Characters 
I 


Address of Characters 



Bit 7 No Blank Character 



IEDQAI 



IEDQAI 
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MACRO 

ORIGIN 
(Cont.) 



PARAMETER LIST 




OUTBUF 



OUTEND 



Index to 
IEDQA1 


Parameter List 
Length - X'08' 


X'OO* 


X'OO' 




I 
Address of Characters (AVTDOUBL) 

1 
1 


. 


There is no input parameter list for this routine. 

1 2 


3 


Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 


1 2 


3 


Index to 
IEDQAK 


Parameter List 
Length - X'04' 


Index to 
IEDQAF 


Index to 
IEDQAO 



ROUTINE 
CALLED 



IEDQA1 



IEDQAM 



IEDQAE 



IEDQAK 






1 


Index to 
IEDQA4 


Parameter List 
Length - X'02' 



IEDQA4 



OUTHDR 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



OUTMSG 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



Index to 
IEDQAK 


Parameter List 
Length -X'04' 


Index to 
IEDQAF 


I ndex to 
IEDQAO 



IEDQAK 






1 


Index to 
IEDQA4 


Parameter List 
Length - X'02' 



IEDQA4 
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MACRO 



PATH 



PARAMETER LIST 




Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Variable 
Length 


Blank 
Character 


• 


Address of Characters 



ROUTINE 
CALLED 



IEDQAI 



Bit 7 No Blank Character 
1 



Index to 
IEDQAE 


Parameter List 
Length - X'04' 


Option Field 
Offset 


Register 
15 Offset 



IEDQAE 



PRIORITY 



Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Length 


Blank 
Character 




! 

Address of Characters 

! 



IEDQAI 



Bit 7 No Blank Character 



REDIRECT 










1 




2 




3 






Index to IEDQAT 
and Bits 


Parameter List 
Length and Logical 


Status 


Mask 


4 




M 


ask 




8 


Destination 
Status 




i ' ' 
1 
Variable Data I 

1 

, , i 



IEDQAT 



Bits 



6 Recall is necessary 

7 Unconditional Mask 



Logical 7 AND 

Status X'01' indicates that the IEDQAT parameter list follows 

Destination Status and Variable Data 

C'S' + A L3 (0) — send to the source 
CD' + AL3 (0) - send to the destination 
C'N' + AL3 (destination name) — send to the 

named destination 
CO' + Index to IEDQAE + AL1 (option offset) - 

send to the destination named in the option field 
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MACRO 



SCREEN 



PARAMETER LIST 




Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Variable 
Length 


Blank 
Character 




Address of Characters 


■ 



ROUTINE 
CALLED 

IEDQAI 



Bit 7 No Blank Character 
1 



Index to IEDQAY 
and Bit 


Request 
Code 



IEDQAY 



Bit 7 ON— indicates that the user specified 

SCREEN = WDC, WLA, or WRE 
OFF— indicates that the user specified 
SCREEN with any other operand or no operand 
Request Code 

X'OO' SCREEN = WDC, no operand, or not WLA or WRE 
X'01' SCREEN = WLA 
X'02' SCREEN = WRE 



SEQUENCE 



Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


X'OO' 


Variable Length 
Indicator 


Blank 
Character 


Address of Characters 



IEDQAI 



Bit 7 No Blank Character 
1 



Index to 
IEDQAH 


Parameter List 
Length - X'02' 



IEDQAH 






1 


Index to 
IEDQAD 


Index to 
IEDQAF 



IEDQAD 



SETEOF 








1 


2 


3 




Index to IEDQAI 
and Bit 


Parameter List 
Length - X'08' 


Register 
15 Offset 


Variable 
Length 


Blank 
Character 




Address of Characters 





IEDQAI 



Bit 7 No Blank Character 
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MACRO 



SETSCAN 



PARAMETER LIST 




Index to IEDQAJ 
and Bit 


Parameter List 
Length - X'08' 


Status 


Register 
Offset 


Blank 
Character 


Address of Characters 



ROUTINE 
CALLED 



IED3AJ 



Bit 7 No Blank Character 

Status X'OO' Return Scan Pointer 
X'FF' Update Scan Pointer 



Index to IEDQAI 
and Bit 


Parameter List 
Length - X'06' 


Skip Count 


Blank 
Character 


X'OO' 





Bit 7 No Blank Character 
1 



IEDQAI 



Index to 
IEDQAO 


Parameter List 
Length - X'04' 


Skip Count 



IEDQAO 



UNLOCK 






1 


Index to 
IEDQBF 


X'OO' 



IEDQBF 



Data Area Layouts 1037 



SECTION 6. DIAGNOSTIC AIDS 



SCB EF.F.O* WORD USAGE BY MODULE 



SCBERP1 (Byte 0) 



*it 



Bit Indication (On/Off) 



Module Action 



T s/is not an incomplete header Checked by IEDQAT 

and IEDQAU. 
Checked by IEDQBD 
for IN/OUT message 
macro instructions. 
Checked by IEDQCI. 



T s/is not an invalid oriqin 

TSO is not/is in system 
Ts/is not hiqh sequence 

Ts/is not low sequence 



Checked the same as 

bit 0. 

Set by IEDQAM. 

Checked the same as 
bit 0. 

Checked the same as 

bit 0. 

Set by IEDQAH. 

Checked the same as 

bit 0, 

Set by IEDOAH. 



Messaqe is net/is sent/received Checked the same as 

bit 0. 

Are not/are sufficient buffers Checked the same as 

bit 0. 
Set by IEDQAK, 



Ts/is not a cutoff error 



Checked the same as 
bit 0. 



BVI to a selection device for Set by line End Appendage, 
BSC buffered terminals Checked by the user-coded 

macros. 



S CBEBP2 (Byte 1) 

Bit Bit Indicatii 







Core minimum is/is not 
exceeded 



Module Action 



Set by IEDQBD 
for AVT SYSEF. 
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Core maximum is/is not 
exceeded 



Error is/is not in a dynamic 
translate operation 

Is/is not automatic line 
numbering 

TOTE is not/is in the system 



Checked by IEDQED 
for IN/OUT message 
macro instructions. 
Checked by IEDQCI. 

Set by IEDQBD 
for AVT SY.SEF. 
Checked by IEDQBD 
for IN/OUT message 
macro instructions. 
Checked by IEDQCI. 

Set and checked the 
same as bit 1. 

Set and checked the 
same as bit 1 . 

Set by IEDQAA. 
Checked by the error 
macros. 



BSC abort sequences are/are not Set by Line End 
received Appendage. 

Checked by the error 

macros. 



Forward terminal error 



Set by IEDQAU and 

IEDQA5. 

Checked by the INMSG 

macro. 



Reserved 



SCBFPF3 (Byte 2) 



sit 





Bit Indication (On/Off) 
Message is lost/processed 



Terminal ID is invalid/valid 



Module Action 

Checked by IEDQBD 
for IN/OUT message 
macro instructions, 
Checked by IEDQCI. 
Set by IEDQFA and 
TEDQFQ for a lost 
message 

Checked by IEDQBD 
for IN/OUT message 
macro instructions. 
Checked and set by 
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Terminal is inoperative/oper- 
ative 



Simulated attention is/is not 
received 

Hser error has/has not 
occurred 

Is/is not format error in 
BSC messaqe 

Is/is not hardware attention 



Is/is not unit exception 



TEDQBT. 

Checked by IEDQCI. 

Checked by IEDQBD 
for IN/OUT messaqe 
macro instructions. 
Checked by IEDQCI. 

Checked the same as bit 2 



Checked the same as bit 2. 



Checked the same as bit 2 



Checked the same as 

bit 2. 

Set by IGG019BQ. 

Checked'the same as bit 2 
Set by IGE050UG, 



SCJ3EJBM (Byte 3) 



Bit 




Bit.. Indication (On/Off) 
Is/is not selection error 



Ts/is not error durinq 
text transfer 



Ts/is not error in 
connect/disconnect 



Module Action 

Checked by IEDQBD 
for IN/OUT messaqe 
macro instructions, 
Checked by IEDQCI. 
Set by IGG019RQ. 

Checked by IEDQAA. 
Checked by IEDQED 
for IN/OUT messaqe 
macro instructions, 
Checked by IEDQCI. 
Set by IGE0004G. 
Set by IGE0004H. 
Set by IGE010UG, 
Set by IGE0104H. 
Set by IGE0204H. 
Set by IGG019BQ. 

Checked by IEDQBD 
for IN/OUT messaqe 
macro instructions, 
Checked by IEDQCI. 
Set by IGE0304G. 
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Is/is not terminal error 



Is/is not line error 

Is/is not error in control 
unit 



Is/is not channel error 



Is/is not undefined error 



Checked by IEDQBD 
for IN/OUT message^ 
macro instructions. 
Checked by IEDQCI- 

Checked the same as bit 3, 

Checked the same as 
bit 3*. 

Set by IGE0104G. 
Set by IGE0104H, 

Checked the same as 
bit 3. 

Set by IGE0104G. 
Set by IGE0804G, 
Set by IGE0804H- 

Checked the same as 
bit 3„ 

Set by IGE0504G. 
Set by IGE0 50 4H, 
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TCB STATUS BYTE USAGE BY MODULE 



LCBSTAT1 



Bit 



Bit Indication (On/Off) 

Recall beinq/not beinq 
performed 



Line is/is not in control mode 



Operator control is not/is 

immediate 



Ts/is not initiate mode 



Ts/is not continue/reset 
operation 



Line is/is not free 



Line is/is not receiving 



Line is/is not sendinq 



Module Action 

Checked, turned off, 

and reset by IEDQED. 

Checked by IEDQFA and 

TEDQCT. 

Cleared by IEDQAA and 

TEDQAT. 

Checked by IEDQCI. 
Cleared by IEDQAA. 

Set by IEDQHK. 

Checked -and cleared by 

IEDQAA. 

Checked by IEDQCI. 

Beset by IEDQBD. 
Checked by IEDQFA, 
IEDQHM, and IEDQCI. 
Checked and cleared 
by IEDQAA. 
Set by TEDQCU. 
Checked by IEDQCI. 
Cleared by IEDQAA. 

Checked by IEDQCI and 

IEDQHK. 

Cleared by IEDQAA. 

Set by IEDQCU. 
Checked by IEDQGA 
and IEDQCI. 
Cleared by IEDQAA. 

Checked by IEDQAS , 
IEDQAG, IEDQAA, IEDQAW, 
IEDQA4, IEDQBD, 
TEDQCT, TEDQFA, 
IEDQGA, and IGG019RN. 
Checked and cleared 
by IEDQAA. 
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Notes; If both bits 6 and 7 are off, the line is inoperative. 
When a stop line function is being performed, IEDQHK set 
LCBSTAT1 equal to X'OO'. Also, IEDQAA and IEDQC2 set LCBSTAT1 
to X'OO' when TOTE asks for control; IEDQCO", IEDQCV, and IEDQCO 
test for this condition. 



LCBSTAT2 



Bit 




Bit Indication {On/Off) 

I/O trace is/is not active 
for this line 



Module Action 

Set and checked by 

IEDQCP, 

Checked by IEDQCI. 



Is/is not MSGGEN/startup 
message 



Turned off by IEDQBD. 
Checked by IEDQCI. 



EOT from a buffered terminal 
without/with EOH 



Checked by IEDQCI 



Send priority switch is/is not 
set by the send scheduler 



Checked by IEDQCI. 



Neqative response to polling 
is/is not received 



Checked by IEDQCI. 
Set by IEDQHK, 



Line is/is not BSC 



Checked by IGG019RN 
and IEDQCI. 



Is/is not a dial LCB 



Checked by IEDQAG, 
IEDQCI, IEDQCO, IEDQCZ, 
and IEDQHK, 



Do/do not owe a terminal 
a response 



Checked by IEDQAK and 

IEDQCI. 

Checked and cleared by 

IEDQA4. 
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FORMATTED TCAM DUMP 

A formatted TCAM dump is automatically produced as a part of the OS 
ABEND/SNAP storage dump when TCAM is resident in the system, 
ABEND/SNAP storaqe dumps occur immediately after an abnormal 
termination, provided that the control proqram or problem program has 
issued an ABEND or SNAP macro instruction, or when the operator issues 
a CANCEL command that requests a dump, and the proper dump data sets 
have been defined. 

The TCAM part of an MFT dump starts after the TRACE TABLE entries, 
and in an MVT dump, the TCAM part starts after the SAVE AREA TRACE 
entries. ^or a complete discussion of the CS portion of the dump, 
refer to the publication IBM System/ 360 OS Programmer's Guide to 
Debugging, GC28-6 670. 

The following discussion of the TCAM part of either the OS MFT or 
wvp dump is interspersed with sample sections from an ABEND dump. 
Capital letters represent the headings found in all dumps, and 
lowercase letters represent information that varies. The lowercase 
letter used indicates the mode of the information,, and the number of 
letters indicate the length of the information. 

• h represents 1/2 byte of hexadecimal information 

• d represents 1 byte of decimal information 

• c represents a 1-byte character 



TCAM 


ADDRESS VECTOR TABU 


hhhhhh 










SAVE 


AREA 1 














0000 
0020 
0040 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


SAVE 


AREA 2 














0048 
0060 
0080 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


SAVE 


AREA 3 














0090 
00A0 

ooco 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 


SAVE 


AREA « 














00D8 
00E0 
0100 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 


DISABLED SAVE AREA 












0120 
0140 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh hhhhhhhh 


hhhhhhhh 


hhhhhhhh 
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TCAM ADDRESS VECTOR TABLE hhhhhh 

is the starting address of the TCAM Address Vector Table (AVT) , 
which is generated by the INTRO macro instruction. The formatted 
dump of the AVT beginning with the. first save area, labeled SAVE 
AREA 1 , and endinq with the disk queues section, labeled DISK, 
follows the TCAM ADDRESS VECTOR TABLE hhhhhh headinq. 

SAVE AREA 1 

is the contents of the first save area defined in the AVT- The 
registers are saved in and restored from this area according to 
standard linkage conventions. Along the left-hand side of the 
dump are the relative offsets of this save area from the beginning 
of the AVT. 

SAVE AREA 2 

is the contents of the second save area defined in the AVT. The 
registers are saved in and restored from this area according to 
standard linkage conventions. Along the left-hand side of the 
dump are the relative offsets of this save area from the beginning 
of the AVT. 

SAVE AREA 3 

is the contents of the third save area defined in the AVT. The 
registers are saved in and restored from this area according to 
standard linkage conventions. Along the left-hand side of the 
dump are the relative offsets of this save area from the beginning 
of the AVT. 

SAVE AREA 4 

is the contents of the fourth save area defined in the AVT. The 
registers are saved in and restored from this area according to 
standard linkage conventions. Along the left-hand side of the 
dump are the relative offsets of this save area from the beginning 
of the AVT. 

DISABLED SAVE AREA 

is the contents of the fifth save area defined in the AVT. When 
a disabled TCAM routine gains control from the I/O Supervisor, it 
saves and restores consecutively the I/O Supervisor's registers 
through 9 in this save area. 



TABLE POINTERS 




01 48 hhhhhhhh hhhhhhhh 
0160 hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 


hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh 
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^ARLE POINTERS 

are the address of the first Device Characteristics Table, the 
address of the TCB of the TCAM MCP r the address of the TCAM Line 
I/O Trace Table, the Operator Control messaqe identification 
strinq, the scrambled password character strinq, and three work 
areas used by the internal TCAM loqic. The followinq table shows 
the different fields, their offsets relative to the beginninq of 
the AVT (which are alsc qiven on the left-hand side of the dump) , 
their lenqth, and their contents. 



+0148 



Address of the first Device Characteristics Table entry 



+01 4C 



Disabled parameter list 



+0150 



+0154 



Disabled doubleword scratch area 



+0158 



+01 5C 



Enabled doubleword scratch area 



+0160 



+0164 



The Operator Control message identification character string 



+0168 



+106C 



The scrambled password character string 



+0170 



Address of the TCB of the TCAM MCP 



+0174 



Address of the TCAM Line I/O Trace Table 



DISPATCHER READY QUEUES 



0178 
0180 
01A0 
01C0 



hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh 



hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 



DISPATCHER READY QUEUES 

qives the contents of the TCA*1 Dispatcher Ready Queues (one 
enabled, one disabled) and various other fields in this section of 
the AVT. The followinq table shows the different fields, their 
offsets relative to the beqinninq of the AVT (which are also qiven 
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on the left-hand side of the dump) their length, and their 
contents. 



+0178 



Enabled Ready Queue (points to first element to be dispatched) 



+01 7C 



First word of the disabled FIFO Ready Queue 



+0180 



Second word of the disabled FIFO Ready Queue 



+0184 



Checkpoint work area 



+0188 



Operator Control work area 



+01 8C 



+0190 



+0194 



Executable instructions to save the user's registers, if requested 



+0198 



Parameter List 



+019C 



Protection key 



+019D 



Address of the AVT 



+01 AO 



Address of additional optional parameters 



+01 A4 



Address of the TCAM Dispatcher Subtask Trace Table 



+01 A8 



Address of the Termname Table 



+01AC 



User exit address in the READY macro expansion 



+01 BO 



Address of the Line End Appendage BSC message scan subroutine (SCAN) 



+01 B4 



Address of the Line I/O Interrupt Trace routine (IGG019Q0) 



+01 B8 



+01 BC 



Tpost parameter list used by Operator Control 



+01 CO 



Address of Start Parameter List 



+01 C4 



Number of 
CIBs 



+01 C5 



Number of 
Checkpoint Requests 



+01 C6 



Number of line units 



+01 C8 



Address of Hold/Release Terminal routine (IEDQAS) 
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TCB POINTERS 
01CC 



hhhhhhhh 



hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 



^CB POINTEBS 

aives the addresses of the TCBs for Checkpoint, Operator Control, 
On-Line Test, and the EE Common Write task. These tasks are 
attached tasks of the TCAM MCP. The followinq table shows the 
fields containina the addresses and the offsets of the fields 
relative to the beqinninq of the AVT. 



+01 cc 



Address of the Checkpoint TCB 



+01 DO 



Address of the Operator Control TCB 



+01 D4 



Address of the On-Line Test TCB 



+01 D8 



Address of the FE Common Write TCB 



ECBS 


















01DC 
















hhhhhhhh 


01E0 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0200 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0220 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0240 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 













:cbs 



contains the addresses of some of the internal routines and 
subtasks of the TCAM MCP, the addresses of certain TCAM tables, 
the Checkpoint ECB, the On-Line Test ECB, the Operator Control 
ECB, the ECB used by the TCAM Dispatcher to cause TCAM to enter a 
wait state when the Beady Queues are empty, and the address of the 
FE Common Write ECB. The followinq table qives a list of the 
different fields, their contents, and their relative offsets from 
the beqinninq of the AVT (which are also qiven on the left-hand 
side of the dump) . 



Diagnostic Aids 1049 



+01 DC 


Address of the FE Common Write ECB 


+01 E0 


Checkpoint ECB 


+01 E4 


On-Line Test ECB 


+01E8 


Operator Control ECB 


+01 EC 


ECB used by the Dispatcher to cause TCAM to be in wait state 


+01 FO 


Address of the first Process Entry Control Block 


+01 F4 


Address of the Option Table 


+01 F8 


Addres* of the I/O Generator in the Activate subtask 


+01 FC 


Address of the user trace exit 


+0200 


Address of the Cross Reference Table 


+0204 


Address of the Communications Parameter List 


+0208 


Address of the User Interface routine (IEDQUI) 


+020C 


Address of the Return Interface routine (IEDQLM) 


+0210 


Address of the routine to remove an element from 
the Time Delay QCB (IEDQHG02) 


+0214 


Address of the Address Finder routine (IEDQAL) 


+0218 


Address of the Buffer Association routine (IEDQGD) 


+021C 


Address of the Transparency CCW Builder routine (IEDQGT) 


+0220 


Address of the Buffer Step routine (IEDQAX) 


+0224 


Address of the TCAM Dispatcher (IGG019RB or IGG019RO) 


+0228 


Address of the Leased Receive Scheduler (IGG019R3) 
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+022C 



Address of the Send Scheduler (IGG019R4) 



+0230 



Address of the Get Scheduler (IEDQEW) 



+0234 



Address of the Put Scheduler (IEDQEC) 



+0238 



Address of the Get FIFO Scheduler (IEDQEZ) 



+023C 



Address of the Log Scheduler (IEDQBZ) 



+0240 



Address of the Dial Receive Scheduler (IGG019R1) 



+0244 



Address of the Buffered Terminal Scheduler (IGG019RD) 



+0248 



Address of the Retrieve Scheduler (IEDQE7) 



SPECIAL 

024C 
0260 
0280 
02A0 
02C0 


ELEMENTS 

hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 



SPECIAL ELEMENTS 

contains the Interval Checkpoint element, a special element to 
reauest removal of the Interval Checkpoint element from the Time 
^elav Oueue, the Incident Checkpoint element, and several address 
and constant areas used by the internal TCAM logic. The following 
table gives a list cf the different fields, their contents, their 
size, and their relative offsets from the beginning of the AVT. 
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+024C 


Reserved 


+0250 


Reserved 


+0254 


Reserved 


+0258 


Reserved 


+025C 


Reserved 


+0260 


Reserved 


+0264 


Reserved 


+0268 


Reserved 


+026C 


Reserved 


+0270 


Dummy Line ECB 


+0274 


Address of the Translation List for IEDQA3 


+0278 


Address of the World Trade Tone Characters 


+027C 


Address of the Operator Awareness Message Router routine (IEDQNX) 


+0280 


Address of the I/O Trace Table Handler routine (IGG019Q0) 


+0284 


Address of the System Delay QCB 


+0288 


Address of the Stop Line QCB 


+028C 


Special element to cause removal of the Checkpoint J. 





element Trom tne i ime ueiay uue 


;ue 






+029C 
"+02A0 


Element to request Interval Checkpoint 





+02A4 

Size of SCB 


+02A5 

Address of Checkpoint QCB 


+09A8 

-ru^o Checkpoint Request 
element flags 


+02 A 9 Number of 

Checkpoint Records 


+02AA „«..■.■• 

Checkpoint time interval 


+02AC 

Time of day 


of interrupt 


+02AE Offset to 

Checkpoint QCB 


+02 A F 


Open error 
locator 


+02B0 

Open module 


D having error 


+02B2 

Type of Open error 


+02B3 


Checkpoint Time 
Delay Status 


+02B4 Open translate 
byte 


+02B5 

Address of Time Delay subroutine (IEDQHG01) 
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+02B8 offset to Binary 
Search routine 



+02B9 



Link field on Time Queue 



+02BC 



Dummy last element 



-K)2C0 



Address of dummy last element 



+02C4 



-K)2C8 



Incident Checkpoint Element 



+02CC 



Half word constant X'0000' 



+02CE 



Halfword constant X'FFFF' 



+O2D0 



Address of current buffer being processed (by Message Handler) 



+02D4 



Address of the 2260 Local Line End Appendage (IGG019R5) 



+02D8 



System error 
flag byte 



Address of list of V-type address constants 



QCB POINTERS 
















02DC 
















hhhhhhhh 


02E0 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0300 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0320 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0340 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0360 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0380 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 











OCB POINTERS 

contains the Available Buffer QCB, the Buffer 
Checkpoint QCB, the Operator Control OCB, the 
the Activate OCB, the Closedown QCB, the QCB 
Checkpoint element from the Time Delay Queue, 
the CPB Cleanup OCB, the address of the Start-up 
address of the Time Sharing Input QCB, the 
application proqram OP^N/CLOSE routine, the addre 
byte of main storaqe obtained by GET MATH for the 
a word containinq the number of buffer units 
main storaqe messaqe queues data set, and a fullw 
zeroes. The followinq table qives a list of the 
their contents, their size and their relative 
beqinninq of the AVT. 



Eeturn QCB, the 
On-Line Test QCB, 

to remove the 
the* Disk I/O QCB, 
Messaqe QCB, the 

address of the 
ss of the first 
buffer unit pool, 
beinq used by the 
ord constant of 
different fields, 
offsets from the 
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+02DC 



Queue of available insert blocks 



+02E0 



Address of the Start-up Message QCB 



+02E4 



Address of the Time Sharing Input QCB 



+02E8 



Address of the application program OPEN/CLOSE routine (IEDQEU) 



+02EC 



Time Delay QCB 



+02FC 



Reference Time 



+02FE 



Dummy INEND/OUTEND AVT 



+0300 
+0304 



SVC 102 parameter list, used to cause SVC 102 to tpost the Time 



Delay QCB to itself when a timer interrupt occurs 



+0308 



Time Del*y Queue 



+030C 



I 



Available Buffer QCB 



i 



+0318 



Buffer Return QCB 



+0324 



3 
3 



Checkpoint QCB 



1 
1 



+0330 



Operator Control QCB 



+033C 



On-Line Test QCB 



i 



+0348 



3 



Activate QCB 



+0354 



Closedown QCB 



5 
5 



+0360 



QCB to remove Checkpoint element from Time Delay Queue 



+036C 



Disk I/O QCB 



3. 



+0378 



CPB Cleanup QCB 



I 



+0384 



Address of area obtained by GETMAIIM for buffer unit pool 



+0388 



Number of buffer units being used by main storage message queues 



+038C 



Fullword constant of zero 
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INTERFACE 

0390 

03A0 hhhhhhhh 
03C0 hhhhhhhh 
03E0 hhhhhhhh 
0400 hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh 
hhhhhhhh 
hhhhhhhh 
hhhhhhhh 


hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 
hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 



T NTE?FACE 

contains 
pool , th 
of lines 
offset i 
terminal, 
number o 
number of 
fermname 
several c 
restart 
^XCP or 1R 
for addit 
area, tw 
all used 
qives a 
and their 



a GETMAIN parameter list used to obtain the buffer unit 
e Key lenqth specified for the messaqe queues, the number 
opened, the number of lines in the system delay, the 
nto the Termname Table of the Primary Operator Control 

the number of buffer units in the buffer pool, the 
f lines serviced by the Start-up Messaqe subtask, the 

seconds of the system delay, the offset into the 

Table of the dead-letter queue terminal, three flaqs and 
onstants used by the internal TCAM loqic, the number of 
Checkpoint records, the number of buffers or CPBs on the 
etry Queue, and the address of the FE patch module used 
icnal serviceability routines. Also, there is an FE work 
o parameter list pointers, two ECBs, and four flaq bytes 
by the FE Common Write subtask. The followinq table 
list of the different fields, their contents, their size, 

relative offsets from the beqinninq of the AVT. 
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+0390 



Address of the FE Patch module (IEDQFE) 



+0394 



First parameter list pointer 



+0398 



First ECB 



+039C 



FE flag byte 1 



+039D 



+039E 



+039F 



FE flag byte 2 



FE flag byte 3 



FE flag byte 4 



+03A0 



Second parameter list pointer 



+03A4 



Second ECB 



+03A8 

+03AC 
+03B0 

+03B4 
+03B8 
+03BC 

+03C0 
+03C4 
+03C8 
+03CC 
+03D0 
+03D4 
+03D8 
+03DC 
+03E0 

+03E4 
+03E8 



FE work area 
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+03EC 
+O3F0 


























+03F4 

+03F8 
+03FC 


GETMAIN parameter list 




— 




+03FE 


Halfword constant of 2 




+0400 


Ha If word constant of 3 


+0402 


Halfword constant of 4 




+0404 


Halfword constant of 7 


+0406 


Halfword constant of 16 




+0408 


Key length on message queues 


+040A 


Number of lines opened 




+040C 


Number of lines 
in system delay 


+040E 


Offset tp Primary Operator 
Control terminal 




+0410 


Number of buffer units 
in buffer unit pool 


+0412 


Number of lines serviced by 
Start-up Message subtask 




+0414 


Number of seconds 
of system delay 


+0416 


Offset to dead-letter 
terminal 




+0418 


BR instruction 


+041 A 


Flag byte 1 


+041 B 

Flag byte 2 


+041 C 


Flag byte 3 


+041 D 

Number of Restart 

Checkpoint Records 


+041 E 


Number of buffer or CPBs 
on EXCP or Retry Queue 





Note: This is the end of the AVT when ENVIRON=TSO has been 
specified on the INTRO macro instruction. 



CORE QUEUE 

0420 hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 



hhhhhhhh hhhhhhhh 



COHE QUEUE 

contains the address of the Destination Assiqnrcent routine, the 
values specified by the MSMTN=, MSMAX=, and MSUNTTS= operands of 
the INTFO macro instruction, and a queue of buffers and ERBs 
waitinq tc be processed. The follcwinq table qives a list of the 
different fields, their contents, their size, and their relative 
offsets from the beqinninq of the AVT. 
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+0420 



Address of the Destination Assignment routine (IEDQHM02) 



+0424 



MSMIM=integer 



+0428 



MSMAX=integer 



+042C 



Number of units usable in main storage queues (MSUNITS=integer) 



+0430 



+0434 



Queue of buffers and ERBs waiting 
to be processed 



DISK 


















0438 














hhhhhhhh 


hhhhhhhh 


0440 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0460 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


0480 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


04A0 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


04C0 


hhhhhhhh 


hhhhhhhh 


hhhh 













D^SK 



contains the queues and control information for the disk message 
queues (reusable and nonreusable) for the TCAM MCP. The following 
table gives a list of the different fields, their contents, their 
size, and their relative offsets from the beginning of the AVT. 



1058 



+0438 



Address of the Disk EXCP Driver routine (IGG019RC) 



+043C 



Address of the Reusability subtask (IGG019RP - REUS) 



+0440 



Address of the Copy subtask QCB (IGG019RP - COPY) 



+0444 



+0448 



Disabled queue of CPBs to be processed by CPB Cleanup 



+044C 



+0450 



Enabled queue of CPBs to be processed by CPB Cleanup 



+0454 



+0458 



Queue of CPBs waiting for buffers 



+045C 



+0460 



Queue of CPBs being returned to the Reusability subtask by CPB Cleanup 



+0464 



+0468 



Queue of CPBs requesting I/O to be done by the Disk EXCP Driver 



+046C 



Queue of inactive CPBs, called the CPB Free pool 



+0470 



Address of the CPB Free pool 



+0474 



Address of list of lOBs for reusable disk queues 



+0478 



Address of list of lOBs for non-reusable queues 



+047C 



Reusable disk queue when Reusability subtask activated 



+0480 



Address of DEB (reusable disk) 



+0484 



Number of extents (reusable disk) 



+0488 



Number of records per track (reusable disk) 



+048C 



Number of tracks per cylinder (reusable disk) 
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+0490 



Number of records in entire data set (reusable disk) 



+0494 



Product of number of extents times number of records 
per track (reusable disk) 



+0498 



Address of DEB (non-reusable disk) 



+049C 



Number of extents (non-reusable disk) 



+O4A0 



Number of records per track (non-reusable disk) 



+04A4 



Number of tracks per cylinder (non-reusable disk) 



+04A8 



Number of records in entire data set (non-reusable disk) 



+04AC 



Product of number of extents times number of records 
per track (non-reusable disk) 



+04BO 



Absolute record number that is the threshold to cause 
closedown due to filling of the non-reusable disk queue 



+04B4 



Non-reusable disk queue 



+04B8 



Reusable disk queue 



+04BC 



Non-reusable Threshold Closedown Element 



J~ 



+04C8 



CPB = integer 



Note: This is the end of the AVT. 



TNT 


hhhhhh 


CODE hhhhhhhh hhhhhhhh hhhhhhhh 


hhhhhhhh 


hhhhhhhh 






hhhhhhhh hhhhhhhh hhhhhhhh 


hhhhhhhh 


hhhh 






SRCHX hhhh ENLEN hh MIDEN hhhhhh LEN 


hhhh 








DCOOE hhhhhhhh hhhhhhhh hhhhhhhh 


hhhhhhhh 


hhhhhhhh 






hhhhhhhh hhhhhhhh hhhhhhhh 


hhhhhhhh 





TNT hhhhhh 

is the address of the TCAM Termname Table, which contains the 
names and addresses of all of the Terminal Table entries. (Each 
of the Terminal Table entries is displayed following this section 
of the dump.) 

CODE 

is the executable Termname Table code that converts the invitation 
list relative position field into the absolute address of the 
Terminal Table entry. This code is used only by enabled routines. 

SPCHX hhhh 

is the search extent factor. 
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ENLEN hh 

is the number of bytes in each entry. 

MTDEN hhhhhh 

is the absolute address cf the middle entry, 

LEN hhhh 

is the total number of entries. 

DCODE 

is the executable Termname Table code that converts the invitation 
list relative position field into the absolute address of the 
Terminal Table entry. This code is used only by disabled 

routines. 

followinq the TNT section of the dump are each of the Terminal Table 
entries alonq with their Option Table entries (if any exist) and 
contents. Some additional fields in each of the Terminal Table 
entries may or may not be present accordinq to the optional parameters 
specified on the TERMINAL macro instruction. These are discussed 
where applicable. There are four different types of entries in the 
Terminal Table. They are sinqle entries, list ent'ries (cascade and 
distribution). Process entries, and Line entries. The followinq four 
sections qive an example of each type of entry. Each of the four 
types of entries has a STATE field. The followinq table is a list of 
the tit meaninqs of this one-byte status field. 

JUJS1 MIMING 

0-2 000 = sinqle entry 

001 = process entry 

010 = list entry (cascade or distribution) 

100 = line entry 

3 always for a list or process entry 
always 1 for a sinqle or line entry 

4 = POT type process entry (if process entry) 
1 = GET type process entry (if process entry, 

always 1 for other type entries) 

5 = terminal is not in HOLD mode 
1 = terminal is in HOLD^mcde 

6 = no option fields used 
1 = option fields used 

7 = not secondary Cperatcr Control terminal 
1 = secondary Operator Control terminal 
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The following is an example of a single entry. 



NAME cccccccc 

TRN hhhhhh STATE/DESTQ hhhhhhhh IN/OUTSEQ hhhhhhhh 


ALTD/DEVFL hhhhhhhh 


STAT hhhhhhhh 


CHCIN/OPNO/OPTBL hhhhhhhh 


NAME ADDR OPTION FIELD 
cccccccc hhhhhh hhhhhhhh 
cccccccc hhhhhh hhhhhhhh 








BUFFS I ZE hhhh 
DIAL DIGITS hhhhhhh 
ADDR CHAR hhhhhh 
BLOCK hhhh 
SUBBLOCK hh 
TRANS BLOCK hhhh 
BFDELAY hhhh 
TIME SHARING hhhh 









NAME cccccccc 

is the name in the Termname Table of this Terminal Table entry. 

TPM hhhhhh 

is the address of the Terminal Table entry. 

ST&TE/DESTO hhhhhhhh 

The first byte is the status byte of the Terminal Table entry. 
The last three bytes contain the address of the Destination QCB 
for this entry. 

TN/OUTS^O hhhhhhhh 

The first two bytes contain the next expected input sequence 
number. The second two bytes contain the next output sequence 
number to be used. 

AtTD/DEVFL hhhhhhhh 

The first two bytes contain the offset into the Terminal Table of 
the alternate destination for this entry. The last two bytes are 
f laq bytes used by the internal TCAM loqic. The followinq table 
is a list of the bits and their meaninqs. 

BIT (S) MEANING 

EUFSIZE= specified 

1 Dial diqits present 

2 Addressinq characters present 

3 BIOCK= specified 

4 SUBBLCK= specified 

5 TRANSP= specified 

6 BEDELAY= specified 

■7 Time Sharinq field present 
8-15 Reserved 

STAT hhhhhhhh 

is a word for error statistics. 

CHCTN/OPNO/OPTEI hhhhhhhh 

The first byte is the index to the Device Characteristics Table 
for this entry. The second byte qives the number of option fields 
for this entry. The next two bytes contain the offset into the 
Option Table for the option fields for this entry. 
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NAME ADDB OPTION ETELES 
cccccccc hhhhhh hhhhhhhh 

qives a list of the names, addresses, and contents of each of the 

option fields for this entry. 

* UP* 1 SIZE hhhh 

is the output buffer size for this entry. This value is qiven in 
the dump only when a nonzero value has been specified on the 
Btjfstze = operand of the TERMINAL macro. 

DIAL DIGITS hhhhhhh 

is the telephone number of this terminal. This field is qiven in 
the dump only when the CALL= operand of the TERMINAL macro has 
been specified, except where CALL=NONE was specified. 



ADD*} CHAP hhhh 

is the addressinq characters for the terminal as specified on 
ADDP= operand of the TERMINAL macro. 



the 



BLOCK hhhh 

is the number of bytes to be transmitted in each block of data in 
non-transparent mode for messaqes sent to this terminal. The 
value corresponds to the value specified in the BLOCK= operand of 
the TERMINAL ma>cro and is not qiven in the dump if the value was 
not specified. 

STJEBLOCK hh 

is the number of bytes to be transmitted in each sub-block of data 
in non-transparent mode for messaqes sent to this terminal. The 
value corresponds to the value specified in the SUBBLCK= operand 
of the TERMINAL macro and is not qiven in the dump if the value 
was not specified. 

B^DELAY hhhh 

is the number of seconds of delay to be used between message 
blocks beinq sent to a buffered terminal. This field is given in 
the dump only if the BFDELAY= operand of the TERMINAL macro has 
been specified. 

TIME SHAPING hhhh 

is a field used by Time Sharinq. In the case that this entry is 
an IBM 2260 or an IBM 2265, the first byte is the number of lines 
that can be displayed and the second byte is the number of 
characters per line. If the terminal is not an IBM 2260 or an IBM 
2265, both tytes are zero. This field is qiven in the dump only 
when Time Sharinq is beinq used. 

T he ^ollowinq is an example of a list entry. 



name cccccccc 

TRM hhhhhh STATE/DESTQ hhhhhhhh TLISTCNT hhhh 

LIST ENTRIES 
cccccccc 
cccccccc 
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NAME cccccccc 

is the name in the Termname Table of this Terminal Table entry. 

TT?H hhhhhh 

is the address of the Terminal Table entry. 

STATE/DESTQ hhhhhhhh 

The first byte is the status byte of the Terminal Table entry. 
^he last three bytes contain the address of the Destination QCB. 

TLTSTCNT hhhh 

is the number of entries in this distribution or cascade list. 

LIST ENTRIES 

is a list of the names that appear in the cascade or distribution 

list. 



The following is an example of a line entry. 



NAME cccccccc 

TRM hhhhhh STATE/DESTQ hhhhhhhh IN/OUTSEQ hhhhhhhh ALTD/DEVFL hhhhhhhh STAT hhhhhhhh CHCIN/OPNO/OPTBL hhhhhhhh 

NAME ADDR OPTION FIELD 
cccccccc hhhhhh hhhhhhhh 
cccccccc hhhhhh hhhhhhhh 

ADDR CHAR hhhhhh 



NAME cccccccc 

is the name in the Termname Table of this Terminal Table entry. 

TPM hhhhhh 

is the address of the Terminal Table entry. 

STATE/DESTQ hhhhhhhh 

The first byte is the status byte of the Terminal Table entry. 
The last three bytes contain the address of the Destination QCB 
for this entry. 

TN/OUTSEO hhhhhhhh 

the first two bytes contain the next expected input sequence 
number. The second two bytes contain the next output sequence 
number to be used. 

ALTD/DEV^L hhhhhhhh 

The first two bytes contain the offset into the Terminal Table of 
the alternate destination for this entry. The last two bytes are 
flaq bytes used by the internal TCAM loqic. The following table 
is a list cf the bits and their meanings. 
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BTT(S) 



MEANING 




1 
2 
3 
4 
5 
6 

7 

1-15 



BUFSIZE= specified 

Dial diqits present 

Addressinq characters present 

BIOCK=specif ied 

SUBBLCK=specified 

TPANSP=specif ied 

BFDEL A Y= specified 

Time Sharinq field present 

Feserved 



Stat hhhhhhhh 

is a word fcr error statistics. 

CHCIN/OPNO/OPTEI hhhhhhhh 

The first byte is the index to the Device Characteristics Table 
for this entry. The second byte qives the number of option fields 
for this entry. The next two bytes contain the offset into the 
Option table for the option fields for this entry. 

NAME ADDS OPTION FIELDS 
cccccccc hhhhhh hhhhhhhh 

qives a list of the names, addresses, and contents of each of the 

option fields for tMs entry. 



ADDS CHAP hhhh 

is the addressinq characters for the terminal as specified on 
ADDF = operand of the LINE macro. 



the 



The followinq is an example of a process entry. 



name cccccccc 

TRM hhhhhh STATE/DESTQ hhhhhhhh IN/OUTSEQ hhhhhhhh ALTD/DEVFL hhhhhhhh STAT hhhhhhhh CHCIN/OPNO/OPTBL hhhhhhhh 

NAME ADDR OPTION FIELD 
cccccccc hhhhhh hhhhhhhh 
cccccccc hhhhhh hhhhhhhh 



TCAM DESTINATION QCB'S 




QCB hhhhhh DSFLG/ELCHN hhhhhhhh PRI/LINK hhhhhhhh 
EOLDT/STAT hhhhhhhh SCBOF/INSRC hhhhhhhh 
RELLN/DCBAD hhhhhhhh FLAG/QBACK hhhhhhhh 


STVTO/STCHN hhhhhhhh STPRI/SLINK hhhhhhhh 
INTVL/MSGCT hhhhhhhh PRLVL/LKRRN hhhhhhhh 


PRIORITY QCB hhhhhh 

DNHDR hhhhhh FHDLZ hhhhhh FHDTZ hhhhhh 
FFEFO hhhhhh LFEFO hhhhhh CFHDR hhhhhh 


iNTFF hhhhhh INTLF hhhhhh 
PRIPQ hh CPVHD hhhhhh 



NAME cccccccc 

is the name in the Termname Table of this Terminal Table entry. 

T^M hhhhhh 

is the address of the Terminal Table entry. 



STATE/DESTO hhhhhhhh 

The first byte is the status byte of the Terminal Table entry. 
The last three bytes contain the address of the Destination QCB 
for this entry. 
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TN/OUTSEO hhhhhhhh 

The first two bytes contain the next expected input sequence 
number. The second two bytes contain the next output sequence 
number to be used. 

ALTD/DEVEL hhhhhhhh 

The first two bytes contain the offset into the Terminal Table of 
the alternate destination for this entry. The last two bytes are 
flaq bytes used by the internal TCAM loqic. The followinq table 
is a list of the bits and their meanings. 

BITJS1 MEANING 

BU?SIZE= specified 

1 Dial diqits present 

2 Addressinq characters present 

3 EIOCK= specified 

, 4 SUBBLCK= specified 

5 TPANSP= specified 

6 BEDELAY= specified 

7 Time Sharinq field present 
8-15 Peserved 

STAT hhhhhhhh 

is a word for error statistics. 

CHCTN/OPNO/OPTEI hhhhhhhh 

the first byte is the index to the Device Characteristics Table 
for this entry. The second byte qives the number of option fields 
for this entry. The next two bytes contain the offset into the 
Option table for the option fields for this entry. 

NAME ADDP OPTION FIELDS 
cccccccc hhhhhh hhhhhhhh 

qives a list of the names, addresses, and contents of each of the 

option fields for this entry. 

TCAM DESTINATION CCB'S 

qives the Destination QCBs for all of the Terminal Table entries. 
These QCBs are used to control the messaqe queuing for the 
terminals in the TCAM system. Each QCB may service one or more 
terminals depending upon the type of queuing specified in the 
TEPMTNAL macro. Each of these QCBs consists of a Master QCB and 
one or more priority level QCBs. Priority QCBs are generated due 
to the LEVE1= operand of the TERMINAL macro. If this operand is 
omitted, only one priority level QCB is qenerated and its priority 
is X'OO'. Whether or not the LEVEL= operand is specified, the 
X'OO 1 priority level QCB is qenerated. 

OCB hhhhhh 

is the starting address of the Master QCB. 
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15SFLG/T3LCHN hhhhhhhh 

The first byte is a flaq byte indicatinq the type of queuing being 
used by this OCB. The next three bytes contain the address of the 
next element in the chain. 

P*I/LTNK hhhhhhhh 

The first byte is the priority of this OCB. The last three bytes 
contain the address if the next STCB in the chain. 

STVTO/STCHN hhhhhhhh 

The first byte is the index to the entry in the Subtask Vector 
Table. The last three bytes contain the STCB chain, 

STP^T/SLTNK hhhhhhhh 

The first byte is the priority of the STCB. The last three bytes 
contain the address of the next STCB in the chain. 

FOLTD/STAT hhhhhhhh 

The first two bytes contain the interrupt time used by the Time 
Delav routine. The third byte is the LOCK relative line number, 
and the fourth byte is the OCB status byte. 

SCPOF/INSPC hhhhhhhh 

The first byte is the offset to the proper SCB for the current 
transmission. N The next three bytes contain the address of the 
first LCB in the source ICB chain. 

TNTVL/MSGCT hhhhhhhh 

^he first two bytes contain the value as specified on the CLOCK= 
or TNTVT.= operand of the TERMINAL macro. The second two bytes 
contain the ccunt of the messages on this queue, 

*>PLVL/LK'flEN hhhhhhhh 

The first byte is the priority of the highest priority level 
messaqe in the queue. The last three bytes contain the LOCK 
relative record number. 

RFILN/DCBAD hhhhhhhh 

The first byte is the relative line number for the line that this 
OCB represents. The last three bytes contain the address of the 

DCB. 

^LAG/QBACK hhhhhhhh 

^he first* byte is an additional status byte for the QCB. The last 
three bytes contain the OBACK messaqe chain. 

^TOSITY QCB hhhhhh 

is the address of this priority level QCB. 

D^FD* hhhhhh 

is the disk record number assiqned to the next header that is 
received. 

FHDLZ hhhhhh 

is the disk record number of the first header placed in the last 
zone used by this queue. 
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FH'DTZ hhhhhh 

is the disk record number of the first header placed in the 
current zone. 

TNT*? hhhhhh 

is the disk record number of the first held message in this queue 
(placed in FEFO order) . 

INTLF hhhhhh 

is the disk record number of the last held messaqe in this queue 
(placed in FEFO order) . 

*FEFO hhhhhh 

is the disk record number of the first messaqe that has not been 
sent (placed in FEFO order) . . 

IT'EFO hhhhhh 

is the disk record number of the last messaqe that has not been 
sent (placed in FEFO order) . 

CFHDR hhhhhh 

is the main storaqe queue address of the first header appearinq in 
this queue, 

PFTPQ hh 

is the priority level of this priority level QCE. 

CPVHDB hhhhhh 

is the main storaqe queue address of the last header appearing in 
this queue. 



TCAM DCB'S 










DCB hhhhhh (LINE GROUP) 










DEVICE INTERFACE- hhhhhhhh 


hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 




D/S INTERFACE hhhhhhhh 


hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 




FOUNDATION hhhhhhhh 


hhhhhhhh hh 








EXTENSION 


hhhhhh hhhhhhhh hhhhhhhh 




INVITATION LISTS hhhhhhhh 










LCB hhhhhh KEY/QCBA hhhhhhhh 


PRI/LINK hhhhhhhh 


RSKEY/STCBA hhhhhhhh 


RSPRI/RSLNK 


hhhhhhhh 


EOLTD/TSOB hhhhhhhh 


CHAIN/INSRC hhhhhhhh 


SCBO/SCBDA hhhhhhhh 


ISZE/FSBRF 


hhhhhhhh 


FLAGS/SENSE hhhhhhhh 


ECBCC/ECBPT hhhhhhhh 


FLAG3/CSW hhhhhhhh 




hhhhhhhh 


SIOCC/START hhhhhhhh 


DCBPT hhhhhhhh 


RCQCB hhhhhhhh 


INCAM/ERRCT 


hhhhhhhh 


UCBX/RCBFR hhhhhhhh 


RECOF/STATE hhhhhhhh 


TSTSW/RECAD hhhhhhhh 


ERBKY/ERBQB hhhhhhhh 


ERBPY/ERBLK hhhhhhhh 


ERBST/ERBCH hhhhhhhh 


ERBCT/TTCIN hhhhhhhh 


MSGFM/SCBA 


hhhhhhhh 


ERMSK/INVPT hhhhhhhh 


TPCD hhhhhhhh 


hhhhhhhh 




hhhhhhhh 


SNSV/CSWSV hhhhhhhh 


hhhhhhhh 


ERCCW hhhhhhhh 




hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 




hhhhhhhh 



TCaw DCB'S 

qives the three different types of TCAM DCBs: the Line Group DCBs 
(alonq with their related LCBs) , the Messaqe Queues DCEs, and the 
Checkpoint DCB. (Note: The Messaqe Queues DCEs are not given in 
the dump if the TCAM system does not use disk queuinq, and the 
Checkpoint DCB is not qiven in the dump if the Checkpoint/Hestart 
facility is not beinq utilized.) 

DCB hhhhhh (LINE GROUP) 

is the startinq address of this Line Group DCB ? 
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DEVICE INTERFACE 

This section is reserved. 



D/S INTERFACE 

contains the 
operations, 
operations, t 
Group, the 
Interruption 
number of b 
for each line 
lOBs, the r 
address of th 
an LCB) , an 
shows these f 
the DCB, thei 



number 
the numb 
he addres 
pollinq 
options, 
uffers to 

in the L 
elative 
e Transla 
d the ad 
ields, th 
r content 



of buffe 
er of bu 
s of the 
delay 
the Dat 
be used 
ine Grou 
priority 
tion Tabl 
dress of 
eir relat 
s and the 



rs 

ffer 

Me 

int 

a S 

at a 

Pr 

of s 
e, t 
the 
ive 
ir s 



assiqned initially for input 
s assiqned initially for output 
ssaqe Handler for this Line 
erval, the Proqram-Controlled 
et orqanization, the maximum 
ny qiven time for data transfer 
the Open-Base for addressinq 
end and receive operations, the 
he extended IOB index (size of 
exit list. The followinq table 
offsets from the beqinninq of 
ize. 



+14 


Initial j Initial 
Receive i Send 
Allocation | Allocation 


+15 


Address of the Message Handler 


+18 


Polling delay interval 


+19 


PCI options- 


+1A 

Data Set organization 


+1C 


Maximum Send or 
Receive Allocation 


+1D 


Open-Base for addressing lOBs 


+20 


Priority of 
Send/Receive Operations 


+21 


Address of the Translation Table 


+24 


IOB index 


+25 


Address of the exit list 



v ot more detailed information on these fields, refer to the 
publication, IBM System/ 3 60 Operating System System Control Blocks, 
GC2A-6628. 

"FOUNDATION 

contains fields that are chanqed durinq Open, Before Open, these 
fields contain the DDNAME character strinq, the Open flaqs, the 
IOS error flaqs, and the Macro Instruction reference, * After Open, 
they contain the offset of the DD entry from the beqinninq of the 
TIOT, the Macro Instruction Reference, the IOS error flaqs, the 
address cf the DEB, and the Open flaqs. The followinq two. tables 
show this area and its contents before and after Open. 

Before Open: 



+28 



+2C 



+30 



DDNAME character string 



Open 
flags 



+31 



IOS error 
flags 



+32 



Macro Instruction Reference 
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i?ote: During Open, the TOS error flaas field and the Macro 
Instruction reference field are relocated and the last three b.ytes 
of the last word become part of the EXTENSION section. 

After Open: 



+28 Offset of DD entry from 
beginning of the TIOT 


+2A 

Macro Instruction Reference 


+2C | OS error 
flags 


+2D 

Address of the DEB 


+30 Open 
flags 







'or more detailed information on these fields, refer to the 
publication, IBM System/360 Operating System System Control Blocks , 
GC28-6628. 

EXTENSION 

contains the address of the Special Characters Table, the number 
of invitation lists, the number of units for each buffer, the size 
of all buffers used by this Line Group, and the number of reserve 
characters. The followinq table shows these fields, their 
relative offsets from the beginning of the DCB, their contents, 
and their size. 



+31 



Address of the Special Characters Table 



+34 



Number of 
Invitation Lists 



+35 



Number of Units 
per Buffer 



+36 



Buffer size 



+38 



Four one-byte reserve values 



For more detailed information on these fields, refer to the 
publication, IBM Syst em/360 Operating System System Control Blocks , 

GC28-6628. 
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TflVTTATIOfl. LISTS 

qives the addresses of the different invitation lists for the 
different lines in the Line Group. Each list is pointed to by a 
one-word address. These addresses are qiven in order by relative 
line number. 

^ollowinq each Line Group DCB is one or more LCBs (Line Control 

blocks} which are used by the internal TCAM logic to perform line 

manaqement. The LCBs in the dump are qiven in order by relative line 

number. 

LCB hhhhhh 

is the startinq address of this LCB. 

K'Y/OCBA hhhhhhhh 

The first byte is the key of this LCB. The next three bytes 
contain the address of its QCB. 

^•RI/LTNK hhhhhhhh 

The first byte is the priority of this LCB. The next three bytes 
contain the link address to the next element. 

*SK*Y/STCBA hhhhhh 

The first byte is the Receive Scheduler key. The next three bytes 
contain the address of the first STCB when the LCB is a QCB. 

TSPRT/HSLNK hhhhhhhh 

The first byte is the Peceive Scheduler priority. The next three 
bytes contain the address of the next item in the chain. 

^OLTVTSOB bhhhhhhh 

^he first two bytes contain the end of pollinq list time delay 
reference time. The third byte is the time delay queue offset to 
the OCB address (always X'14' for an LCB). The fourth byte is a 
status byte used by Time Sharinq. 

CTTATfl/T*!SPC hhhhhhhh 

The first byte is a status byte used by TCAM. The next three 
bytes contain the in-source chain. 

SCBO/SCBDA hhhhhhhh 

^he first byte is the offset tc the current SCB (Station Control 
Block) . • The next three bytes contain the address of the SCB 
directory. 

TS?E/FSB?R hhhhhhhh 

^he first byte is the count of reserved idles. The next three 
bytes contain the address of the first buffer assiqned to this 
line. 

FLAGS/SENSE hhhhhhhh 

is the start of the TOB contained in the LCE. The first and 
second bytes are TOS flaqs. The last two bytes are the sense 

bytes. 
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ECECC/ECBPT hhhhhhhh 

The first byte is the BCB completion code. The next three bytes 
contain the address cf the ECB. 

*"LAG3/CSW 

The first byte is an TOS flaq byte. The next seven bytes are the 
last seven bytes of the CSW. 

STOCC/STAHT hhhhhhhh 

The first byte is the Start I/O conditicn code. The last three 
bytes contain the address cf the start of the channel program 
area. 

DCBPT hhhhhhhh 

is the address of the DCB for this line. 

RCQCB hhhhhhhh 

is the address of the OCB to tpost a recalled buffer tc IOS. 

TNCAM/ERRCT hhhhhhhh 

are two half word IOS error counters. 

TJCEX/BCBFB hhhhhhhh 

The first byte is the DCB index. The last three bytes contain the 
address of a recalled buffer or the last buffer serviced by a PCI. 

RECOE/STATE hhhhhhhh 

The first two bytes contain the offset into the current block. 
The last two bytes are the LCB status bytes. 

TSTSW/PECAD hhhhhhhh 

The first byte is a test-and-set switch. The last three bytes 
contain the address of the current messaqe block. 

EPEKY/E^BOE hhhhhhhh 

The first byte is the key of the ERB. The next three bytes 
contain the address of the QCE to which the EBB is tposted. 

EPBPy/EBBIK hhhhhhhh 

The first byte is the priority of this EBB. The next three bytes 
contain the address of the next item in the chain. 

EPEST/EPBCH hhhhhhhh 

The first byte is the EBB status byte. The next three bytes 
contain the address of a chain of assiqned buffers. 

EPBCT/TTCIN hhhhhhhh 

The first two bytes contain the count cf buffers requested by this 
EPB. The second two bytes contain the index into the Termname 
Table of the currently connected terminal. 

MSGEM/SCBA hhhhhhhh 

The first byte is used to control BSC lines. The next three bytes 
contain the address of the current SCB. 
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EFMSK/TNVPT hhhhhhhh 

The first byte is an error recording mask. The next three bytes 
contain the address of the current entry in the invitation list. 

TPCD 

is a three-word list of TP operation codes for the CCWs. 

SFSV/CSWSV hhhhhhhh hhhhhhhh 

the first byte is a save area for the sense byte. The last seven 
bytes comprise a save area for the CSW. 

^PCCW 

is a three doubleword area for EEF (Error Recovery Procedure) 
CCWs. 

The following section qives the Checkpoint DCB. 



DCB 


hhhhhh (CHECKPOINT) 














DEVICE INTERFACE 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 




D/S INTERFACE 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 


hhhhhhhh 




FOUNDATION 


hhhhhhhh 


hhhhhhhh 


hh 








EXTENSION 






hhhhhh 


hhhhhhhh 


hhhhhhhh 



DCB hhhhhh (CHECKPOINT) 

is the starting address of the Checkpoint DCB, 

DEVICE INTEP'P'ACI 

This section is reserved. 

D/S INTEPEACE 

contains the Data Set organization, the address of the AVT, and 
the address of the exit list. The following table shows these 
fields, their relative offsets from the beginning of the DCB, 
their contents, and their size. 



+14 






Reserved 


+18 




Reserved 




+1B 

Data Set organization 


+1C 


Reserved 




+1D 


Address of the AVT 


+20 






Reserved 


+24 


Reserved 




+25 


Address of the exit list 



Eor more detailed information on these fields, refer to the 
publication, IBM System/360 Operating System System Control Blocks , 

HC28-6628. 
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FOUNDATION 

contains fields that are chanqed during Open. Before Open, these 
fields contain the DDNAME character string, the Open flags, the 
IOS error flags, and the Macro Instruction reference. After Open, 
they contain the offset of the DD entry from the beginning of the 
TTOT, the Macro Instruction reference, the IOS error flags, the 
address of the DEB, and Open flaqs. The following two tables show 
this area and its contents before and after Open. 

Before Open: 



+28 



+2C 



DONAME character string 



+30 



Open flags 



+31 



IOS error 
flags 



+32 



Macro Instruction reference 



Note: During Open, the IOS error flags field and the Macro 
Instruction reference field are relocated and the last three bytes 
become part of the EXTENSION section. 

After Open: 



+28 


Offset of DD entry from 
beginning of the TIOT 


+2A 


Macro Instruction reference 


+2C 


IOS error 
flags 


+2D 


Address of the DEB 




+30 


Open 
flags 









For more detailed information on these fields, refer to the 
publication, IBM Sy stem/36 O perat ing System System Control Blocks , 
OC28-6628. 

EXTENSION 

contains the 0PTCD= value of the DCB. The remainder of this area 
is reserved. The following table shows these fields, their 
relative offsets from the beginning of the DCB, their contents, 
and their size. 







+31 




Reserved 


+34 


OPTCD=value 


+35 




Reserved 


+38 






Reserved 


. 
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^or more detailed information on these fields, refer to the 
publication, IEM System/360 Operating System System Control Blocks , 

GC2B-6628. 



^he -Pollowina section qives the Messaqe Queues DCB. 



DCB hhhhhh (MESSAGE QUEUE) 

DEVICE INTERFACE hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 

D/S INTERFACE hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh hhhhhhhh 

FOUNDATION hhhhhhhh hhhhhhhh hh 
EXTENSION hhhhhh hhhhhhhh hhhhhhhh 



"CF hhhhhh (MESSAGE QUEUES) 

is the startinq address of the Messaqe Queues DCB. 

DEVICE INTEFFACE 

^his section is reserved. 

D/S INTEFFACE 

contains the Data Set orqanizaticn, the address of the AVT f the 
threshold value of the percentaqe of the nonreusable disk messaqe 
aueue records to be used before a flush closedown of the system is 
initiated, and -.the address of the exit list. The followinq table 
shows these fields, their relative offsets from the beqinninq of 
the DCB, their contents, and their size. 



+14 






Reserved 


+18 




Reserved 




+1A 

Data Set organization 


+1C 


Reserved 




+1D 


Address of the AVT 


+20 


+21 


Reserved 


+24 


Reserved 




+25 


Address of the exit list 



p or more detailed information on these fields, refer to the 
publication, IBM System/360 Operating System System Control Bloc ks, 

C-C28-6628. 

FOUNDATION 

contains fields that are chanqed durinq Open. Before Open, these 
fields contain the DDNAME character strinq, the Open flaqs, the 
I0S error flaqs, and Macro Instruction reference. After Open, 
they contain the offset of the DD entry from the beqinninq of the 
TIOT, the Macro Instruction reference, the IOS error flaqs, the 
address of the DEB, and Open flaqs. The followinq two tables show 
this area and its contents before and after Open. 
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Before Open: 



+28 



+2C 



DDNAME character string 



+30 



Open flags 



+31 



I OS error 
flags 



+32 



Macro Instruction reference 



Note: During Open, the IOS error flags field and the Macro 
Instruction reference field are relocated and the last three bytes 
become part of the EXTENSION section. 

After Open : 



+28 Offset of DD entry from 
beginning of the TIOT 


+2A 

Macro Instruction reference 


+2C IOS error 
flags 


+2D 

Address of the DEB 


+3 ° Open 
flags 







^or more detailed information on these fields, refer to the 
Dublication, IBM System/360 Operating System System Control Blocks, 
GC28-6628. 

EXTENSION 

contains the 0PTCD= value of the DCB . The remainder of this area 
is reserved. The following table shows these fields, their 
relative offsets from the beginning cf the DCB, their Contents, 
and their size. 



+30 




Reserved 


+34 


OPTCD'value 


+35 




Reserved 


+38 






Reserved 





ff or more detailed information on these fields, refer to the 
publication, IBM System/360 Operating System System Control Blocks , 



GC28-6628. 



1076 



TBACE TABLES 

SUBTASK TFACE TABIE 

^he Subtask Trace facility keeps a sequential record in main storaqe 
of the subtasks activated by the TCAM Dispatcher, This facility is 
included in a TCAM MCP when the DTBACE keyword of the INTBO macro is 
assembled with a nonzero numerical value, This facility is 
implemented by the IGG019BO TCAM Dispatcher, which places an entry in 
the Subtask Trace Table each time a subtask is dispatched. 

The address of the Subtask Trace Table is stored at AVTPABM+12 in 
the AVT, and the number of entries in the table is determined by the 
numerical value coded on the DTBACE keyword. Each entry consists of 
four words, and there is one four-word Subtask Trace Table Control 
Block. At INTRO time, TCAM allocates (16n+16) contiguous bytes for 
the table; n is the inteqer value coded in the DTBACE operand of the 
INTBO macro. The table is filled en a wrap-around principle — when all 
the available entries have been used, the Dispatcher places new 
entries at the beqinninq of the table, overlayinq the earliest 
entries. 

The Subtask Trace Table Control Block is located in the first four 
words of the table. Therefore, the actual subtask entries start four 
words beyond the address in the AVT. 

Format of the Subtask Trace Table Control Block 



Offset 




12 



Address of the next entry in the table 



Address of the first entry in the table 



Address of the last entry in the table 



Reserved 



Note ; Since the first wcrd of this ccntrol block contains the 
address of the next entry in the table, the last entry made is at 
this address- minus 16. 
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Format of a Subtask Trace Table Entry 



Offset 



8 
12 



Priority of the 
dispatched element 


Address of the 
dispatched element 


Entry point address of 
the dispatched subtask 


Flag byte of the 
dispatched QCB 


Address of the 
dispatched QCB 


Subtask entry 
code (MCPL) 


Address of the dispatched STCB 



LINE INPUT/OUTPUT INTERRUPT TRACE TABLE 

^he Line Input/Cutput Interrupt Trace facil 
the TRACE keyword of the INTRO macro 
numerical value. This facility is implemen 
Trace routine (IGG01900) , which places an 
Trace ^able each time an I/O interrupt occu 
as a result cf retries by TCAM*s Error 
recorded in the I/O Interrupt Trace Table. 
Trace facility is activated for a line by 
Control Messaqe, and may be deactivated for 
NOTRACE Operator Control Messaqe. 



ity is loaded by OPEN when 

is assembled with a nonzero 

ted by the I/O Interrupt 

entry in the I/O Interrupt 

rs. Interrupts that occur 

Recovery Procedures are not 

The TCAM I/O Interrupt 

means of a GOTRACE Operator 

a line by means of a 



The address of the I/O Interrupt Trace T 
AVTRACE field of the Address Vector Table. The 
entries in the table is determined by the numeric 
TRACE operand of the INTRO macro. At INTR 
contiquous bytes of main storaqe (where n is the 
the "TRACE=" operand) are allocated for the I/O I 
When all entries in the table have been filled, 
are overlaid when new interrupts occur. The user 
fl TREXIT=" operand of INTRO) a user subroutine t 
when the I/O Interrupt Trace Table is full. 

Eormat of an I/C Interrupt Trace Tab le Entry 

Byte: 



able is 

number 
al value 
execut 
inteqer 
nterrupt 
the ear 
may na 
hat is p 



stored i 
of 32 

coded o 
ion time 
specif ie 

Trace T 
liest en 
me (via 
assed co 



n the 
-byte 
n the 
, 32n 
d in 
able, 
tries 
the 
ntrol 






Sense 
Byte 


+1 




CSW 




+8 


Interrupt CCW 


+12 


TP OP code at 
Interrupted CCW 


+16 


First CCW in 

Channel Program Chain 


+20 




TP OP code of 
first CCW 


+24 


Station Name 


+30 

Channel 
Unit Address 
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C^OSS REFERENCE TABLE 

*vbe TCAM Cross "Reference Table provides a means of locatinq in a dump 
certain information associated with each open line. The Cross 
Reference Table is included, in a TCAM MCP when the CROSSF.F operand of 
the TFTftO macro is assembled with a nonzero numerical value. 

At TNTBO execution time, the TNTFC GETMAIN routine obtains four 
words of main stcracre for each unit specified on the CBOSSRF operand. 
The total amount of main storaqe reserved is called the Cross 
Reference Table, and the INTBO GETMAIN routine places the address of 
this table at AVTCRSB? in the AVT. Each time a line is successfully 
opened, the TGGC1940 Line Group Open routine completes the next 
available four-word entry in the table. 

TGG01940 fills in the first word of the entry with the name of the 
UCB (the EBCCIC representation cf the hardware line address) , and 
fills in the second word with the address of the UCB, IGG019U0 places 
the address of the LCB in the third word, and the address of a Master 
OCB (Queue Control Block) for this line in the fcurth word. If 
aueuinq is by line, there is only one Master QCB assigned to the line, 
and its address is placed in the fourth wcrd. If queuinq is by 
terminal, there is one Master QCB for each station on the line; the 
fourth word is filled in with the address of the QCE for the station 
that has its terminal entry appear in the Terminal Table before the 
terminal entry of any other staticn on this particular line. If the 
user opens more lines than entries in the Cross Reference Table, TCAM 
^ills the Table until the space is exhausted; lines opened after space 
runs out have nc Cross Peference entry. 

The format cf each entry in the table is as follows: 



Offset 




8 
12 



UCB name 



UCB address 



LCB address 



Address of the Master QCB 
for this line 
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TABLE OF MESSAGE QfllGINS 

This table lists each of the messages qenerated by the TCAM executable 
modules. The oriqinatinq module names and the messaqe routing codes 
are included fcy each messaqe. 

Routinq Codes: 

* This routinq code indicates that the messaqe must be routed back 
to the console that initiated the associated request. 

1 MASTER CONSOLE. This routinq code is for messages that must be 
sent to the master console because some action is required by the 
master console operator, or because the messaqe contains 
information considered critical to the continued operation of the 
system. 

2 MASTER CONSOLE INFORM ATIONAI . This routinq code is for 
informational messaqes to the master console operator. 
Informational messaqes usually require no action from the 
operator. If they do, that action should be at the operator's 
discretion. 

8 TELEPROCESSING CONTROL. This routinq code is for messages 
relatinq tc teleprocessinq. 

10 SYSTEM ERROR/MAINTENANCE. This routinq code is used for any 
messaqe that indicates a system error or an incorrectable I/O 
error, or any messaqe associated with system maintenance. 

11 PROGRAMMER INFORMATION. This routinq code is for messaqes of 
interest to the proqrammer. The messaqe is sent to an operator 
console and net to the system output device. 



Messaqe 

IED001I TCAM JOB iobname, stepname, 

procstepname ADDRESS OF AVT address TEDQOB 

IED002A SPECIFY TCAM PARAMETERS IEDQOB 

TED003A INVALID KEYWORD keyword IEDQOE 



Routinq 
Code 



2,11 
1 
1 



IED004A REQUIRED PARAMETER MISSING. 

SPECIFY xxx TEDQOB 

xxx = the keyword missinq 

S = STARTUP - Cold or Warm start 
B = LNUNITS - number of line buffers 
K = KEYLEN - size of each buffer 
D = CPB - number of CPBs (if disk 
is beinq used) . 



1 
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IED005A MSUNITS (M) SPECIFICATION NOT 

PERMITTEE. CONTINUE RESPONSE IEDQOB 

"!"ED006A TNVAITI OPERAND ON KEYWORD. 

FESPECIFY keyword IEDQOB 

TED007I terminal name IS AN ILLEGAL 

DESTINATION IEDQOM 

IED008I TCAM CPEN EFFOF xxx=y IN DCB zzz 

descriptor IGG01930 

IGG01931 
xxx = 040 The error occurred in openinq 
a line qroup data set. 
041 The error occurred in openinq 
a message queues data set. 



11 



11 



when xxx=040 and 

y = 1 Insufficient main storaqe to build a line 
qroup DEB. 

2 Ncn-compatible devices specified in the 
same line qroup. 

3 A UCB for a line in this line qroup 
specifies somethinq ether than tele- 
communications or qraphics devices. 

4 A UCB for a line in this line qrcup 
specifies an unsupported control unit 
type. 

5 A UCB for a line in this line qrcup 
specifies a nonstandard terminal type, 

6 The device characteristics table qenerated 
for this line does not contain the riqht 
characteristics for this terminal type as 
defined by the UCB. 

7 Insufficient main storaqe was available to 
build a Line Control Block. 

8 Insufficient main storaqe was available to 
build a Station Control Block. 

9 The characteristics of a binary synchronous 
device do not aqree with those values in the 
UCB for the line. 

A The DD cards for this DCB contain no valid 
UCB addresses. 

B The header prefix size and the number of idle 
characters plus one reserved for receivinq 
operations exceed one loqical unit in lenqth. 

C No data set has been specified for disk or main 
storaqe queuinq for a specified terminal. 

D There are no lines in the line qroup (that is, 
one or more of the lines in the qroup have not 
been opened due to seme other error) . 

E A relative line number of zero has been specified, 

when xxx=041 and 
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v = 1 An incorrect-lenqth AVT has been specified to 
support disk message queuing. 

2 The key lenqth specified on the INTRO macro 
and the key lenqth used to format the message 
queues data set are net equal. 

3 Dissimilar disk types have been defined for 
message gueuing. 

4 Something other than reusable and nonreusable 
disk messaqe queuinq has been specified. 

5 Insufficient main storaqe was available to 
build a messaqe queues DEB. 

6 Insufficient main storaqe was available to 
build a messaqe queues TOB. 

7 The messaqe queue was not formatted correctly 
prior to openinq the Messaqe Queues Data Set, 

descriptor is a sinqle word describinq the type of error 
zzz - DD statement name 



TED009I CHECKPOINT DISK ALLOCATION 
ERROR - DATA SET NOT OPENED 

IED010I CHECKPOINT - INSUFFICIENT 
CORE ( ENVIRON 

INCIDENT \ XXX 

CKREC name 
DATA SET NOT OPEN^ 
xxx = number of bytes of main storaqe 
not available for the data set 



TGG01942 

IFDQNR 
IGG01941 



11 



11 



TED011I SYSTEM 
ALTERED 



INTERVAL CANNOT BE 



IEDQCZ 



IED012I TSO SESSION ON LINE XXX COMMAND TEBQCV 
REJECTED 



IED013I STOP REQUEST FOF SELF 
COMMAND REJECTED 



VARY COMMAND 



IEDQCV * 



TED014I TCAM ALREADY IN SYSTEM IEDQOB 

TED015I TCAM AP OPEN ERROR 043-x yyy zzz 



TGG01933 

x = 1 An application proqram OPEN has been issued, 

but there is no TCAM MCP active in the system. 

2 The QNAME= parameter of a DD statement for an 
application proqram is not the name of a 
process entry in the Terminal Table or. the 
process entry named is inconsistent with the 
DCB format. 

3 A process entry named on a DD statement for an 
application proqram is currently being used by 
another DCB. 



2,11 
2,8,11 
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U Insufficient main stroaqe was available in the 
MCP to build internal control tlocks f 

5 Insufficient main storaqe was avaiable in the 
application proqram area to build the internal 
control blocks. 



yyv = the name on the DD statement 
zzz = the iob name 
IED016I STATION name NCI FOUND 



IED017I LTNE/ddname,rln) NOT OPEN 



IE/ 



address / 
TED018I command field COMMAND INVALID 

(termname \ 
IED01PT <qrpname,rln > ALREADY STARTED 
(address ) 

(termname ) 

IED020I <qrpname,rln > STARTED 

( address ) 

IED021I AUTO POLL STARTED FORJqrpname, rln 

(address 

TED022I AU^O POLL ALREADY STARTED 
FOR (qrpname, rln \ 
(address / 

TED023I TRACE STARTED FOR fqrpname, rln) 

(address / 

TED02UI TRACE ALREADY STARTED FOR 



IEDQCE/G/H/N/ * 
J/O/Q/U/V/X/Z 
IEDOCI/L/P/U/ * 
V/W/X/3 

IFDQCA/I/L/N/ * 
P/D/V/W/VZ/3 

IGC0310D 

TEDQCO/Q/U * 



IEDQCO/Q/D 
IEDQCW 

IEDQCW 
IEDOCP 
IEDQCP 



jqrpname, rln"i 
(address / 



(termname \ 
TED025I ^qrpname,rln> ALREADY STOPPED 
(address ) 

("terminal ^ 

TED026I <qrpname,rln> STOPPED 

(address ) 

IED027I AUTO POLL STOPPED FORfqrpname 

(address 

TED028I AUTO POLL ALREADY STOPPED 
EOR/qrpname,rln\ 
(address f 



,rln) 



IEDQCO/O/V 

IEDQCO/C/V 

IEDQCP 

IEDQCW 
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TED029I TRACE STOPPED FOR |qrpname,rln ) 

(address / 

TED030I TPACE ALREADY STOPPED 
t/qrp 
(add: 



IEDQCP 



FORJqrpname, rln) 
tress / 



TED031T statname QUEUE STZE=inteqer, 
QUEUE?YP=type, STATUS=status , . . . 

TED032I jqrpname,rln) LNSTAT=status, 

(address / 
ERR=error, 

TED033T statname STATUS=status, . . . 
INTENSF=feense count) 
(NO / 
IN-SEQ=inteqer,OUT-SEO=inteqer 

TED034I statname HAS NO opfldname OPTION 
TED035I statname OPTION opf ldname=data 



TED036I 



(qrpname r rln) 
(address / 



ACTTVE= statname... 
NONE 



TED037I /qrpname,rln)TNACTIVF= statname... 



Jqrpn 
(addr 



ess / NONE 

fddname 



IED038I statname IS ON LINE<qrpname, rln> 

(address ) 

IED039I NO STATIONS INTERCEPTED 

T ED0a0I INTERCEPTED STATIONS=statname, . . . 



IED041I FRTMARY=/statname 
IED042I (statname) ALREADY PRIMARY 



(statname) 
(SYSCON / 



TED043I SECONDARY=statname 

TED044T statname NOT ELIGIBLE FOR PRIMARY 

IED045I SYSTEM INTERVAL ALREADY ACTIVE 

IED046I LINE FOR statname IS OUTPUT ONLY 
STATION 

TED047I SYSTEM INTERVAL IS data 



IEDQCP 
IEDQCJ 

IEDQCI 



IEDQCH 


* 


IEDQCF 


* 


IEDQCF 


* 


IEDQCI 


* 


IEDQCL 


* 



IEDQCG 

TEDQCK 

IEDQCK 

IEDQCN 
IEDQCM 

IEDQCN 

IEDQCM 
IEDQCN 
IEDQCZ 

IEDQCO 
IEDQCZ 
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TED0U8I POLLING DELAY FOR statname 
IS data 

TED049I OLT CONTROLS LINE line COMMAND 
REJECTED 

IED050I statname OPTION opfield MODIFIED 

IED051I statname SET FOB HOLD, 
SEQ-OUT=inteqer 

IED052I statname ALREADY SET FOP HOLD 

TED053I statname ALPFADY PELEASED 

IED054I statname RELEASED, SEQ-OUT=inteqer 

TFD055I I/O TPACE CANNOT BE ALTERED 

TED056T termnaire opfldname DATA FORMAT 
INVALID 

TED057I address NOT CAPABLE OF AUTO POLL 

TED058T fqrpname,rln} SENSECOUNT =count, 
^address V 
(statname ) 
SETTING=sense 



IEDOCZ 



TED059 



I /qrpname,rln| 
(address j 



LIST STATUS=status 



IED060I statname CANNOT BE HELD 

TED061T POLLING DELAY FOP statname 
CANNOT BE ALTERED 

IED062I statname OPTION opfldname CANNOT 
ACCEPT SPECIFIED DATA 

IFD063I CLOSEDOWN IN PROGRESS — XXX 
COMMAND REJECTED 

TED06UT LINE addr CONTROL UNIT NOT 
OPERATIONAL 

IED065I INITIALIZATION ERROR return code 

IED066I UNABLE TO OPEN SYS^PINT 

TED0^7T TCAM INITIALIZATION BEGUN 

IED068I UNABLE TO OPEN TEDODATA 



IEDQCU 


* 


IEDQCF 


* 


TEDQCQ 


* 


IEDQCQ 


* 


IEDOCQ 


* 


IEDQCQ 


* 


IEDQCP 


* 


IEDQCF 


* 


IEDQCW 


* 



IEDQCX 



TEDQC3 


* 


IEDQCQ 


* 


IEDQCZ 


* 


IEDQCF 


* 


TGC0110D 


* 


IGE0204G 


8 


IEDQOA 


2,11 


TEDQXA 


2 


IEDQXA 


2 


TEDQXA 


2 
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TED069I INVALID KEYLEN FOR TEDQDATA 

IED070T IEDODATA DOES NOT SPECIFY CONTIG 
SPACE IN CYLINDERS 

TED071I UNEQUAL PRIMARY AND SECONDARY 
EXTENTS ON IEDQDATA 

IED072I I/O ERROR ON IEDQDATA 

TED073I I/O ERROR ON SYSPRINT 

TED07UI TCAM INITIALIZATION COMPLETE 

IED075T END OF EXTENT. RECORD COUNT 
IS number 

TED076I TCAM NCN-REUSABLE DISK THRESHOLD 
CLOSEDOWN 

TED077I termname opfldname DATA CHARACTER 
INVALID 

T ED078I DLQ TERM ERROR 

IED079I ENDING STATUS NOT RECEIVED FROM 
LINE address - LINE UNAVAILABLE 

TED090I START OF TCAM SYSTEM DELAY 

IED081I END OF TCAM SYSTEM DELAY 

TED082I CHECKPOINT DISK ERROR — DATA 
SET NOT OPENED 

IED083T CHECKPOINT DISK ERROR — RECOVERY 
FROM PREVICUS RECORD 



ied084i checkpoint disk error - recovered iedqnq 

ied085i checkpoint disk error -(ckreq \ 

(incident/ igg0194U 
record ignored 

ied086i checkpoint disk error -(environment* 

(CKREQ,name jlEDQNP 

IED087I CHECKPOINT DISK ERROR - CONTROL IGG02041 
RECORD IEDQNQ 



IEDQXA 


2 


IEDQXA 


2 


IEDQXA 


2 


IEDQXA 


2,10 


IEDQXA 


2,10 


IEDQXA 


2 


IEDQXA 


2 


IGG019RC 


2,11 


TEDQCF 


* 


IEDQOM 


11 


IGG01948 


8 


IEDQHI 


2 


IEDQHI 


2 


IGG01942 


11 


IGG01943 


11 


IEDQNQ 


11 


IEDQND 


11 



11 
11 



IED088I termname ON DIAL LINE - CANNOT BE 

VARIED IEDQCO 
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TED089T LINE ACTIVE - VAEY TERMINAL 
COMMAND REJECTED 

TED090T statname IS NOT SINGLE ENTRY 

T ED091T LINE FOB statname NOT OPEN 

TED0Q2T BISYNC EBBOR - LINE XXX 
CANNOT BE STARTED 

TED093T SET SYSTEM TNTEBVAL COMMAND 
ACCEPTED 

TED094I COPE REQUESTED FOR ON-LINE 
TES™ NOT AVAILABLE 

TED095I MODIFY OLT REJECTED - OLT NOT 
ACTIVE 

t^DO^I (CHECKPOINT ) 

< OPERATOR CONTROL? NO LONGER ACTIVE 

(cOWWRITE ) 

TED097T TCAM IS CLOSED DOWN 

TED09«I DCB CPEN FOR MESSAGE PBOCESSING 
PROGRAM - iofcname 

TED099I POUTINE LOADED 

IED100I BOUTINF EEACTIVATED 

IED101T BESTABT IN PBOGBESS 

TED192I INVALID OPEBAND 

TED103T BOUTINE IS ACTIVE 

I'DIOai ROUTINE NOT ACTIVE 

IED195I RETURN CODE=XXXX 

TED106T MULTIPLE BEQUEST 

TED107I COMWBITE NOT ACTIVE 

IED199I BOUTINE NOT DELETED 



IEDQCO 


* 


IEDQCG/O 


* 


IEDQCG/J/O 


* 


IED0CU 


* 



IEDQCZ 



IEDQND 


11 


IEDQC2 


8,11 


IEDQNA2 


2,11 


IEDQNA2 


2,11,* 


IEDQCO 


2,11 


IEDQC6 


8 


IEDQC6 


8 


IEDQC6 


8 


IEDQC6 


8 


TEDQC6 


8 


IEDQC6 


8 


IEDQC6 


8 


IEDQC6 


8 


TEDQC6 


8 


TEDQC6 


8 
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"•& 31 3 O 17 C^eSS-PETERENCES BETWEEN TCaM MODULES 



M odule 


Entry 


Entered 


Name 


Points 


Ercm 


ted ay a 


TEDAYa 


IEDaYX 



iEcaya+i2iEDaYE 



External 
Routines 



TEDOTNT 



Exit 
Points 



Exits 

TO 



EZ after DSPDISP in IGG019RE 

"ENTRY? 12" or IGGC19R0 
B after DSPCHaiN in IGG019RB 
"ENTRY312" or IGG019RO 
B after DSPCHaiN in IGG019EE 
"RETURN" or IGG019RO 
BR after IEDaYM 
"PETURN2" 



T1 "DaYC 



IEDaYC 



TEDQUI 
(GaRRiaGE) 



IEDQTNT 



BR after 
"EXIT" 



IEDQLM (to MP) 



T EDaYD 



IE Da YD 



TGG019WO or 
IGG019RB 



TEDaY7 B after DSPBYPas in 
"aYD200" IGG019RO or 
IGG019RB 



" E D a Y E 



IEDaYE TEDaYO 
TEDaYM 



TEDOTNT, 
TFDaYS, 
CTIP SVC 
101 



ER after 
"EXIT" 



TEDaYM, 
IEDAT'O 



"rEDAY 17 



IEDAYE IGG019RO or 
IGG019RB 



IOFaLT 

IEDQHG, 

DSPPRTOF 

in 

TGG019RO 

IGG019RE 



E at DSPDISP in IGG019RE or 

"EXIT" IGG019RO 

ER after DSPCHaiN in IGG019FE or 

"POSTSUE" IGGQ19RO 



EDaYH 



lEDayw i^Dayx 



IED?.YH + 12 TGG019RO 



IEDQTNT E after DSPCHaiN in 

"SaYONaPa"IGG019RE or 

IGG019RO 

TEDOTNT E after DSPCHaiN in 

"SaYONARa"IGG019RB or 

IGG019RO 



TEDaYT 



TEDAYI TGG019RP 

or 

TGG019RO 



TEDOTNT, B after DSPCHAIN in 
OTIP SVC "TSIN2050"IGG019RB or 

TGG019RO 



T EDaYL 



IEDaYL IEDQUI 
(IOGON) 



TEDQUI 
(TEDQaE) 
IEDQTNT 



ER after 
"BYEEYE" 



IEDQLM 

(Time Sharing 

Messacre Handler) 



'EDaYM 



TECaYM, TEDQBD, 
aYMOOO T'DaYS, 

TGG019RO or 
IGG019RB 



IEDQTNT, B after 

IEDQDI »aYM020" 

(IEDQRE) , E after 

IEDaYE "aYM309" 



DSPCHaiN in 
IGG019RB or 
IGG019RO 



1088 



M odule 



Entry 
Fcirts 



Entered 
^rom 



External Exit 
Routines Points 



Exits 
To 



ET>AYO 



IEDAYO IGG019*B or 
TEDAYO02 IGG019EO 



TEDAYE, 
IEDAYH, 
IEDQFA, 
TEDQFQ, 
OTIP SVC 



E after 
"CHAIN" 
B after 
"POST" 
E after 
"DISP" 



DSBYPAS, 
DSPPOST, or 
DSPDISP in 
IGG019RE or 
IGG019RO 



T^T)\yT> 



TEDQAA01 I6601'9«C or 

IOG019RB 



IEDQUT E after 
(TEDQAI "POST" 
or IEDQAW) , 
TEDQTKT EP. after 
"MBHEXIT" 



DSPPOST in 
IGG019RB or 
IGG019EO 
MH 



"^HAYS 



TED AYS, IEDOUT 
TEDAYS2, TEDAYE 
IEDAYS3 IGG019PO or 
IGG019 W B 



TEDQTNT, E after IEDQLH (to MH) 

QTIP/SVC "AYS10U" 

101 BNO after DSPDISP in 

"AYSAYS3" TGG019EO or 
IGG019RB 

E after IBDAYM 

"AYS4 01" 



Ti?T)AYT 



TEDAYTO, STAF Exit 
IEDAYT1, Address 
IEDAYT2 



TGC102, RETURN ABEND/STAE 
TCABEND after Interface 
(SVC 9H) "TEDAYTO", routine in OS 

after Supervisor 

"RETURN", 

and after 

"IEDAYT2" 



TT, T) AYX 



IEDAYX TZDOBD 



None 



BR after 
"AYX050" 



IEDAYA 
IEDAYH 



TT1S VV 



TEDAYY 



TEDA.YG^, 

IKJGGE9ti, 

TFPAYTT 



DSPPOSTF 



DSPDISP in 
IGG019RO ex 
IGG019RB 



TE^AYZ 



AYZ000 



106019*3 



IFDC T NT 



E 15 after 
"AYZ0U2" 
E after 
"AYZ015" 



IGG019R.3 



AYZ100 TCG019F1 



TEDQHG, ECR after IGG019R1 

DSPPOSTF "AYZ100" 

BR after DSPPOST in 
"AYZ135" IGG019RB or 
B after IGG019RO 
"AYZ125" 



A V Z200 TGG019PO 



DSPDISP E after DSPDISP in 
"AYZ060" IGG019RB or 
IGG019RO, 
IGG019R3 



AYZ300 OFVENT in 
TGG01 Q R3 



IEPQKA, 
EXCP 



BR after 
"AYZ240" 
BR after 
"AYZ258" 
BR after 
"AYZ270" 
B after 
"AYZ280" 
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"lodule 

•*T a m e 



Entry 
Points 



Entered 
From 



External Exit 
Routines Points 



Exits 
To 



AYZ400 IGG019P4 



USPUNAVF. ECR after 

"AYZ300" 

BCP after IGG019R4 

"AYZ325" 

BCP after PSPUNAV in 

"AYZ330" IGG019P3 or 

BCP after IGG019PO 

"AYZ390" 

BP after 

"AYZ400" 
TOHALT E after 
(SVC 33) "AYZ495" 

BCP after 

"AYZ410" 



AYZ410 IEDAYD 



BR after 
"AYZ460" 



IEDAYD 



AYZ c C0 TGGOIQ^U 



BP after TGG019F4 
"AYZ500" 



AYZ6 00 IEDOKA 



E after 
"AYZ510" 
BP after 
"AYZ515" 
B after 
"AYZ665" 
BCP after 
"AYZ692" 
B after 
"AYZ045" 
B after 
"AYZ530" 
BP after 
"AYZ085" 



IEDQKA 

DSPCHAIN in 
IGG019PB or 
TGG019PO 

DSPBYPAS in 
IGG019PB or 
IGG019RO 



TEDAYM 



• rr >QAfi 



TFDQAA01 TGGO^^E or IGG019PO 



TEDQTNT, B after DSPPOST 

IEDQUI "SETOTT" 

(IEDOAW, EP after IEDQLM 

IEDQAT) "EXIT" (STARTMH) 



T1 =:Doac 



IEDQAC01 IEDQUI (DATFTTMF) 



TEDQAL, 

TIME 

IEDQAX 



EP after 
"PETOPN" 



IEDQLM (DATETIME) 



''DOAD 



IEDQAD01 TEDQDI (SEQUENCE) 



IEDQUI 
(IEDQAF) 



BP after 
"EXIT" 



IEDQLM (SEQUENCE) 



T^DOAE 



IEDQAF IFEQUI TEDQTNT 

(INBUF, TNHDF, XNMSG, 

LOCOPT, MSGLIMTT, 

OUTBUF, OUTHE*, 

OUTMSG, or PATH) 

IEDQUI (IFDOAZ, 

IEDQA5, IFDQAT, TEDQA8 

IEDOET, IEDQYL) 



EP after IEDQLM 

"EXIT" (INBUF, INHDP, 
INMSG, LOCOPT, 
MSGLIMIT, OUTBUF, 
OUTHDP,OUTMSG or PATH) 
IEDQLM (IEDQAZ, 
TEDQA5,IEDQA7, 
IEDQA8,IEDQET, IEDQYL) 



T EPOAF 
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iEDQA^OI IEEOUI (DATETIME IEDQAL 
or SEQUENCE, IFDQAD, 
TFDQAK, IEDQAN, IEDQAO, 
IFPQAP, IEDQAT, TEDQA2, 
IETQA8) 



BP after IEDQLM (DATETIME or 
"EXIT" SEQUENCE, IEJ5QAD 
IEDQAK, IEDQAN, 
IEDQAP, IEDQAT, IEDQA2, 
IEDQA8) 



M c1ule 



'^DOAG 



Entry 
Points 



Frtere<3 
Frorc 



TF.DQAG01 MSGLIWTT 



Fxternal 


Exit 


Exits 


Foutines 


Points 


To 


None 


EF after 
"ZEBOFTN" 


MSGLIMIT 



EDO A w 



TEUQAH01 IEDQUI (SEQUENCE) 



TEDOTNT. 



EF after IEDQLM (SEQUENCE) 

'STCBE' 



IEDOAT TEDQAT01 IEDQUI (CODE , INITIATE , TEDQAI, 

LOCK, MSGTYPE, TEDQAX 
OFIGIN, PATH, PF.TO'F- 
• ITY, SCPEEN, SE- 
QUENCE, SETEOF, SET- 
SCAN, or UNLOCK, 
IECQAA 
IEDOAN, IEDQA4, IEDQA5) 



EF after IEDQLM (CODE, 
"EXIT" INITIATE, LOCK, 
MSGTYPE, OBIGIN 
PATH, PFIOBITY, 
SCREEN, SEQUENCE, 
SETEOE, SETSCAN, 
or UNLOCK, 
IEDQAA, 
IEDQAN, lEDQAft, IIDQA5) 



'EDO A J 



IEUCAJ01 T^DQUI (FO^WAFD or 
SFTSCAW) 

IFFQUI (IEDQAN or 
IFEQAP) 



TFDQAL, EF after IEDQLM (FOFWAF^ 
IEDQAX "FETUFN" or SETSCAN) 

IEDQLM (IEDQAN or IEDQAP) 



tptiq^v 



?DOHI 



IEDQAK01 IEDQUI (OUTMSG or 
OUTENT)) 



ADFFCOMP IEDQAC 
TFDQAF 
IFEQAI 

IFPOAJ, IEDQAO 
IFDQAK, IEDQAN 
IT 1 DQ AW 

IEDQAO, TEDQA3, TEDQAU 
IEDQA5 



TEDQTNT, 


EF after 


IEDQAU 






IFDOUI 


"EXIT2" 








(TEDQAF, 










IEDQAO) , 










IE DQ A I 










None 


ECF 
and 
EF 


IEDQAC 
IEDQAF 
IEDQAI 








after 


IEDQAJ, 


IEDQAK, 


IEDQAN, 



"ENTFLOOP" IEDQAO, TEDQAW, 

IEDQAO, IEDQA3, IEDQAU, 
IEDQA5 



'DOA' 



IEDOAM01 OFIGIN 



TEDQTNT 



EF after OFIGIN 
"SETEIT3" 



r DO AV 



IEDOAN01 IEDQUI (MSGEDIT) 



TEDQTNT, 

IEDQAL, 

IEDQUI 

(IEDQAF, 

IEDQAI, 

IEDQAJ, 

IEDQAO) 



EF after 
"ABCOMP" 



IEDQLM (MSGEDIT) 



T FD0AO , IirOAOOl IFDQUT (IEDOAN 

IEDQAP, 
IEDQA2 
TEnQA?) 



IEDQAL, EF. IEDQLM (IEDQAN, 

TEDQBW IEDQAP, IEDQA2, 

BB .after IEDQA8) 

"INSEBT" IEDQUI (IEDQAF) 



'UOA*> 



IFDQAP01 IEDQUI (MSGEDIT) 



IEDQUI 
(IEDQAF 
IEDQAJ, 



BB after IEDQLM (MSGEDIT) 
"EXIT2" 
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M O d U 1 e 
w q nj o 



Entry 
^cints 



Entered 
w rom 



External Exit 
Routines Points 



Exits 
To 
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IFDQAO) 



""EOQAO 



:edqAooi tfdqui (cope) 



TEDQTNT ECP : 



IEDQLM (CODF) 

"DSPPOST" in 
IGG019RE or 
IGG019RO 



tepoar 



IEDQAF TEDOBD 



TEDQTNT 



B after 
"RETURN" 



"DSPCHAIN" in 
IGG019RB or 
IGG019RO 



TENORS 



TEDQAS TFPQBD TEDQTNT 

TIEOAS01 TGG019PB or TGG019RO DSPPOSTF, 

GE^CPB IGG019PP or IGG019PO IEPQHG02, 

LCBRTN IGG019PP or TGG019PO IEDQHG01, 



DSPDISP or DSPCHAIN 

in IGG019PB or IGG019RO 

IEDQFQ 



T^DOAT 



IEDO»T01 IFDQAZ 
STCBS^+2 IGG019^B or 
TGG019PO 



TEDQUT BP after DSPCHAIN in 
(IEDQAE) "POSTSUE" IGG019RB or 

IGG019RO 



T EDOS' T " 1, N 



IEPATTN T/o Supervisor 



None 



IGG019R5 
I OS 



EDORU 



IIDOAU TFDQUI (CUTOFF) 
CUTFFOCP+12 IGG019PB or 
TGG019PO 



None 
FXCP 



IEDQLM (CUTOFF) 

IGG019RB 

or IGG019RO 



TEDOHV IEDQAV01 IEDQUT (FORWARD) TEDQTNT 

TFDQUI (IEDQAZ,TEDOA5) 



EP after IEDQLM (FORWARD) 

"LOADPFX" 

ECP after IEDQLM (IEDQAZ, IEDQA5) 

"LINKTNT" 



T,? nOAW 



TEDOAW01 TEDQUI (CODE) 

TFDQUI (TEDQAA) 



TEDQAL, BR after TEDQLM (CODE) 
TEDQA3 "EXIT" 

TEDQLM (TEDQAA) 



TE^OAX 



SCAN 



TEDQAC 
IFEQAI 
IFDQAJ 
TEDQA4 



None ECR r BL, IEDQAC 
and IEDQAT 
E to IEDQAJ 
return to IEDQA4 
caller 



T EDO!VY 



TEDO&? 



TEDQAY01 TFDQUI (SCREEN) 



TEDQAZ01 TEDQBD 



TEDQTNT BR after IEDQLM (SCREEN) 
"EXIT" 



:edqui 



ER after IEDQAT 



(IEDQAE, "EPPMSG" 
TEDQA1) 

TEDQAV B after DSPCHAIN in 
"MOVEQCE" TGG019RB or 
IGG019RO 



T w DOR0 



IEDQA001 TFDQUI (SETSCAN) 



IFDQAI ER at IEDQLM (SETSCAN) 
"RETURN" 



Module 
,;T aine 



T-C, D0A1 



Entry 

Pcints 



'nterefl 
^rcm 



TIP0A101 IEDQUI (ORIGIN) 



External 


Exit 


Exits 


Routines 


Points 


To ' 


None 


BP at 

"RETURN" 


IEDQI 



IEDQUI (TEDQAZ,TEDQAS, 

IFDQE1,IEDOE2,TEDOE3,IGG019U6, 

IGG019PT,TGG019RJ) 



IEDQLM (IEDQAZ,IEDQ AS, 
IEDQE1,IEDQE2, 
IEDQE3,IGG019U6, 
IGG019RI,IGG019RJ) 



TED0A2 



TEPQR201 IEDOUI (MSGEDIT) 



TEDQUI (IEDQAE, EP IEDQLM (MSGEDIT) 
TEDQAO) after 

"ABEXIT" 



T^DOAS 



TEDQA3 TEDOAW 



TEDQAI EP at IEDQAW 
TEDQDT "NOXLTI" 
(IEDQAE) 



T-cnoa u 



TEDOAU01 IEDOUI (TNEND, TFMSG, IEDQAI, ECP after IEDQGD 
OUTEND, or OUTMSG) TEDQAX, "SELEXIT" 

TEDQTNT, B after IEDQGT 
DSPPOSTR "EXIT" DSPPOST in 

IGG019HB or 
IGG019PO 



EDOA^ 



TE?OA501 TFDQDI FORWARD) 
TEDQUI (IEDQEA) 



IEDOUI BE after IEDQLM (FORWARD) 

(IEDQAE, "EXIT" 

TEDQAI, IEDQLM (IEDQEA) 

TEDQA1) 

TEDQAL 

TEDQAV 



T EDOA* 



TEDQA601 TEDQUI (KSGFORM) 



TEDQTNT BP after IEDQLM (MSGFORM) 
"EXITO^F" 



T E r, 0»7 



IID0A701 COUNTER 



TEDQUI EP after COUNTER 
(IEDQAE) "EEROP" 



f'T)OA8 



TEDQA801 TEEQUI (MSGEDIT) 



IEDOUI BP after IEDQLM (MSGEDIT) 
(IEDQAE "EXIT" 
IEDQAF, 
TEDQAO) 



TFDQBA 



TEDQBA01 IGG019PR or IGG019PO IEDQUI E after DSPPOST or DSPCHAIN in 

(IEDQA5) "POSTBFP" IGG019RB or IGG019PO 
B after 
"EOAENTEP" 
E after 
"MBHLINK" 



T EDOBB 



IEDQEE 



IEEQUI (CHECKPT) 
IEDQBD 



None 



IEDQLM (CHECKPT) 
DSPPOST in IGG019PB or 
IGG019RO 



TEDOBC 



IED0BC IGG019PP or IGG019PO TEDQTNT 



DSPCHAIN in IGG019PE or 
IGG019RO 
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M odule 

Name 



Entry Entered 
Points From 



Fxternal Exit 
Routines Points 



Exits 

TO 



t^-DOBD 



IEBQBD01 IGG019»B or TGG019PO TEDQTNT 



TFDOBD02 TGG019FB or IGG019RO TEDQTNT 



DSPCHAIN in IGG019RE or 

TGG019PO 

IEDQNX 

DSPCHAIN in IGG019EB or 

IGG019RO 



"^DOBE 



TFDQBE IEDQUT (LOCK) 



TEDQTNT 



IEDQLM (LOCK) 



TFDOBF 



TEDQEE IECQUI (UNLOCK) 



None 



TEDQLM (UNLOCK) 



TEDOFG 



■EDQBG IGG019PB or TGG019PO TEDQTNT 



DSPPOST in IGG019PB 
IGG019RO 



'EDOBT, 



IEDQBL IFEQBD 



None 



DSPCHAIN in IGG019PE or 
IGG019RO 



I^DOBT 



TEDQBT TGG019RB or TGG019PO IEDQUT 

(IEDQAE) 



DSPBYPAS or DSPCHAIN in 
IGG019RB or IGG019PO 



:edobm 



TEDOBW IFEOAO 



None 



IEDQAO 



T-c-DOBX 



TEDO p Y 



IEDQBX IEDQUT (LOG) 



TEPOFY IEPQBB 



WRITE BR after IEDQLM (LOG) 

CHECK 'EXIT' 

GETMATN 



None 



DSPCHAIN in TGG019EE 
or IGG019RO 



TFDOBZ 



IEDOPZ TGG019PB or 
IGG019*O 



GETMATN 

CHECK 

WPITE 

DSPPOSTF 

DSPUNAVR 



DSPBYPAS or DSPPOST 
in IGG019P.B or 
IGG019RO 



TF^OC.A' 



T1DOCR OS Task TGC0010D 

wanaqeir.ent 
TmoCA02 Transient Operator TGC0010D 

Control Routines 



OS Task Management 

Transient Operator 
Control Routines 



TPngru 



FDOCG 



tt?pqch 



IFEQCF IGC0110D 



IEDOCG IGC0110P 



IEDOCH IGC0110D 



IEDQC5 



None 



None 



IGC0110D 
IGC0110D 
TGC0110D 



TFDOCT 



^FDOCJ 



TFPOCV 



TEPQCI TGC0110D 



TECQCJ IGC0110D 



TEDQCK IGC0110D 



None 



None 



None 



IGC0110D 
IGC'0110D 
IGC0110D 
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Module 

Name 



TEDon 



"<"EDOC* 



TEDOCN 



TEDOCO 



t^DOCF 



t^DOCO 



Entry Entered 
Points ^rom 



TEDOCL IGC0110D 



IEDCCM TGC0110D 



IEEOCN TGC0110D 



IEDCCO IGC0110D 



TEEQCP IGCOIIOD 



IEDOCO TGC0110C 



External Exit 
Routines Points 



None 



None 



IEDQNX 



None 



None 



IGC102 
WAIT 



Exits 


TO 


IGC0110D 


IGC0110D 


TGC0110D 


IGC0110D 


IGC0110D 


IGC0110D 



"EDOCU 



IEEOCU IGC0110T) 



TGC102 
EXCP 



IGC0110D 



tt^QCV 



TEEOCV TGC0110D 



IGC102 
WAIT 



IGC0110D 



T-PDOCW 



TEDOCX 



TEDQC" IGC0110T) 



TEfOCX IGC0110D 



None 



None 



IGC0110D 
IGC0110D 



TEDOCZ 



EDOCC 



IEEOCZ IGC0110D 



IEDQCO 



TGG019RB or 

TGG019RO. 

TGC0110D 



IGC102 
IGC102 



IGC0110D 



IGG019RB or IGG019RO 



TEDOCI 



TETVOC2 



IEWL IGC0110D 



IED0C2 TGC0110D 



IGC102 



IGC102 
WAIT 



IGG0110D 
IGC0110D 



■ T EDOC^ 



T EnoC6 



IEDQC3 TGC0110D 



IEE0C6 TGC0110D 



None 



TEDQCA02 

Service 

Aid Routines 

LOAD 

DELETE 



IGC0110D 
IGC0110D 



T EDOEC 



TEEQEC TGG019PE or TGG019RO DSPPOSTB E after DSPCHAIN in 

in "REQUEST" IGG019RB or 
TGG019RE IGG019RO 

or B after 
TGG019RO "NQBECDEL" DSPDISP in 

IGG019RB or IGG019RO 



Diagnostic Aids 1095 



Module 
Name 



Entry Entered 
Points From 



External Exit Exits 
Routines Points To 



IGC102 B after DSPDISP in 
"ECBPOST" IGG019RB or 
IGG019RO 

B after DSPDISP in 
"SAVIT" IGG019RB or 
IGG019RO 



TTDOES 



IEDOES FFTRIEVF 



IEDQDI 
(IEDQA1) 
TGC102 



RETRIEVE 



1D0 1 



IPDOET ICHNG, REIEASEM, IGC102 
MRELEASE, 'STARTLN, IEDQE6 
STOPLN, MCPCtOSE, or 

CIOSEMC 



Next instruction in the 
application program 



TFDOFU 



IEDOEU IGG019RP or IGG019PO IGC102 

GETMAIN 
FREEMAIN 



IGG019RB or JGG019RC 



TT'DQFV 
T FDO^)Z 



IEDQFW TGG019RE or IGG019PO TGC102 



TEDOEZ IGG019RB or IGG019RO None 



IGG019RB or IGG019RC 



IGG019RB or IGG019RO 



T FD0F1 



TFD0E1 TCOPY 



IEDQUI 
(IEDQA1) 



TCOPY 



IEDOF2 



IEDQE2 QCOPY 



TEDQUT RETURN 
(IEDQA1) after 
"EXIT" 



Next sequential 
instruction or 
macro expansion 



TED033 



IEDQE3 TCHNG 



TEDOEU 



TFD0E6 



TEDQF4 ICOPY 



IED0E6 OS Link (IEDQOA) 
IED0E3 
IFDQET 



IEDQE6, 
IEDOUI 
(TEDQA1) , 
IEDQNB, 
TGC102 


RETURN 
after 

"EXIT" 


TCHNG 


None 


RETURN 

after 

"EXIT" 


ICOPY 


None 




IEDQOA 
IEDQE3 



TFD0E7 



IED0E7 IGG019RB or IGG019RO IGC102 



DSPDISP in IGG019PB 
or IGG019SO 



TFDOFA 



IEDQFA IGG019RB or IGG019RO 
IEDQFO 



IGG019RB or IGG019RO 
IGG019RC 



TED0FA1 

1096 



IEC0FA1 IGG019RO or IGG019RO 
IEDQFO 



IGG019RB or IGG019RO 
IGG019RC 



lodule Intry Entered 
Name Points From 



External Exit Exits 
Routines Points To 



TEDQ*A2 



IEDOGA 



IEDQFA2 IGG019PO or IGG019PB 
IEDQEQ 

IEBQGA IGG019FB or TGG019BO DSPLIFOB 



IGG019RB or IGG019BO 
TGG019RC 

IGG019RB or IGG019BC 



IEDOGA 



IEDQGB IGG019FB or TGG019PO DSPPOSTB 

DSPLIFOB 



IGG019PB or IGG019BC 



TEDQGA 



TEDQGD IGG019FB or TGG019PO EXCP 



TGG019PB or IGG019BO 



EDOGT 



TEDQGT ODTBOF 



None 



OUTEUF 



TEDOHG 



TEDQ'PG TGG019PB or TGG019PO TIME 

STIWEP 

IEDQHG01 TCAM Subtasks IGC102 

IEDOPG02 TCAM Subtasks DSPPOSTP 

PSPPPIOP 

TED0HG03 IGGC19FB or TGG019PO 

TTMEEXIT OS Interrupt Routine 



IGG019PB or IGG019PC 

Calling Subtask 
Callinq Subtask 

TGG019PB or IGG019PO 



TEDOHT 



IEDOHT IGG019PB or TGG019PO 



IEDQHG01 
TEDQHG02 
IOHALT 
DSPPPIOP 



IGG019RB or IGG019BO 



TEDOHK 



IEDOHK IGG019PE or IGG019PO None 



IGG019RB or IGG019PO 



TEDOHM 



IEDQHM IGG019PB or IGG019PO IEDQTNT 



IEDQHM02 IGG019*D 
IGG019PP 



Scheduler 
Subroutine 



IGG019PB or IGG019BO 
IGG019PP 



IEDQHM TEDQHM1 IGG019PB or IGG019BO IEDQTNT 

IEDQBM02 IGG019PD Scheduler 

IGG019PP Subroutine 



IGG019RB or IGG019BO 
IGG019PP 



'ED0HM2 IED0HM2 IGG019PB or IGG019BO IEDQTNT 

IEBQPM02 TGG019*D Scheduler 

IGG019PP Subroutine 



IGG019RB or IGG019BC 
IGG019PP 



IEDOKA 



IEDOKA IGG019PB or IGG019PO EXCP 
TEBQKA02 IGG019PO IEDQTNT 



IGG019BB or IGG019BO 



TEDOKB IEDQKB IGG019PB or TGG019PO. EXCP, 

IEEQKA02 IEDQTNT 



IGG019PE or IGG019PO 



TEDOKC IEDQKC IGG019BE or IGG019PO EXCP, 

IECQKA02 IEDQTNT 



IGG019BB or IGG019BO 



TEDQ*D IEDQKD IGG019BB or IGG019BO EXCP, 

TEDQKA02 IEDQTNT 



IGG019BB or IGG019BO 



Diagnostic Aids 1097 



Module 
Name 



Entry Entered 
Points From 



External Exit Exits 
Poutines Points To 



:ED0KE lECQKE TGG019FB or IGG019FO EXCP 

IEDQKA02 IEDQTNT 



IGG019BB or- IGG019RO 



IEDQLM 



TEDQIM Messaqe handling 



None Last Message handling macro 

executable expansions and routines 
instruction 



TEDONA TEDQNA IGG019RB or IGG019RO IEDQNA2 RETURN User code following 

after READY 
"QNAOO" 

IFDQNA3 OS Termination routine IEDQNA2 RETURN OS Termination 

after routine 
"QNA40* 



TED0NA2 



IEDQNA2 IEDQNA 



EDONB 



IEDONB 



TEDQND 



EDONF 



IEDONB CKPEQ 



IED0NB02 TEDQE3 



TEDOND READY 



TEDONF OS Task Management 



OS Task 


BR -after 


IEDCNA 


Manage- 


"QNA60" 




ment, 


or 




DETACH, 






DSPPOSTR 


BR after 
"QNA90" 




IEDQTNT, 


RETURN 


CKREQ 


TGC102 


after 
"QNB30" 




TGC102, 


RETURN 


IEDQE3 


IEDQTNT 


after 
"QNB30" 




ATTACH 


BR after 
•QND84» 


READY 


GETMAIN 






FREEMAIN 






IEDQTNT 






EXCP 






LOAD 






POST 






WTO 






WAIT 






IECPCNVT 






IEDQNG, 


RETURN 


os Task 


IEDQNH, 


after 


Management 


IEDQNJ, 


"IEDQNF90 


it 


IEDQNK, 






TEDQNM, 






IEDQNO, 






TEDQNP, 






IEDQNQ, 






TEDQNR, 






IEDQNS, 






OS 






Contents 






Supervisor, 




OS Task 






Management 





1098 



Module Entry Entered 
Name Points Froa 



External Exit Exits 
routines Points To 



IEDQNG 



IEDQNG IEDQNF 



IEDQTNT, 
OS 

Contents 
Super- 
visor 



BP after IEDQNF 

"IEDQNG40J' 

BP after IEDQNF 

*IEDQNG50" 

BP after IEDQNF 
"IEDQNG60" 

EP after IEDQNF 
"IEDQNG70" 



TEDQNH 



IICQNP IEDQNF 



IEDQTNT, 
OS 

Contents 
Super- 
visor 



EP after IEDQNF 

"IEDQNH50" 

BP after IEDQNF 

"IEDQNH60" 

EP after IEDQNF 

"IEDQNH70" 



IEDQNJ 



IEDQNJ IEDQNF 



None BP after IEDQNF 
"QNJ25» r 
"QNJ30", or 
"QNJ40" 



IEDQNK 



IEDQNK IFDQNF 



OS 

Contents 
Super- 
visor 



BP after IEDQNF 

"QNK30" 

BP after IEDQNF 

"QNK81" 



IEDQNM 



IEDQNM IEDQNF 



OS 

Contents 
Super- 
visor 

IEDQTNT 



EP after IEDQNF 
"QNM60" 

EP after IEDQNF 
"QNM65" 



TEDQNO 



IEDQNO IEDQNF 



OS ENO after IEDQNF reqister 14 
Contents "QNO20" 

Super- BZ after IEDQNP register 14 

visor "QN050" plus 4 

BE after IEDQNF reqister 14 

"QNO60" plus 4 



IEDQNP 



IEDQNP IEDQNF 



TIME 
OS DISK 
Address 
Convert 
Poutine, 
OS Data 
Manaqe- 
roent 



B after 
"QNP60" 
B after 
"QNP98" 



IEDQNF reqister 14 

plus 4 

IEDQNF reqister 14 



;qno 



lEDQNQ IEDQNF 



IGC102 



IEDQNF plus 4 
IEDQNF plus 



IEDQNP 



TEDQNR IFDQNF 



OS Data BNZ after IEDQNF plus 8 

Manaqe- "QNBOO" 

ment 



Diagnostic Aids 1099 



Module 
Name 



Entry Entered 
Points Frcm 



External Exit Exits 
Routines Points To 



IEDONS 



IEDQNS IEDQNF 



ER after IEDQNF plus 
"QNR40" 



IGC102 BO after IEDQNF pl-us « 
"QNSOO" 



IEDQHG03 



B after IEDQNF plus 4 
"QNS20" 



TEDQNX 



TEDQNX IEDQBD 



IEDQTNT, BR after DSPCHAIN in IGG019BB 
IEDQUI "QNXGO" or IGG019RO 



TEDQOA 



TEDQOB 



IEDQOA INTRO 



TEDQCB OS Link (IEBQOA) 



LINK 


FETDBN 


(IEDQOB, 


after 


IEDQOG, 


"EXIT" 


IEDQOH, 




IEDQOS, 




IEDQE6) , 




WTO 




WTO 


RETURN 


WAIT 


at 




"GETMAIN" 



INTRO 



IEDQOA 



TEDOOG 



IEDQCG OS Li nk (IFDQOA) 



GETMAIN BETURN IEDQOA 
after 
"RTEND" 



TEDOOM 



IIDQCM OS Link (IEDQOA) 



GETMAIN, RETURN 
WTO after 

"RTENC" 



IEDQOA 



TEDOOS 



IEDQOS OS Link (IEDQOA) 



ATTACH, 
EXTRACT 
LOAD 



IEDQOA 



IEDOTNT IEDQTNT IEDQAE 

IECQAG 
IEEQAH 
IEJ)QAM 
IEDQAS 
IEDQAV 
IEDQAY 
IEDQA4 
IEDQA6 
IEDQBC 
IEDQBD 
IEDQBG 
IEDQHM 
IEDQNB 
IEDQNG 
IEDQNH 
IGGQ19R1 
IGG019R4 
IEDQNH 
IEDQNX 
IEDQKA 



None 



IEDQAE 

IEDQAG 

IEDQAH 

IBDQAM 

IEDQAS 

IEDQAV 

IEDQAY 

IEDQA4 

IEDQA6 

IEDQBC 

IEDQBD 

IEDQBG 

IEDQHM 

IEDQNB 

IEDQNG 

IEDQNH 

IGG019R1 

IGG019RU 

IEDQNM 

IEDQNX 

IEDQKA 



1100 



Module 
Name 



TEDOUI 



Entry 


Entered 


Pcints 


From 




IEDQKB 




IEDQKC 




IEDQKD 




TEDQKE 




TGF00Q4G 




IGF000UH 




IGE050UG 




IG1050UH 




IGGOI^PO 




IGG019Q2 




IGG019O3 




TGG0190U 




IGG019Q5 




IGG019BP 


IFDOUI01 


Messaoe 




handlinq macro 




expansions 




ana routines 



Fxternal 


Exit 


Exits 


Poutines 


Points 


To 

IEDQKB 

IEDQKC 

IEDQKD 

IEDQKE 

IGE0004G 

IGE0004H 

IGE0504G 

TGE050WH 

IGG019R0 

IGG019Q2 

TGG019Q3 

IGG019Q4 

IGG019Q5 

IGG019BP 



None HP after Message 

"BOBTADDP" handlinq 
routines 



TEDOXA 



TEDQXA OS Task Manaqement 



SVC 64 


PETUPfl 


OS Task Manaqe^ 


BSAH 


after 


ment 


WTO, 


"EXIT" 




GETMAIN, 






FBEEMAIN, 






SVC 31 







TGC0010T) 



IGC0010D IFDQCA, IGC0210D, 
or IGC0U10D 



WAIT 



IEDQCA, IGC0110D, 
IGC0210D, or 
IGC0410D 



TGC0110D IGC0110D IGC0010D, IGC0210D, OEDIT, WTO, 

IGC0310P, or IGC01H0D 10AD, DELETE, 

Operator 
Control 
Processinq 
routines 



IGC0010D, IGC0210E, 
IGC0310D, or 
IGC0410D 



TGC0 210D 
TGC0310D 



IGC0210D IGC0110D or IGC0410D TGC0010D 



IGC0310D IGC0110D, IGC0210D, 
or IGC0410D 



IGC102, 
WAIT, WTO, 
DELETE, 
OEDIT 



IGC0110D or IGC0310E 



IGC0110D, IGC0410D, 
or IGC0510D 



TGCOtMOD 



IGC0410D IGC0110D, IGC0310D, 
or IGC0510D 



IGC102, 

IGC0010D, 

DELETE 



IGC0110D, IGC0210D, 
or IGC0310D 



IGC0510D 



TGC0510D IGC0310D 



IGC102, 
WAIT 



IGC0U10D 



IGC102 



IGC102 SVC 102 from any POST, 

Poutine in the System IKJTSI00 

STATUS, 
TESTDSP 



Callinq routine 



Diagnostic Aids 1 1 01 



Module 


Entry Entered 


Name 


Points From 


TGG1303D 


TGC1303D SVC 34 



External Exit 
Routines Points 



GETMAIN, 

FRSEMAIN, 

OEDIT 



Exits 
To 



IGC0503D 

Address in register 14 



TGE0004G 



IGE0004G OS I/O supervisor 



IEDQTNT 



IGE0104G 
IGE0204G 
IGE0304G 
IGE0404G 
IGE0504G 
IGE0604G 
IGE0804G 
IGE0904G 
IGG019R0 
IGE0025F 



TGE0104G 



IGE0104G IGE0004G 



None 



IGE0504G 
IGG019H0 



IGE0204G 



IGE0204G IGE0004G 
IGE0004H 



WTO 



IGE0504G 
IGG019R0 



TGE0304G 
TGE0404G 



TGE0304G IGE0004G 



TGE0404G IGE0004G 
IGF004H 



None 



None 



IGE0504G 



IGE0504G 
IGG019H0 



'GE0504G IGE0504G IGE0004G 

TGE0104G 
IGE0204G 
TGE0304G 
IGE0404G 
IGE0604G 



IEDQTNT 



OS Message Writer 



TGE0604G 



IGE0604G IGF0004G 



None 



IGE0504G 



TGE0804G 
TGE0904G 



TGE0804G IGE0004G 



TGE0904G IGE0004G 



None 



IGE0025F 



IGE0804G 



IGG019R0 



TGE0004H 



IGE0004H OS I/O Supervisor 



IEDQTNT 



IGE0104H 
IGE0204G 
IGE0204H 
IGE0304G 
IGE0404G 
IGE0404H 
TGE0504H 
IGE0804H 
IGG019R0 



TGE0104H 



IGE0104H IGE0004H 



None 



IGE0504H 
IGG019R0 



IGE0204H 



IGE0204H IGE0004H 



None 



IGE0404H 
IGE0504H 



1102 



Module 

Fame 


Entry 
Points 


Entered 
From 


IGEOUOUH 


IGEOUOUH 


IGEOOOUH 
IGE020UH 


TGE050UH 


IGE050UH 


IGEOOOUH 
IGE010UH 
IGE020UH 
IGEOUOUH 
IGE080UH 


TGE080UH 


IGE080UH 


IGEOOOUH 


TGG019Q0 


IGG01900 


IGG019*0 



External Exit 
Routines Points 



None 



IEDQTNT 



None 



None 



Exits 
To 



IGE050UH 
IGG019R0 



IGE00 25P 



IGE050UH 



IGG019R0 or User 
Trace Exit routine 



TGG01901 TGG019O1 IGG019BB or IGG019BO None 



IGG019RB or 
IGG019RO 



IGG019Q2 TGG019Q2 I/O Supervisor 



POST 
IEDQTNT , 
IEDQKA02, 
TESTDSP 



I/O Supervisor 



IGG01903 IGG019O3 I/O Supervisor 



POST 
IEDQTNT, 
IEDQKA02, 
TESTDSP 



I/O Supervisor 



TGG019QU IGG019QU I/O Supervisor 



POST 
lEDQTliT, 
JEDQKA02, 
TESTDSP 



I/O Supervisor 



IGG019Q5 IGG019Q5 I/O Supervisor 



POST 

IEDQTNT, 

IEDQKA02, 

TESTDSP 



I/O Supervisor 



TGG01906 TGG.019Q6 IGG019PB or IGG019PO IOHRLT, 

EXCP 



TGG019PB or IGG019BO 



TGG01907 TGG01907 IGG019PB or IGG019PO IEDQTNT, 

IOHAtT, 
EXCP 



IGG019RB or IGG019BC 



TGG019Q8 IGG01908 IGG019U5 
IGG019Q8+U 
IGG01908+8 
IGG01908*12 
IGG01908+16 



IGG019PC, 
WRIT 



IGG019U5 



TGG019BA TGG019RA OS I/O Suoervisor None 



ECP 



OS I/O Supervisor 
return address 



Diagnostic Aids 1 1 03 



"lobule 

^ame 



Entry Entered 
^cints From 



External 
Foutines 



Exit 
Points 



Exits 
To 



TGG019FF 

or 

IGG019RO 



T.GG019FC 



DSPBYPAS Any TCAK Subtask 

DSPCHAIN 

DSFCLETE 

DSPDTSP 

IGGC19FB+16 

or 

IGG019PO+16 

DSPLTFO 

DSPLIFOF 

DSFIIST 

DSFPOST 

DSPPOSTF 

DSPPBIO 

DSFPFIOF 

DSPWATT 

DSPTSTO 

DSPTSTF 

DSPUNAV 

DSPUNAVF 

IGG019FC TEEQFA 

TGG019Q8 



WAIT 
POST 

DELETE 



OS I/O 
Super- 
visor 



OS Data 
Manage- 
ment 



E at 
"EXIT" 



OS I/O Supervisor 
return, address 
plus 8 



Any TCAM Subtask 



DSPDISP in 
IGG019FB or 
IGG019FO 

IGG019Q8 



gg019fd tgg019fd igg019ff or tgg019r0 dsppostf, 

iedq'hm iedohg01, 

iedqtntI 



DSPBYPAS, ESPPOST, or 
DSPDIS° in IGG019FB or 



TGGOI^FF 



TGG019FF IFEOFA 



OS I/O B at 
Supervisor "EXIT" 



DSPDISP in TGG019FB 
or IGG019RO 



1104 



lobule 
Mame 



Entry Entered 
^cints From 



External Exit 
Routines Points 



Exits 
To 



IGG019PG 



IGG019RG GET/PEA? 



WAIT, 
IGC102 



GET/READ 



'GG019BF 



TGG019RH GET 



WATT, 
IGC102 



GET 



GG019 1 ?! 



IGG019PI PUT/WRITE 



IEDCUI 
(IEDQA1) , 
WAIT 
IGC102 



PUT/WRITE 



TGG019PJ 



IGGC19PJ PUT 



TEDQUT 
(IEDQA1) , 
WAIT 
IGC102 



PUT 



TGG019P* 



IGG019PK OS I/O Supervisor 



POST 
"FXIT" 



ER after I/O Supervisor 



"GG019RI 



TGG019PL CHECK 



IGG019RG 
OS WAIT 



CHECK 



"GG01PPM 



TGG019PM POINT 



IEDQUI 



Next sequential 
application proqrai 
instruction 



TGG01°"^ 



I/O Supervisor 



IGG019R0, 
IEDQTNT 



OS Post Routine 
(I/O Supervisor) 



TGG019PO - see IGG019PB 



TGGOIP^P TGG019RP IED0FA IEDQHM02, ER15 

TGG019RB or IGG019PO IEDQHM03, at 

IEDQTNT, "EXIT" 
IEDQHG02 



IEDQFA02 



TGG01PPO TGG019PO Bollout./Rollin 

Routine TEAQPORI 



POST 



Rollout/Rollin . 
Routine IEAQRORI 



IGG01 C » W 



IGG019B.0 I/O Supervisor 
SCAN IGG019PN 



POST 

IEDQTNT, 

T1DQKA02, 

TESTDSP 

TGG019Q0 



I/O Supervisor 



TGG019P1 



IGG019P1 TGG019PE or TGG019PO 



IEDQTNT, 

TEDQHG01, 

IGG019BB, 

TIHE, 

EXCP 



IGG019RB or IGG019RO 



IGG01PP2 



IGG019R2 OS I/O Supervisor 



POST 



ER after OS I/O Supervisor 

"EXIT" 



Diagnostic Aids 1105 



^oflule 

"ame 



Entry 
Points 



Entered 
From 



Fxternal 
Foutines 



Exit 
Points 



Exits 

To 



TGO019F3 TGG019F3 TGG019PB or IGG019FO DSPUNAVF, B after 

"ID" 
QEVBNT TGG019FB or TGG019PO TEBAYZ, 

POST E after 
"ACTIV" 



DSPBYPAS in 
IGG019PB or 
IGG019PO 
DSPPOST in 
IGG019RB or 
IGG019RO 
ENZ after DSPPOST in 
"ENDOLIST" IGG019RB or 

IGG019RO 
E after DSPPOST in 
"LCPPOST" IGG019RB or 

IGG019FO 
B after DSPPOST in 
"FPEELINE" IGG019FB or 
IGG019RO 



TGG019*4 



TGG019F4 IGG019*E or IGG019FO 



IEDQTNT, 

IGGF19PE 

IOHALT, 

IEDAYZ, 

EXCP 



IGG019RB or IGG019RC 



TGG019R5 



TGG019P C IFCQAT^N 



OS Post, 

TESTDSP 



T/O Supervisor 



TGG019P6 



TGG019P6 TGG019PB or TGG019PO 



TGG019FC, 
TEDQHM02 
IEDQTNT 
OS WAIT 



DSPPOST or DSPELETI 
in IGG019FB or 
IGG019RO 



'GG01930 IGG01930 System Open Monitor 

or another open 
executor 



GETMAIN XCTL 
macro 
after 
"XCTLFTN" IGG01933 



Another open 
executor-IGG01931 



TGG01931 IGG01931 System Open Monitor 

or another open 
executor (frcm 
IGG01930) 



GETMAIN XCTL 
macro 
after" 
"XCTLPTN" IGG01933 



Another open 
executor t IGG01934 



TGG01 Q 33 



TGG01933 Any TCAM Open Executor 



OS WTO ABEND; any TCAM open 
OS SYNCH executor 



TGG01934 IGG01934 System Open Monitor 

or another open 
exec'utor (from 
IGG01931) 



LOAD 



XCTL 
macro 
after 
"XCTLRTN" 



Another open 
executor - IGG01941 
or IGG01935 



TGG01935 IGG01935 System Open Monitor 

or another open 
executor 



GETMAIN XCTL Another open 

macro executor - IGG01936 
IGG01933 



■GG01936 IGG01936 System Open Monitor 

or another open 
executor (from 
IGG01935) 



GETMAIN XCTL Another open 

macro executor - IGG019 37 
IGG01933 
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*odule 
Name 



Entry Entered 
Points From 



External Exit- Exits 
Poutines Points To 



"GG01937 TGG01937 System Open Monitor 

or another open 
executor (from 
IGG01936) 



None 



XCTI 
macro 



Another open 
executor - IGG01938 



"GG01938 IGG01938 System Open Monitor 

or another open 
executor (from 
IGG01937) 



None 



XCTL 
macro 



Another open 
executor - TGG01939 



'GG0193 Q IGG01939 System Open Monitor 

or another open 
executor (from 
TGG01938) 



LOAP 
EXCP 



XCTL 
macro 



Another open 
executor TGG01940 



"GG01°4^ IGG019H0 System Open Monitor 

or another open 
executor (frcm 
TGG01939) 



LOAP 



XCTL 
macro 



Another open 
executor-IGG0194 8 



TGG0191H 



TGG019U1 TGG0193U 



GETMATN XCTL macro IGG01949 for Cold 
WTO at Restart or 
10AD "QMA7C" IGG01943 for Warm 
EXCP Restart 

IGG0190S 



'GG0194? 



TGG019U2 IGG0194Q 



IFCPCNVT XCTL 

WTO, macro at 

'PXCP, "QME89" 
WAIT 



IGG0190S 



TGG01943 



TGG01943 IGG019U1 



IECPCNVT XCTL 

FXCP, after 

WATT, "0ME879" 
WTO 



IGG01944 



TGG0194U 



TGG01944 IGG01943 



IECPCNVT, XCTL 
TEDQTNT, after 
EXCP "QMG87" 
WAIT, 
WTO 



TGG01945 
IGG0190S 



TGG01945 



IGG01945 IGG01944 



TGG019Q8, XCTL Next Module in 
LOAD, after the System 
IEDQTNT "QMJ87" Where-to-Go Table 



TGG01946 TGG01946 System Open 

Executor 
IGG01933 



IED0DI 
(TEDQA1) , 
IGC102 



IGG01947 



TGG01947 



TGGC1947 IGG01946 



TEDQNB05 



Next entry in system 
Where-to-Go Table 



T GG01948 



IGG01948 IGG01940 



TIME, 
"TO 



IGG0190S 
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Module 
Name 



Entry Entered 
Foints From 



External Exit- 
Poutines Points 



Exits 
To 



TGG01949 



IGG01949 IGG01941 



None 



XCTI 

after 

"0MM75" 



IGG01942 



TGG02030 



IGG02030 System I/O Support 
module 



System 
Loader 



XCTI 
macro 



Another close 
executor 



"GG02035 IGG02035 System Close Module System XCTI 

Loader macro 



Another Close 
executor 



TGG02036 IGG02036 System Close Module System XCTI 

loader macro 



Another Close 
executor 



TGGO^Om 



TGG02041 System Close Module IECPCNVT 



Another Close 
executor 



T GG02046 



T GG020U7 



IGG02046 System Close Executor TGC102 XCTI Next entry in the 

TEDQNB05 after system Where-to-Go 
"QI750" Table - IGG02047 



TGG02047 IGG02046 



TGC102 XCTI 



Next entry in the 
system Where-to-Go 
Table 



■CAW LINKAGES BETWEEN MACHO EXPANSION AND MODUIES 



'"his chart depicts the linkaqes between the macro expansion and the modules they 
call. 

Macros indicated as part of the INMSG/OUTMSG subqroup which are followed by no branch 
to T^noAU are macros which are coded within an INMSG or OUTMSG subqroup. These macro 
expansions qenerate a parameter list indicatinq the routine to be executed. Buffer 
disposition (TEEQPD) , which is tposted by IEDQA4, examines the parameter list and 
branches, to the proper routine. 

M acros indicated as QTAM macros and followed by no liiikaqe are those which if 
assembled with the OSTAPT macro instruction qenerate as NO OPs. 

Macros for which ro linkaqe is indicated are those which qenerate no code or qenerate 
onlv in-line code and do not link to any modules. 



Branch 



Branch and Link 



Transfer Control 



<»> 



► SVC xx 
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MACRO INSTRUCTION 



MODULES 



ATTEN TSO INMSG/OUTMSG 

CANCELMG INMSG/OUTMSG 
IEDQUI 



IEDQA4 


TPOST 


IEDQBD 






IEDAYX 


— •» 


IEDAYA 




m i 


i* 










1 



IEDQA4 



TPOST 



IEDQBD 



-»{ iedqar" 



CARRIAGE TSO 



IEDQLM 



IEDAYC 



CHECK 



CHECKPT 



IGG019RL 



INHDR/OUTHDR IEDQUI 



INBUF/OUTBUF * , ED QLM* 
CHECKPT INMSG/OUTMSG 

CHNGP QTAM 
CHNGT QTAM 

CKREQ * ». 



IEDQBB 



IEDQA4 


iruoi 


IEDQBD 




IEDQBB 







IEDQNB 



CLOSE Application. Program •♦-(SVC 20)-»| IGG02046 \m (SVC 102)- 



IEDQEU 



CLOSE! Checkpoints — j — (SVC 20) » IGG02030 



-• IGG02041 



CLOSE Line Groups — j — (SVC 20) 



IGG02035 



«. IGG02036 



CLOSE Message Queues s-j-tSVC 20) 



T 



IGG02030 



CLOSEMC CQTAM 



IEDQET 



CODE < 



IEDQUI 



IEDQLM 



IEDQAI 



IEDQAQ 



IEDQUI 



IEDQLM 



IEDQAW 



COPYP QTAM 
COPYQ QTAM 
COPYT QTAM 



COUNTER 



CUTOFF 



IEDQA7 



IEDQUI 



IEDQLM 



IEDQAU 
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MACRO INSTF 


*UCTIO 


N 

lEDQUI 




MODULES 


r 






\ 


IEDQAC 


\ 




lEDQLM 
lEDQUI 




DATETIME ) 




J 


IEDQAF 


/ 




lEDQLM 





DCB 



ERRQRMSG INMSG/OUTMSG 



FORWARD < 



GET 



GET CQTAM 



lEDQUI 



lEDQLM 



lEDQUI 
V. lEDQLM 





TPOST 












IEDQA4 




IEDQBD 






IEDQAZ 
























IEDQAT 



lEDQUI 



IEDQAJ 



IEDQAV 



IEDQA5 



IGG019RG 



IGG019RH 



lEDQLM 
lEDQUI 



IEDQAE 



lEDQLM 
lEDQUI 



IEDQAV 



lEDQLM 



IEDQAF 



•(SVC 102)- 



IEDQEW 



.(SVC 102)- 



IEDQEW 



HANGUP TSO 



HOLD INMSG/OUTMSG 



TPOST 



IEDQA4 



IEDQBD 



IEDQAS 



IGHNG 



IEDQET 



I COPY 



INBUF 



lEDQUI 



lEDQLM 



IEDQE4 



IEDQAE 



INEND* 



INHDR 




ICUUUI 




IEDQAE 




lEDQLM 
lEDQUI 








INITIATE 


IEDQAI 


r 


lEDQLM 
lEDQUI 










IEDQAE 






lEDQLM 
lEDQUI 








INMSG i 


IEDQAK 


lEDQUI 








IEDQA4 




^ 


LINK 










IEDQ0A 


INTRO 









•If INMSG is not coded, the INEND macro instruction also generates 
the INMSG parameter list. 

If INMSG is coded, INEND generates a X'0100' which indicates the 
end of the INMSG subgroup. 
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MACRO INSTRUCTION 
INVLIST 

with conditional 



MODULES 



IEDQUI 



LOCK 



character string 



IEDQLM 
IEDQUI 



IEDQAI 



IEDQLM 



IEDQBE 



without a conditional IEDQUI 
LOCK character string 



IEDQLM 
IEDQUI 



IEDQBE 



IEDQLM 
IEDQUI 



LOCOPT 

or INHDR/OUTHDR 

INBUF/OUTBUF IEDQLM 

LOG INMSG/OUTMSG 

IEDQUI 



IEDQAE 



IEDQBX 



LOGON TSO 



LOGTYPE 



IEDQA4 




IEDQBD 






IEDQBY 






m 



IEDQLM 



IEDAYL 



MCPCLOSE 



MRE LEASE 



MSGEDIT < 



MSGFORM 



*• IEDQET 



IEDQET 



IEDQUI 



IEDQLM 
IEDQUI 



IEDQAN 



IEDQLM 
IEDQUI 



IEDQAP 



IEDQLM 
IEDQUI 



IEDQA2 



IEDQLM 
IEDQUI 



IEDQA8 



IEDQLM 



IEDQA6 



MSGGEN INMSG/OUTMSG 





TPOST 










IEDQA4 


_ 


IEDQBD 






IEDQBL 









MSGGEN TSO 



IEDAYM 



IEDQUI 



MSGLIMIT 



MSGTYPE 



IEDQLM 



IEDQAE 



IEDQAG 



IEDQUI 



IEDQLM 



IEDQAI 



OPEN APP'^ation (syc ig) . 

Program * 



IGG01946 



IGG01947 



(SVC 102)- 



IEDQEU 
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MACRO INSTRUCTION 



MODULES 



OPEN 



Checkpoint 

Cold Restart t \ 



(SVC 19) 



IGG01930 *• IGG01931 «• IGG01934 



IGG01941 



IGG01942 *• IGG01949 *- — 



Checkpoint 
OPEN Warm or - 



Continuation Restart 



• (SVC 19)- 



IGG01930 



+ IGG01931 



»■ IGG01934 ■*■ 



IGG01941 

i 



IGG01945 



IGG01944 



IGG01943 «• 



IGG019Q8 



IGG019RC 



OPEN Line Group 



* — i 


r (SVC 19) — 


— ♦ 


IGG01935 












IGG01948 









». IGG01936 



♦ IGG01937 



IGG01938 



IGG01940 



IGG01939 



OPEN Message Queues • 



OPTION 



ORIGIN < 



OUTBUF 



•(SVC 19)' 



lEDQUI 



lEDQLM 



lEDQUI 



lEDQLM 
lEDQUI 



lEDQLM 



IGG01930 



» j IGG01931 -« ^ IGG01934 



IEDQAI 



IEDQAM 



IEDQAI 



IEDQAE 



OUTEND* 



OUTHDR 



OUTMSG^ 



PATH 



PCB 



lEDQUI 



lEDQLM 





lEDQLM 
lEDQUI 






lEDQLM 
lEDOUl 




lEDQUI 




lEDQUI 






lEDQLM 
lEDQUI 





IEDQAE 



IEDQAE 



IEDQAK 



IEDQA4 



IEDQAE 



IEDQAI 



POINT 



IGG019RM 



PRIORITY 



lEDQUI 



lEDQLM 



IEDQAI 



*lf OUTMSG is not coded, the OUTEND macro instruction also generates the OUTMSG parameter list. 
If OUTMSG is coded, OUTEND generates a X'0100' which indicates the end of the OUTMSG subgroup. 



1112 



MACRO INSTRUCTION 
PUT * 



PUT CQTAM 



QCOPY 



MODULES 



IGG019RI 



IGG019RJ 



IEDQE2 



(SVC 102)- 



•> IEDQEC 



(SVC 102)- 



IEDQEC 



QSTART 



READ 



READY 



REDIRECT INMSG/OUTMSG 



RELEASEM CQTAM 



RETRIEVE CQTAM 



SCREEN 



SEQUENCE 



SETEOF 



SETSCAN 



SIM ATTN TSO 



START LN CQTAM 



IEDQUI 



IEDQLM 
IEDQUI 



IEDQL 
IEDQU 



KT 



IEDQLM 
IEDQUI 



IEDQLM 
IEDQUI 



IEDQLM 
IEDQUI 



IEDQLM 



IEDQUI 



IEDQLM 
IEDQUI 



IEDQLM 
IEDQUI 



IEDQLM 
IEDQUI 



IEDQLM 



*■ IGG019RG-* 



(SVC 102)- 



IEDQEW 



IEDQND 



IEDQUI 





TPOST 










IEDQA4 




IEDQBD 






IEDQAZ 









IEDQET 



IEDQES 



IEDQAI 



IEDQAY 



IEDQAD 



IEDQAH 



IEDQAI 



IEDQAI 



IEDQAI 



IEDQAJ 



IEDQA0 



IEDAYS 



IEDQET 



IEDQLM 
IEDQUI 



IEDQAE 



IEDQLM 



IEDQAV 



•(SVC 102H 



IEDQE7 



STARTMH 



STOPLN CQTAM 



TCHNG 



IEDQET 



IEDQE3 
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MACRO INSTRUCTIONS 



MODULES 



TCOPY 

TERMINAL 

TERRSET 

TLIST 

TPROCESS 

TRANLIST 

TSINPUT 



IEDQE1 



TTABLE 



IEDQUI 



with a conditional 
UNLOCK character string 



IEDQLM 

IEDQUI 
IEDQLM 



IEDQAL 



IEDQBF 



UNLOCK 



without a conditional ^IEDQUI 
character string IEDQLM 



IEDQBF 



WRITE 



IGG019RI 



■(SVC 102). 



IEDQEC 
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TABLE OF BEGISTEP USAGE EY MODULE 

This table qives the qeneral register usaqe for each of the executable TCAM 
modules. When a reqister contains input data for a module, that register is labeled 
T. A module work reqister is labeled W, and a label of represents a register in 
which the module is passinq output data. 



Module 


Entry Peqister 


i,w. 


Name 


Point 


or 


IEDAYA 


IEDAYA 


I 




IEDAYA+12 1 


I 





2 


w 




3 


I 




4 


I 




5 


I 




6 


I 




7. 


T 




8 


I 





9 


I 




10 


T 




11 


W 




12 


I 





13 


I 




14 


I 




15 


I 


TEDAYC 


IEDAYC 


w 




1 


T 




2 


T 




3 


I 




3 







4 


IrO 




5 


I 




6 


I 




7 


I 




8 


I 




9 


w 




10 







11 


1,0 




12 


I 




13 


I 




14 


I 




15 





TEDAYD 


IEDAYD 1 


I 
w 




2 


W,0 




3 


I 






4 







6 


I 




7 


IrO 




10 







11 


I/O 




12 


w 




13 


1,0 




15 


I 


TEDAYF 


TEDAYE 


I 



Use 



Parameter list address 

LCE address if entry is at IEDAYA+12 

EPB address 

Work reqister 

SCB address 

LCB address if entry is at IEDAYA 

TJB address 

TSB address 

QCE address 

RCE address 

Address of the messaqe 

AVT address 

Time Sharinq CVT address 

Work reqister 

Base reqister; entry point address to IEDAYA 

Entry point address to IEDAYM 

Save area address 

Return address 

Entry point address to IEDAYA+12 

Work reqister 

Index to the Termname Table 

Data index 

DCB address 

SCB address 

ICB address from IEDQUI 

Data count for carriage position 

Current buffer address 

Data pointer 

Unit index 

Work reqister 

QCB address 

Address of the first buffer 

Entry point address 

AVT address 

Peturn address 

Entry point address in IEDQLM 

Address of Time-Sharinq QCB or TCAM 

buffer 

Address of Terminal Table entry 

Work reqister; on exit to IEDQTSI, 

return address in IEDAYD 

STCB address 

"Return address in IEDAYD on exit to IEDQTSI; 

Cn exit to IEDAYZ - return address 

in Destination Scheduler (IEDQHM) 

ICB address 

Address of TS Scheduler 

Destination QCE address 

CCB address 

Dispatcher address 

Base register for TEDAYD 

Address of AVTSAVE2 

Entry point address 

Messaqe length (from IEDAYO) ; 
lenqth of the data area in the SCB 

(from IEDAYM) 
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2 


I 


3 


I 


4 


T 


5 





6 


I 


7 





8 


w 




i 


9 


w 


10 


I 


11 


I 


12 


I ' 


13 


I 


14 


i,o 


15 


I 








TCAM buffer address (from IEDAY0) ; 

the SCB address (f roifi IEDAYM) 

Lenqth of the data moved 

T IOC buffer address (from TEDAYO) ; 

address of the messaqe (from IEDAYM) 

SCB address 

LCB address 

Destination QCE address 

Address of TIOC buffer 

Address of TCAM buffer 

Work reqister 

TSB address (from IEDAYO) 

Work reqister 

DCE address 

Dispatcher address (from IEDAYM) 

Base reqister 

Address of AVTSAVE2 

Return address 

Entry point address 

Return code reqister: 

X'OO' - Successful completion 

X'OC* - Partial line moved 

XMO' - End of line reach'ed 



IEDAYF 



IEDAYF 



2 





3 





4 





5 






8 





10 





11 


I 


12 


I 


13 


I 


14 





15 


I 







IEDAYH IEDAYH 


w 


1 


■ !■ 







2 


I 


3 


I 


4 


I 


5 


I 


6 


I 


7 


I 


8 


I 


9 


w 


10 


I 


11 


1,0 


12 


I 


13 


1,0 


14 


I • 


IEDAYH-H2 1 


I 







7 


I 



LCB cr ERB address 

Address of the LCB ,to be tposted, as 

the first element in the chain to the 

DSPCHAIN function; LCB address to the 

Time Delay subtask; address of the Receive 

Scheduler key - to DSPPRIOR 

OCB address to IOHALT SVC 

SCB address to DSPCHftIN 

LCB address to DSPDISP & DSPCHAIN 

Address of QCB to which the LCB is to 

be tposted - to DSPCHAIN 

Address of first SICE in the LCB STCB chain - to 

DSFPEIOB 

DEB address 

ECE address 

Dispatcher address 

Base reqister for IEDAYF 

Address of AVTSAVE2 

Return address in IEDAYF - to IEDQHG; 

entry point address to DSPCHAIN in the 

Dispatcher 

Entry pcint address 

Entry point address of the Time Delay 

Removal subroutine in the Time Delay subtask 

Work reqister 

Address of the tpost list, contains either 

the tuffers to be tposted to the TSINPUT 

or 2€ro 

ERE address 

TJE address 

SCE address 

LCB address 

CVT address 

Time Sharinq CVT address 

QCE address 

Buffer address 

Work reqister 

TSB address 

TCAM Dispatcher address 

Entry rcint address, base reqister 

Address of AVTSAVE2 

Return address 

LCB address 
ERB address 
Address of IEDAYH 
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TEDAYL 



TEDAYM 



11 


IrO 


13 


IrO 


15 


I 





i,w 


1 


I 







2 


T 


3 


T,W 


4 


I,W 


5 


I 


6 


I 


7 


I 


8 


w 


9 


I 


10 


I 


11 


T 


12 


I 


13 


I 


14 


T,W 



15 



TEDAY1 1 
2 
3 
4 



6 

7 

8 

9 

10 

11 

12 

13 

14 

15 



TEEAYM 
1 



I 
I 

T 
I 
.1 
I 
I 
I 
I 
W 
W 

TrO 
T 
W 






w 

1,0 

w 



I 
I 



9 


W 


11 


1,0 


12 


I 



TCAK Dispatcher address 
Address of AVTSAVE2 
Entry point address 

Index register; work reqister 

Address of the TCAM buffer or of the TSI 

Address of the chain of elements to be tposted, 

or zero 

Pointer to the beginning of the data scanned 

SCE address; pointer to the end of the data scanned 

1CB address; pointer to the basic unit being 

scanned 

Address of the Terminal Table 

Address of the TCAM buffer 

Address of the TSI 

Work register 

TSB address 

TIOCBPT address 

Address of the TCAM Dispatcher 

Ease register 

Address of AVTSAVE2 

Return address; offset to the data 

in the TCAM buffer 

Entry point address 

Parameter list address 

ECE address; Time Sharing CVT address 

SCE adress 

LCB address 

Parameter list address 

Buffer prefix address 

QDCB address 

Terminal entry address 

AVT address 

Worfc register 

Work register 

Entry pcint address; base register 

Save area address 

Work register 

Return code: 

X'OO* - Initialization is performed for IEDQAE 

X»04' - Initialization is not performed for IEDQAE 

On linking tc IEDAYE - size in the SCB 
of message data 

Address of tpost list or zero (from IEDQB1) 
Zerc - from IEDAYS; 
EPB address from IGG019RB 
Eor passing to IEDAYE - address in the 
SCB to move data to High-order byte: 
X'05» - left justify message. 
X'06* - Do not justify message. 
Address of the 1RB to be tposted 
For passing to IEDAYE - address of the 
message, the first byte of which contains length 
SCE address 
LCE address 

Work register; translate table address 
Address of the routine to which to tpost 
the ERE (IEDQKA or IEDQBD) 
Address of the QCB removed from the time 
delay queue (from IEEAY9) 
Address of macro expansion 
(MSGGEfl macro) from IEDQBD; address 
of the Simulated Attention Mode 
(from IEDAYS) 

"Insert character" register 
Dispatcher address 
Base address of IEDAYM; 
Entry pcint address (frcm IEDQBD) 
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13 


i 






14 









15 





TEDAYM 


AYMCC 












1 


I 

I 





3 


W 




4 


W 




11 


I 




13 


I 




14 







15 


I 




IEDAYC 


TEDBYO 


w 




1 


I 
w 




2 


w 




3 


I 
w 




4 


w 




5 


w 




6 


w 




7 


I 




8 


w 




9 


w 




10 


w 




11 


I 




13 


w 




14 


W 




15 


I 
w 




IFDAYC02 1 


I 




3 


I 




7 


I 




11 


T 




13 


I 




15 


I 


IEDAYB 


IEDQAA01 


W 





1 


I 




3 





4 





5 


w 


6 


w 


7 


I 







8 


w 


9 


w 



Address of AVTSAVE2 (from IEDAYS) 

Return address (after linking to 

IEDAYE) 

Entry point in IEDAYE 

On linking tc IEDAYE - size, in the 

SCE, of message data 

Address of ERB 

On return frcm IEDAYE - length of the 

data moved 

Eor passing to IEDAYE - address in the 

SCE to move data to High-order byte: 

X'05' - left lustify message 

X^e* - Do not justify message 

For passing to IEDAYE - address 

of the message, the first byte of which 

contains the length 

SCE address 

1CB address 

Dispatcher address 

Address of AVTSAVE2 

Return address (after linking to 

IEDAYE) 

Address of the entry point 

Entry point in IEDAYE 

Work register 

EBB address cr TCAM buffer address 

Work register 

Work register 

STCE address 

SCB address 

ICB address 

TJB address 

TSE address cr buffer address 

Disk T/C QCB address 

TSB address 

TSB address 

TICCFFT address 

TCAM Dispatcher address 

Save area address for external routines 

Return address for external routines 

Entry point address 

Return code register fcr external routines 

Basic unit address or QCB address 

STCB address 

CFB Cleanup CCE address 

TCAM Dispatcher address 

Address of AVTSAVE2 

Entry pcint address 

Wcrk register 

On exit to an uncompleted routine, a 

negative value to indicate a multiple-buffer 

header 

Current buffer address 

To IEDQAI and IEDQAW, parameter list address; to 

Dispatcher, the address, of the buffer to be tposted 

Work register 

Increment value of 4C96; used for multiple base 

register support 

SCB address 

ICE address 

OCB address 

current tuffer address 

Address of the STARTMH QCB 

Address of the new QCB 

SCT address 

Work register 
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10 


W 


11 


w 


12 





13 


I 


14 


w 


15 


I 


Condition 





Code 





DCB address 

Dispatcher address 

Base reqister for the message handler 

Address of AVTSAVE2 

Return address from the external routines 

Entry point address into the STARTMH 

sufctask 

Entry point address in the new MH for the 

LOGO exit; 

On return to MH, the condition code: 

4 - Multiple-buffer-header re-entry 

1 - TSormal receive processing 

8 - formal send processing 



IFDAYS 



TEDAYS 



3 


T 


4 


I 


e; 


W 


6 


I 


7 


w 


8 


w 


9 


T 


10 


W 


11 


T 


12 


W 


13 


I 


14 


I 


15 


W 



TS icfc identification 
On return, frcm TEDQTNT, the 
address of the terminal entry 
Work register, used for the counter 
of characters in the buffer for device- 
dependent processing 
SCE address 
ICE address 

Address of the terminal entry 
Current TCAM buffer address 
Destination CCE address 
Work register, used for device- 
dependent processing 
AVT address 
TSE address 
Dispatcher address; 
Entry point address 
Base reqister for IEEAYS 
Address of AVTSAVE2 
Return address 

Work register, used for device- 
dependent processing 
On return via the Beturn Interface 
routine (IEDCLM) , contains the return 
address 
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SCE address 

ICE address 

AVT address 

Return address in I.EDAYE 

Entry point address 

Address of the CCB removed from the time 

delay queue and tposted 

On exit to the MSGGEN routine, set to 

zero 

Work reqister 

SCB address 

ICB address 

QCE address 

Work reqister 

On exit to the WSGGEN routine, set to 

zero 

Dispatcher address 

Ease reqister 

Address of entry point 'in the ,.TSO 

MSGGIN routine (IEDAYM) 

Address of AVTSAVE2 

Entry point address 

SVC entry code for TCAEEND 
Base reqister 
Reqister save area 
Peturn address 
Return code 
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Pointer to the work area that contains 

the address cf the AEEND routine 

Address of the parameter list for IGC102 

CVT address 

AVT address 

Address of the AEENE routine 

Work reqister, used to determine 

what routine issued an ABEND 

Address of the QCE for the ABEND routine 

Wcrk reqister 

Address of the first element in the chain 

Base reqister 

Address of the save area 

Return address 

Return code 

SVC entry code for TCABEND 

Address of parameter list for IGC102 

CVT address 

AVT address 

Work reqister 

Base reqister 

ftddress cf the save area 

Return address 

Return code 

Address cf the tpost list, or zero 

SCR address 

ICP address 

Address of the macro expansion 

Insert character reqister 

Address of the Dispatcher 

Entry pcint address 

Address of AVTSAVE2 

Address, of the QCE to tpost to the 

ready queue 

Work reqister 

Address of the previous element 

en the time delay queue 

Address of the current element on 

the time delay queue 

Address of the TSINFUT QCE 

Address cf the Dispatcher 

Base address 

Address of AVTSAVE2 

Return address in IEDAYY 

Entry pcint address 
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Terminal index or line entry, 

to IED0TNT; address of the QCB or LCB 

to be removed or inserted in the time 

delay queue, to IEEQHG. 

Work reqister 

Work reqister 

Return address in the leased Receive 

Scheduler 

ICB address 

Wcrk reqister 

Base reqister 

Cleared to zero 

Work reqister 

Destination QCB address 

Address of the current invitation 

list entry 

Address of the invitation list 

DCB address 

Address of the Dispatcher 

Work reqister 

Address of AVTSAVE2 

SCE address to Dispatcher POST 
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function (return address) 

Base address of the leased Receive 

Scheduler 

Entry point address 

Work reqister 
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Return address in the Dial Receive 

Scheduler 

SICE address 

ICB address 

Work reqister 

Base reqister 

Destination CCE address 

Work reqister 

Work reqister 

DCB address 

Address of the Dispatcher 

Base address of the Eial Receive 

Scheduler 

Address of AVTSAVE2 

SCB address 

Work reqister 

Work reqister 

Address of the request queue element 
Terminal index or line entry, to 
IEDQINT; address of the -QCB or LCB to 
be removed from or inserted in the 
time delay queue, to IEDQHG. 
LCB address 

Return address in line End Appendage 
Second base reqister in line End 
Appendaqe 
Work reqister 
Ease reqister 
Work reqister 
Destination CCB address; 
Address of the last buffer serviced 
Wcrk reqister 
Cleared to zero 
ICE address 

Address of the Write Poll Characters CCW 
Address of AVTSAVE2 
Return address. to IOS 
Return address to IEEAYZ; SCB address- 
to Dispatcher 

Base address of line End Appendage 
Entry point address 

Work reqister 

Terminal index or line entry 

ICE address 

Return address in the QEVENT routine 

ICB address 

Return address in IEDAYZ to IEDQKA 

Base reqister 

Address of the Destination QCB 

Address of the first buffer to 

DSFDUAV 

Work reqister 

ICE address 

Work reqister 

Entry point address to IEDQKA 

Address of AVTSAVE2 

Return address in IEDAYZ 

Ease address of the QEVEtfT routine 

Entry point address 
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Work reqister 

Terminal or line index 

Work reqister 

Return address in the Send Scheduler 

ICE address to DSPONAV 

ICE address 

WCrk reqister 

Base reqister 

Address of the Destination QCE 

Address of the first buffer to 

DSPONAV 

Work reqister 

DCS address 

Address of the Dispatcher 

Work reqister 

Address of AVTSAVE2 

Ease address of the Send Scheduler 

Entry point to the Dispatcher Dispatch 

function unless a work break was 

requested and could not be issued, to 

TGGC19PH; 'return address in SEDAYZ, 

to TEBQTN m 

Base address of the Send Scheduler 

Entry rcint address 

Work reqister 

Terminal or line index 

Beturn address in the ^iine Sharinq 

Destination Scheduler 

Beturn address in the Time Sharinq 

Destination Scheduler 

ICE address 

Work reqister 

Ease . reqister 

Address of the Destination QCB 

Address cf the first buffer 

Work reqister 

DCE address 

TCAM Dispatcher address 

Work reqister 

Address of AVTSAVE2 

Beturn address in TEDAYZ 

Entry pcint address 

Work reqister 

Terminal or line index, to TEDQTNT; 

LCB address, to the Dispatcher BYPASS 

function 

Return address in the Send Scheduler 

Address of the next STCE 

LCE address 

Work reqister 

Base reqister 

Address of the Destination QCE 

Work reqister 

SCE address 

Work reqister 

Address of the Dispatcher 

Ease address of the Send Scheduler 

Address of AVTSAVE2 

Return address in IEEAYZ. 

Entry pcint address 

Wcrk reqister 

Terminal or line index, to IEDQTNT 

ICB address 

Beturn address in Activate-I/O 

Generator 

DCE address 

Work reqister 
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Ease reqister 

Destination CCB address 

Work reqister 

Work reqister 

Work reqister 

Address of the Dispatcher 

Work reqister 

Address of ATJTSAVE2 

Return address in IEDAYZ - to IEDQTNT; 

SCE address 

Base address of Activate-I/O Generator 

Entry pcint address 

Work reqister 

On exit to an uncompleted routine, the input 

parameter list address 1 

Work reqister 

SCE address 

ICE address 

Current tuffer address 

STARTMH CCB address 

SCT address 

ECE address 

TCAM Dispatcher address 

Base reqister 

Ease reqister for the message 

handler routine 

Callinq routine save area address and tase for AVT 

Return address 

Entry pcint address into the STARTMH suttask 

link reqister 

Return code: 

X'01' - Normal receive processinq 

X'04» - Multiple-tuff er header re-entry 

X'08' - Normal send processinq 

Parameter reqister for time 

Input parameter list address 

Parameter reqister fcr date 

Work reqister 

Work reqister 

Work reqister 

Scan pointer address 

Current tuffer address 

Scan pointer offset 

Index reqister 

AVT address 

local return reqister 

Ease reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'CC - Successful completion 

Parameter list address 

flcrk reqister 

SCE address 

Current tuffer address 

Translate Tatle address 

Work reqister 

AVT address 

local return reqister 

Base reqister 

Return register 

Entry tcint address 

Return code: 

X'CO* - Successful completion 

X'04' - Insufficient reserve characters 

specified 



Diagnostic Aids 1123 



IEDOAE IBDQAS 



1 


I 


2 


W 


3 


W 


4 


I 


5 


w 


7 


w 


8 


w 


9 


I 


12 


1,0 


13 


1,0 


14 


I 


15 


w 








Parameter list address 

Work reqister 

Parameter list address 

ICE address 

Work reqister 

Work reqister 

Terminal table entry address 

AVT address 

Base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Peturn code: 

- If reqister 15 is the return register - 
Option field address - Successful completion 
X'OC - Error exit 

- If reqister 15 is not the return reqister - 
X'OO' - Successful completion 

X' 04 • - Error exit 
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Work reqister 

Input parameter list address 

Work reqister 

SCB address 

Insert data address and insert character 

1CB address 

Current unit address 

Insert address 

Current buffer address 

Data offset 

Shift limit 

AVT address 

local return reqister 

Insert data lenqth 

Base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Peturn code: 

X*00' - Successful completion 

X'04 f - For expand buffer, insufficent 

reserve characters present for the 

expansion 
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Work reqister 

Parameter list address 

Pase reqister for AVT 

Peturn address 

Ease reqister 

Return code: 

X'OO' - successful completion 

Diqit 

Input parameter list address 

Terminal Table entry address 

Return reqister 

SCE address 

1CB address 

Current buffer address 

Clear mask 

AVT address 

Count 

Base reqister 

Callinq routine save area address 

Index reoister and return address 

Sequence number 

Return code: 

X»00' - Successful completion 

X'C4' - Sequence number is low 

X'08' - Sequence number is hiqh 

X'OC - Oriqin is net specified 
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Wcrk reqister 

Parameter list address 

Blank character 

SCE address 

Current unit address 

Scan pointer address 

Current tuffer address 

Scan pointer offset 

Compare characters address 

AVT address 

lenqth parameter 

End-of-unit address 

Base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Return cede: 

X'CO' - Successful completion 

X'04« - Skip incomplete 

Neqative - Multiple-tuff er-header processing, 

scan incomplete 
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Work reqister 

Paraneter list address 

Blank character 

SCE address 

Current unit address 

Scan pointer address 

Current tuffer address 

Scan pointer offset 

Character strinq address 

AVT address 

Compare reqister 

End-cf-unit address 

Base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Return code: 

Successful completion - X'00' or, if reqister 

15 is the return reqister, the offset to the 

last bvte of the character strinq 

Unsuccessful completion - 

- Parameter return reqister specified - X*04' 

or, if reqister 15 is the return register, 
X'00' 

- flc parameter return reqister specified - a 

neqative value for multiple-buffer-header 
processinq 
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Work reqister 

Parameter list address 

SCT address 

SCE address 

LCE address 

Data offset 

Current tuffer address 

SCT address 

Shift limit 

AVT address 

Work reqister 

Size of data 

Ease reqister 

Callinq routine save area address 

Return address 

Entry point address 

Parameter register 
Current unit address 
Current unit address 
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Cffset to the. item of which the address is 

souqbt 

Address of the item sought 

Current buffer address 

AVT address 

End-cf-unit address 

Return address 

Base reqister 

Work reqister 

Parameter list address 

AVT tase reqister 

Return address 

Link reqister 

Return code: 

X'OO* - Successful completion 

X'04« - Oriqin field is invalid 

Work reqister 

Address of parameter list 

Work reqister 

Work reqister 

SCE address 

ICB address 

Character strinq address 

Data address 

Current tuffer address 

Parameter list address 

Shift limit 

AVT address 

Current sutparameter list address 

Execute reqister 

Base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'OO* - Successful completion 

X'04' - Empty buffers needed for insert 

operation not available 
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Work reqister 

Parameter list address 

Work reqister 

SCB address 

ICB address 

Unit address 

Data address 

Address cf buffer currently being processed 

Compare address 

New .unit address 

AVT address 

Conditicn code reqister 

TCAM Dispatcher address and execute reqister 

Base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'CO* - Successful completion 

X'04' - A buffer unit was not available, thus 

ah unsuccessful insert operation 

Wcrk reqister 

Address of parameter list 

Work reqister 

SCB address 

ICB address 

Scan pointer address 

Current buffer address 

•At' address 
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Subparameter list address and shift limit 

AVT address 

Prefix lenqth 

Base reqister 

Callinq routine savt area address 

Return address 

'To' offset 

Return code: 

X'CO' - Successful completion 

X'CUV - The 'to 1 character strinq is not found 

in the buffer currently beinq processed; 

thus, the remove operation was 

unsuccessful. 
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Work reqister 

Work reqister 

On exit to tpost, address of the TCAM 

Dispatcher 

AVT base reqister 

Entry point address 

Address of a list of elements to be tposted 

SCE address 

ICB address 

TCAM Dispatcher address 

Entry pcint address 

Callinq routine save area address 

Address of a list cf elements to be tposted 

SCE address 

ICE address 

Recalled header buffer 

TCAM Dispatcher address 

Entry pcint address for IEDQAS 

Callinq routine save area address 

Entry pcint address for TEDQAS01 

Work reqister 

Post list address 

Work reqister 

SCB address 

ICE address 

Errcr messaqe address 

Current buffer address 

Errcr messaqe lenqth 

Error messaqe parameter list address 

Pricrity 

Post list address 

Dispatcher address 

Ease reqister 

Ease reqister for 

AVT addressability 

Return address 

Entry pcint address 

UCE address 
AVT address 

Address of macrc-qenerated parameter list 

SCB address 

LCE address 

Address of the current buffer 

Entry pcint address and base reqister 

Save area address and base reqister for 

AVT addressability 
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ICE address 

Cutoff CCB address 

Address of the TCAM Dispatcher 

Save area address and tase register for 

AVT addressability 

Work reqister 

Macrc-qenerated parameter list address 

Work reqister 

Base address for the AVT 

Return address 

Base reqister 

Return code.: 

X'OO' - Successful completion 

X'C4' - Buffer prefix destination key is not 

available; thus, the terminal entry is 

not found. 

Key lenqth 

Parameter list address 

Work reqister 

SCP address 

1CB address 

Address of start of translation 

Current buffer address 

Translation Table address 

AVT address 

CCB address and data lenqth 

Execute reqister 

Ease reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Wcrk reqister 

Currert unit address 

Offset into buffer 

Address in buffer 

Current buffer address 

AVT address 

End-cf-unit address 

Callinq routine save area address 

Return address 

Base reqister 

Wcrk reqister 

Address of the input 

parameter list 

Work reqister 

ICB address 

Current buffer address 

UCB address 

Parameter list address 

AVT address 

Ease reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return indication: 

New function byte - successful completion 

All zeros * the destination is not a screen 

device 
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Work reqister 

Address cf additional element to be tposted 

Subparameter list address 

Work reqister 

SCB address 

Buffer address 

Tpost element address 

Parameter list address 
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Address of macrc-qenerated parameter list 

Subparameter list address 

local link reqister 

TCAM Dispatcher address 

Ease reqister 

Ease for AVT 

addressability 

Return address 

Entry point address 

Input parameter list address 

End-cf-pref ix address 

LCE address 

Scan pointer address 

Current buffer address 

Scan pointer offset 

^lank character 

AVT address 

Skip lenqth 

Ease reqister 

Callinq routine save area address 

Return address 

Entry point address 

Eeturn code: 

X'OO' - Successful completion 

X'04» - Skip ran intc the buffer prefix 

Wcrk reqister 

Input parameter list address 

Compare characters address 

SCE address 

Termname Table address 

Compare lenqth 

Search extent reqister 

Address of the last entry 

AVT- address 

Address of the current entry in the table 

Lenqth of a table entry 

Ease reqister 

Callinq routine save area address 

Return reqister: 

X'OO' - No matching entry found 

Ordinal index (key) to matching Termname Table 

entry - Successful completion 

Work reqister 

Address of the input 

parameter list 

Wcrk reqister 

SCE address 

ICE address 

Data offset 

Current buffer address 

Besidual count 

New unit address and shift limit 

AVT address 

local return address 

Ease reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'00» - Successful completion 

y«04' - No loqically empty buffer units are 

available, thus an unsuccessful 

insert operation 
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ICB address 

Euffer address of data 

Address cf buffer containing data 

Work reqister 

Address of TFANIIST 

Address of the translation table 

AVT base 

Data size index 

Execute reqister 

Routine base reqister 

Save area address 

Return address 

Return code reqister 

X'CO' Successful completion 

X'C4' Vo control strinq match found 

X'08 1 No option *ield found 

Work reqister 

Parameter list address 

Work reqister 

Work reqister 

SCE address 

ICE address 

Scan address 

Current tuf f er address 

SCT address and scan offset 

AVT address 

TCA?! Dispatcher address 

n ase reqister 

Callinq routine save area address 

Return address 

Entry point address 

Work reqister 

Parameter list address 

Subparameter list address 

Parameter list address 

SC n address 

ICB address 

Work reqister 

Current buffer address 

Subparameter list address 

AVT address' 

local return address 

Execute reqister 

Ease reqister 

Callinq routine save area address 

Return address 

Entry point address 

Return code: 

X'00' - Successful completion 

X'04' - on entry from multiple routing 

the destination name is incomplete in 

the current buffer 

X'OU' ■- on entry from the FORWARD 

macrc expansion - a valid destination 

cannot be found 

X'08' - on entry from Multiple Routing 

an ECA character strinq is detected. 

Work reqister 

Address of parameter list 

Terminal Tatle entry address 

Device dependent area address 

SCE address 

ICE address 

Elock extent 

Current buffer address 

Subblock extent 

Parameter list address 

AVT address 
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local return address 

Ease register 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'OC' - Successful completion 

X'04' - The line control intervals are 
not in the input parameter list 
or terminal entry, or the line 
control characters are not valid 
for the buffer destination. 

Work reqister 

Callinq routine save area address 

Ease for AVT addressability 

Return address 

Entry pcint address and option field address 

Return code: 

X'OO' - Successful completion 

X'EE 1 - The buffer is zero-length, the counter 
option field is not found, or the 
counter option field is not changed. 

Wcrk reqister 

Address of the input parameter list 

Extent between inserts 

Data flaq 

LCE address 

Scan reqister 

Current buffer address 

Parameter list address 

Shift limit 

AVT address 

Opticn field address 

Base reqister 

Calling routing save area address 

Return address 

Entry pcint address 

Return code: 

X'OC - Successful completion 

X'04' - The opticn field is not found; thus, 

the insertion operation is not 

successful 
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Work reqister address to be posted 

Address of the element to be tposted 

Parameter list address 

Work reqister 

SCE address 

1CB address 

Recalled buffer count 

Current buffer address 

Multiple Routinq QCE address 

Reader buffer address 

TCAM Dispatcher address 

Base reqister 

Callinq routine save area address 

Base for AVT addressability 

Return address 

Entry point reqister 

Entry code: 

X'OO' - entry from IEDQED 

Ncnzero — entry frcm IEEQUI 

ERE address 

Address of IEDQED 

SCE address 

ICE address 

AVT address 

TCAM Dispatcher address 
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Routine base reqister 

Calling routine save area address 

Return code: 

X'CC - Successful completion 

X'04* - Checkpoint not in system 
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Address of the buffer or ERB 

or LCB address 

STCP address 

ICP address 

Buffer address 

TEECEC CCB address 

Work reqister 

Work reqister 

TCBM Dispatcher address 

Callinq routine save area address 

TFDCTM return address 

Entry point address 

Termname Table address 

Work reqister = 

Element address (buffer, ERE, or LCB) 

Work reqister 

SCP address 

1CB address 

Work reqister 

Buffer address 

QCE address for TEDCED 

Parameter list for the Incominq/Outqoinq 

Hessaqe Delimiter routine 

Work reqister 

Subroutine link reqister 

TCAF! Dispatcher address 

Tncominq/Outgoinq Messaqe Delimiter routine 

base reqister 

Save area address for the callinq routine 

Subroutine link reqister 

Pase register 

Input parameter list address 

Work reqister 

SCP address 

ICP address 

Puffer Return CCB address 

Euffer address 

AVT address 

TEDQ1M address and subroutine return address 

Return code: 

X'00' - Successful completion 

X'C4' - The source was not identified 

X'CP' - The destination is not an open 
process entry, the buffer has a 
lenqth of zero, or the input buffer 
is net a header buffer 

XM2' - The station is already locked 

SCP address 

LCP address 

AVT address 

Return address (IEDCLM) 

Return code.: 

X'CC - Successful completion 

X'C4' - Terminal is not locked 



IEDOEG TFDOFG 



1 


T 


2 


w 


3 


w 


4 


w 


5 


w 


6 


w 


7 


T 



Input buffer address 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Buffer address 

OCB address for IFEQEG 
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Work reqister 

Wcrk reqister 

TCAM Dispatcher address 

Save area address for the calling routine 

Subroutine return reqister 

Terirrame Table address 

Chain of elements tc b*~ tposted 

CCB address 

SCE address 

LCE address 

Work reqister 

Input parameter list address for MSGGEN 

lenqth of WSGGEfl 

Work reqister 

TCAM Dispatcher address 

Ease reqister 

Save area address for the callinq routine 

Work reqister 

Translation Table address 

Input element address (buffer or EPE) 

Work reqister 

Ease reqister 

1CB address 

Work reqister 

Buffer address 

STAFTMH QCE address 

SCE address 

Work reqister 

Subroutine return reqister 

TCAM Dispatcher address 

Work reqister 

Save area address for the calling routine 

Subroutine return reqister 

Work reqister 

SCE address 

ICE address 

Buffer address 

Buffer Feturn QCE address 

TCAM Dispatcher address 

Callinq routine save area address 

Feturn address 

Entry pcint address 

Address of the buffer -just returned 

SCE address 

ICE address 

Buffer Eeturn QCE address 

TCAM Dispatcher address 

Callinq routine save area address 

Entry pcint address 

Input parameter list address 

Current buffer address 

Entry pcint address 

Feturn address 

Peturn code: 

X'CO' - Successful completion 

X'04« - DCE not open 

Address cf element chain to be tposted 

SCP address 

Pecalled header address 

Destination QCE address 

Input parameter list address 

TCAM Dispatcher base address 

Entry pcint address 
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Address of the buffer, LCB or ERE 

DCR address 

SCE address 

Address of the buffer to write 

ICE address 

Number of units tc write for this buffer 

Current buffer address 

OCP address 

Number of writes that can be issued 

OCB address 

TCAK dispatcher address 

Entry pcint address 

Callinq routine save area address 

Entry code 

AVT address 

Operator Control AVT address 

Oreratcr Ccntrcl AVT address 

T *orV reqister 

Routine base reqister 

Save area address 

Operator Control save area address 

Entry pcint address 

Entry code 

Operator Control AVT address 

Peturn address 

Entry pcint address 

Operator Control AVT address 

Address of appropriate response messaqe 

Operator Control AVT address 

Tncut buffer address or CTB address 

AVT address 

Cpticn address 

Termname Table address 

Terminal entry address 

Routine base reqister 

Callinq. routine save area address 

Return address 

Entry pcint address 

Return code: 

X'00' - Successful completion 

X'Ci' - Unsuccessful completion 
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Operator Contrcl AVT address 

Address of appropriate response message 

Operator Ccntrcl AVT address 

AVT address 

Termname Table address 

Terminal entry address 

CCE address 

tCB address 

CEB address 

UCE address 

Routine base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Peturn code: 

X'OO' - Successful completion 

X'OU* - Unsuccessful completion 
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Operator Ccntrcl AVT address 

Address of appropriate response message 

Operator Contrcl AVT address 

AVT address 

Termname Table address 

Terminal entry address 

OCE address 

Routine base reqister 
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Callinq routine save area address 

Peturn address 

Entry point address 

Peturn code: 

X'CC* - Successful completion 

X'04 1 - Unsuccessful completion 

Operator Control AVT address 

Address of appropriate response message 

Operator Control AVI address 

Input fcuffer address or CIE address 

AVT address 

EEE address 

DCE address 

T.CB address 

DCE address 

Poutine base reqister 

Callinq routine save area address 

Peturn address 

Entry point address 

Return code: 

X*00' - Successful completion 

X'C4' - Unsuccessful completion 
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Operator Control AVT address 

Address of appropriate response messaqe 

Operator Control AVT address 

AVT address 

Termname Tatle address 

Terminal entry address 

OCE address 

CCE address 

Poutine tase reqister 

Callinq routine save area address 

Peturn address 

Entry pcint address 

Return code: 

X'OC - Successful completion 

X'04' - Unsuccessful completion 
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Operator Ccntrcl AVT address 

Address of appropriate response messaqe 

Operator Control AVT address 

AVT address 

Termname Table address 

Terminal entry address 

Poutine base reqister 

Callina routine save area address 

Peturn address 

Entry pcint address 

Peturn code: 

X'OC 1 - Successful completion 

X'C4» - Unsuccessful completion 



TETOCL 



TEDCCI 



1 


I 







2 


w 


4 


w 


5 


w 


7 


w 


8 


w 


9 


w 


12 


w 


13 


I 


14 


I 


15 


T 








Operator Control AVT address 

Address of appropriate response messaqe 

Operator Ccntrcl fiVT address 

AVT address 

DEE address 

DCE address 

UCB address 

Invitation List address 

Poutine base reqister 

Callinq routine save area address 

Feturn address 

Entry pcint address 

Peturn code: 

X'00' - Successful completion 

X'04« - Unsuccessful completion 
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Operator Control AVT address 

Address of the appropriate response message 

Operator Control AVT address 

AVT address 

.Termrame Table address 

Terminal entry address 

Poutine base reqister 

Calling routine save area address 

Feturn address 

Entry pcint address 

Peturn code: 

X'OC - Successful completion 

X'04' - Unsuccessful completion 
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Operator Control AVT address 

Address of appropriate response message 

Operator Control AVT address 

AVT address 

Termrame Table address 

Terminal entry address 

Routine base reqister 

Callinq routine save area address 

Feturn address 

Entry pcint address 

Feturn code: 

X' CO' - Successful completion 

X'04' - Unsuccessful completion 
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Operator Ccntrcl AVT address 

Address of appropriate response message 

Operator Control AVT address 

AVT address 

Termname Table address 

Terminal entry address 

CCE address 

ICB address 

BCE address 

Poutine base register 

Callinq routine save area address 

Return address 

Entry pcint address 

Peturn code: 

X'OO* - Successful completion 

X'Cft' - Unsuccessful completion 
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Operator Control AVT address 

Address of appropriate response message 

Operator Control RVT address 

AVT address 

DEE address 

DCB address 

ICP address 

UCB address 

Poutine base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Peturn cede: 

X'OO' - Successful completion 

X f 0ft' - Unsuccessful completion 
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Operator Control AVT address 

Address of appropriate response message 

Operator Control AVT address 

AVT address 

Termrame entry address 

Terminal entrv address 

OCE address 
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E-CF actress 

Poutine base reqister 

Callinq routine save area address 

Peturn address 

Entry point address 

Peturn code: 

X'CC - Successful completion 

X'C4' - Unsuccessful completion 

Operator Control AVT address 

Address of appropriate response messaqe 

Operator Ccntrcl AVT address 

AVT address 

DIP. address 

TCP address 

1CB address 

UC P address 

Poutine base reqister 

Callinq routine save area address 

Peturn address 

Entry point address 

Peturn cede: 

X'CO' - Successful completion 

X'CU' - Unsuccessful completion 

Operator Ccntrcl AVT address 

Address of appropriate response messaqe 

Operator Ccntrcl AVT address 

AVT address 

DFB address 

DCP address 

ICP address 

UCP address 

Poutine base reqister 

Callinq routine save area address 

Peturn address 

Entry pcint address 

Peturn code: 

X'CO' - Successful completion 

X < 0U • — Unsuccessful completion 

X'14* - Closedown is in proqress 

Cperatcr Ccntrcl AVT address 

Address of appropriate response messaqe 

Operator Ccntrcl AVT address 

AVT address 

UCE address 

CEP address 

ECB address 

Poutine base reqister 

Callinq routine save area address 

Peturn address 

Entry pcint address 

Peturn code: 

X'OO' - Successful completion 

X'OU' - Unsuccessful completion 

Operator Ccntrcl AVT address 

Address cf appropriate response messaqe 

Operator Ccntrcl AVT address 

AVT address 

Termrame Table address or DEB address 

Terminal entry address or LCE address 

DCE address 

UCE address 

Routine base reqister 

Callinq routine save area address 

Peturn address 

Entry pcint address 

Peturn code: 

X'OO' - Successful completion 

X'OU* - Unsuccessful completion 
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Operator Ccntrcl AVT address 

Address of appropriate response message 

Operator Control AVT address 

AVT address 

Termrame Table address 

Terminal entry address 

CCB address 

ECB address 

ICB address 

Routine base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Return code: 

X'00 f - Successful completion 

X'04« - Unsuccessful completion 
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Peturn address 

Entry point address 

Return code: 

X'00' - Processinq complete 

X*04' - Invalid command 

X'03' - Canceled comirand 

X« 16' - load TEDOCV 
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Operator Control AVT address 

Address of appropriate response messaqe 

Operator Control AVI address 

AVT address 

TCE address 

DCB address 

Routine base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Peturn code: 

X*00' - Successful completion 

X'C4' - Unsuccessful completion 
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Operator Control AVT address 

Address of an error messaqe if TOTE is not. 

active 

Peturn address 

Entry point address 

Peturn code: 

X'C4« - TOTE is not active 

X'08* - Command was canceled 

X'14» - Command is queued for TOTE 
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Operator. Ccntrcl AVT address 

Address of appropriate response messaqe 

Operator Ccntrcl AVT address 

AVT address 

DEB address 

DCB address 

OCB address 

ICB address 

Routine base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Return cede: 

X'CO' - Successful completion 

X»04* - Unsuccessful completion 
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On exit to service aid routine - indicates 

lead or delete function 

Operator Control AVT address 

Operator Ccntrcl AVT base reqister 

Work reqister 

AVT base reqister 
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Work reqister 

local return reqister 

Work reqister 

Index reqister 

Routine base reqister 

Callinq routine save area address 

Return reqister 

Entry pcint adclress 

On return from the service aid routine, 

return code: 

X'C0» - Good return 

X'04' -. Verify error 

X'08« or hiqher - not defined 

Neqative - complement cf the address of the 

response message 
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Address of an EBB that points to an empty buffer 

or the address cf a special element tposted to 

the. Put Scheduler STCB 

Address of an EBB to be tposted to the Buffer 

Bequest routine or a full buffer to be tposted to 

an ME 

TCAM Dispatcher address 

1C AM Dispatcher save area address 

Entrv point address 
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User work area address (contains 

terminal name) 

Wcrk reqister 

Output sequence number (complement 

of input sequence number), or relative 

record address for subsequent retrieval 

Work reqister 

User's work area address 

Buffer address 

Process Control Elock 

address 

Access method wcrk area address 

Data Extent Elcck address 

Task Ccntrol Blcck address 

Terminal Table entry address 

Termname Table address 

Address Vectcr Table address 

Base reqister 

Callinq routine save area address 

■Return address 

Entry pcint address 

Beturn code reqister: 

X'00' - Successful completion 

X'04' - Invalid sequence number or address 
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IED0ET 
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13 
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CIE address 

Callinq routine save area address 

Beturn address 

Entry pcint address 

Beturn code set by the Operator Control task, 

except when equal to X'01'. If equal to X'01', 

it is set by this routine to indicate that there 

is nc active MCP in the system. 
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Address cf special element 

Word 3 points to the process entry 

Word 4 points to the Executor ECE 

TCAM Dispatcher address 

Beqister save area address 

Entry point address 
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address of the input element: 

- EBB containing a pointer to a full buffer or 

a return code indicating a logical read 
error. 

- A special "empty fcuffer" element, or 

- A special retrieve element. 

Address of an ERE or a chain of empty buffers 

TCAM Dispatcher address 

TCAM Dispatcher save area address 

Entry point address 

Address of a full fcuffer or of a retrieve 

element. 

If the input was a retrieved element * the 

address of a Bead-ahead QCB; if the input was 

a fcuffer - zero* 

Calling routine save area address 

Beturn address 

Entry point address 

Return code: 

X'04' - Input was a retrieve element 

X'00« - Input was a fcuffer 

Termrame Tafcle entry address 

Application program work area address 

Calling routine save area adidress 

Return address 

Entry point address 

Return cede: 

X'CO' - Successful completion 

X»08' - TCAM is net in the system 

X'OC - No open ECE in the application program 

X*20' - Invalid terminal name 
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Termname Table entry address 

Application program work area address 

Calling routine save area address 

Return address 

Entry point address 

Return code: 

X'00» - Successful completion 

X'04' - Invalid terminal name 

X'08» - TCAM is net in the system 

X^C - No open ECE in the application program 

X^O' - Invalid terminal type 

Address of a three-word input parameter list: 

- Word 1 - address of terminal name 

- Word 2 - address cf application program work 

area 

- Word 3 - address of unscrambled password, if 

specified 
Calling routine save area address 
Return address 
Entry point address 
Return code: 

X'OO* - Successful completion 
X*C4' - Invalid or missing password 
X«08' - TCAM is not in the system 
X'OC - No open ECE in the application program 
X'2C - Invalid terminal name 
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Abdication prcgrair work area address 

Eyte 0: relative line number 

Eytes 1-3: Address of ddnaroe 

Calling routine save area address 

p eturn address 

Entry pcint address 

Return cede: 

X'OC* - Successful completion 



1140 



IEDQE6 



TEDQI6 









1 


I 







13 


I 


14 


I 


15 


I 



TEDQE7 TEPQE7 





2 


W 




3 


W 




4 


w 




5 


V 




6 


w 




7 


w 




8 


w 




q 


w 




10 


V 




11 


w 




12 


T 




13 


w 




11* 


T 




15 


T 


IEDOEA TEDQ^A 





I 


TEDQEQ 


3 


I 

T 




3 


I 




4 


I 




5 


W 




c 


T 




7 


W 




8 


W 




9 


w 




10 


w 




11 


I 




12 


T 




13 


T 




14 


w 




15 


w 


TED0*A1 IEDQE»1 





T 


T W DCEC 


1 


I 




2 


T 




3 


I 




4' 


I 




5 


W 




f 


T 




7 


V) 




8 


w 




9 


w 




10 


w 




11 


I 




12 


T 




13 


T 




14 


W 




15 


w 



X'04« - Invalid relative line number 

rOC - TCAW is not in the system 

X'2C - Invalid DDNAME for line qroup DCE 

Eirst half of scrambled password 

Address of character strinq to be scrambled 

Seccnd half cf scrambled password 

Callina routine save area address 

Peturn address 

Entry pcint address 

Address cf a retrieve element, an EFE, 

or a Buffer Feturn element 

Special element 

Wcrk reqister 

Terminal entry address 

Puffer prefix address 

Destination QCE address 

Oueue Control Elcck address 

Dummy line Ccntrol Block address 

Dummv Station Ccntrol Block address 

Process Control Elcck address 

TCAM Dispatcher address 

Ease reqister 

T CftW Address Vector Table address 

Peturn address 

Entry pcint address 

Address of the last element tposted 

address of the element tposted 

C°B unit address; address of QCB to tpost to: 

buffer unit address 

SCE address 

ICB address 

Work reqister 

Current buffer address 

Destination QCE address 

Address of last unit of the buffer; number of 

units in the buffer 

Address cf priority Eestination QCB 

DCB address; value of "address" for the disfc 

record 

TCAM Dispatcher address 

Pase reqister 

Callinq routine save area address 

Work reqister 

C C B address 

Address cf the last element tposted 

Address of the element tposted 

CPB unit address; address of QCB to tpost to: 

buffer unit address 

SCB address 

ICB address 

Work reqister 

Current buffer address 

Destination QCB address 

Address of last unit of the buffers; number of 

units in the buffer 

Address of priority Destination QCB 

DCP address; value of "address" for the disk 

record 

TCAt* Dispatcher address 

Base reqister 

Callina routine save area address 

Work reqister 

CPB address 
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Address of the last element tposted 

Address of the element tposted 

CPB unit > address; address of QCE to tpost to: 

buffer unit address 

SCE address 

ICB address 

Work reqister 

Current tuffer address 

Destination QCE address 

Address of last unit of the buffer; number of 

units in the buffer 

Address cf priority Cestination QCB 

DCB address; value cf "address" for the disk 

record 

TCflM Dispatcher address 

Ease reqister 

Callinq routine save area address 

Work reqister 

CPE address 

Work reqister 

ERB address 

DCB unit count 

Work reqister 

ICE address 

Count of available buffers 

Buffer address 

QCE address 

Count reserved for disk 

Work reqister 

DCB address 

ERE tuffer request ccunt 

Base reqister 

Callinq routine save area address 

Return address 

Entry point address 

Work reqister 

Buffer address 

Address of the last unit of the last tuffer 

Address of the last unit of the current buffer 

ICE address 

Buffer address 

QCE address 

Count reserved for disk 

Work reqister 

DCB address 

Dispatcher base reqister 

Ease reqister 

Callinq routine save area address 

Return address 

Entry point address 

Wcrk reqister 

AVTPARM address; AVTPARM contains the tuffer 

address, AVTPARM+4 contains the AVT address 

Work reqister 

ICB address 

Address of the Read/Write idle loop used 

Buffer address 

QCE address 

Count reserved for disk 

Work reqister 

DCB address 

Address of the unused Read/Write idle loop 

Base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 
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work reqister 

Next unit address 

DCB address 

SCR address 

ICE address 

Buffer length 

Buffer address 

Number of bytes remaininq in the unit 

Work reqister 

Count of bytes remaining in the ETB size 

Work reqister 

Work reqister 

Work reqister 

Callinq routine save area address 

Beturn address 

Entry point address 

Divide and multiply reqister - even 

Input element address 

Divide and multiply reqister - odd; 

Work reqister 

Address of the element on the time delay queue 

Address of the element on the time 

delay queue 

Address of the time delay 

element beinq processed 

Time of day 

Time interval-even 

Tine interval-odd 

Save area address 

AVT address 

Exit switch: 

X' CO* - Beturn by EE 14 

X'04« - Exit to DSFEISF 

X* 08' - Exit to DSFFCST 

TCAM Dispatcher address 

Eoutine base reqister 

Callinq routine save area address 

Beturn address 

Entry rcint address 

Divide and multiply reqister 

Time delay request element address 

Work reqister 

Address of the element en the time delay 

queue 

Address of the time delay element in 

the kVI 

Time of day 

Time interval; even multiply and divide reqister 

Time interval; odd multiply and divide reqister 

Save area address 

Exit switch: has the address of 

"EETOFN" - Beturn by EF 14 

"DSPEISP" - Exit to DSFDTSP in the TCAM Dispatcher 

"FOSTEXIT" - Exit to DSPPOST in the TCAM Dispatcher 

TCAM Dispatcher address 

■Routine base reqister 

Callinq routine save area address 

Beturn address 

Entry pcint address 

Divide and multiply reqister - even 

Input element address 

Divide and multiply reqister - odd 

Address of the element on the time delay gueue 

Address of the element on the 

time delay queue 

Address of the time delay element beinq processed 

Time of day 

Time interval: even divide and multiply register 
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Time interval; odd divide and multiply reqister 

Save area address 

Exit switch: has the address of 

"RETORN" - Return ty BF 14 

"DSFDISP" - Exit tc DSPDISP in the TCAM Dispatcher 

"FOSTEXIT" - Exit to DSPPOST in the TCAM. Dispatcher 

TCAM Dispatcher address 

Routine base reqister 

Calling routine save area address 

Return address 

Entry point address 

Divide and multiply reqister - even 

Input element address 

Divide and multiply reqister-odd 

Address of the element of the time delay queue 

Address of the element on the time delay queue 

Address of the time delay element to be processed 

Time of day 

Address of special element requesting removal 

of an element from the time delay queue 

Callinq routine save area address 

Exit switch: has the address of 

"EETUFN - Return by BR 

"DSPDISP" - Exit to DSFDISP in the TCAM Dispatcher 

"FCSTEXIT" - Exit to DSPPOST in the TCAM Dispatcher 

TCAM Dispatcher address 

Routine base reqister 

Wcrk reqister 

Entry pcint address 

Wcrk reqister 

Input element - the system delay request 

element, an LCB, or the system Delay QCE 

TCE address 

ICB address 

DEB address 

Subroutine return address 

System Delay QCE address 

Branch switch 

DCB address 

TCAM Dispatcher address 

Routine base reqister 

AVT base reqister 

Return address 

Work reqister 

Stcpline request address or LCB address 

Address of the ICB to be tposted to the 

Operator Control queue 

ICB address 

DFB address 

Rcutine base reqister 

DCB address 

TCAM Dispatcher address 

TCE address 

Save area address for the AVT 

Entry point address 

Wcrk reqister 

Current buffer address 

Parameter to the Termn-ame Table 

Address of the AVT "address" value beinq used 

Address of the QCB tc tpost to 

Address of the STCE just activated 

SCB address 

ICB address 

Address of the buffer formed from the main 

storaqe units 

Current buffer address 

Master. CCB address 
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Priority QCE address 

Work reqister 

Work reqister 

Work reqister 

Ease reqister 

AVT address 

Return address 

Sumter of main storaqe units to qet 

Return address 

Work reqister 

Work reqister 

Current tuffer address 

Parameter to the Termname Table 

Address of the AVT "address" value teinq used 

Address cf the QCE tc tpost to 

Address of the STCE iust activated 

SCE address 

ICE address 

Address of the tuffer formed from the main 

storaqe units 

Current tuffer address 

Master QCB address 

Priority QCE address 

Work reqister 

Work reqister 

Work reqister 

Base reqister 

AVT address 

Return address 

Number of main storaqe units to qet 

Return address 

Work reqister 

Work reqister 

Current tuffer address 

Parameter to the Termname Table 

Address of the AVT "address" value leinq used 

Address of the QCB tc tpost to 

Address of the STCE just activated 

SCE address 

ICE address 

Address of the tuffer formed from the main 

storaqe units 

Current tuffer address 

Master QCB address 

Priority QCB address 

Work reqister 

Work reqister 

Work reqister 

Ease reqister 

AVT address 

Return address 

Number of main storaqe units to qet 

Return address 

Work reqister 

Parameter reqister 

ICE address. 

Address of the current TP field in the ICB 

DCE address 

Work reqister 

Work reqister 

Work reqister 

Terminal entry address 

Work reqister 

CCW address 

Dispatcher base - points to model CCWs 

Ease reqister 

AVT address 

Internal linkaqe reqister 

Work reqister 
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Faraiteter reqister 

ICE address 

address of the current TP field in the ICB 

DCE address 

Work reqister 

Wcrk reqister 

Work reqister 

Terminal entry address 

Work reqister 

CCW address 

Dispatcher base - points to model CCWs 

Base reqister 

aVT address 

Internal linkaoe reqister 

Work reqister 

Parameter reqister 

LCE address 

Address of the current TP field in the ICB 

tCE address 

Wcrk reqister 

Work reqister 

Work reqister 

Terminal entry address 

Wcrk reqister 

CCW address 

Dispatcher base - points to model CCWs 

Base reqister 

AVT address 

internal linkaqe reqister 

Work reqister 

Parameter reqister 

ICB address 

Address of the current TP field in the LCE 

DCB address 

Work reqister 

Work reqister 

Work reqister 

Terminal entry address 

Work reqister 

CCW address 

Dispatcher base - points to model CCWs 

Ease reqister 

AVT address 

Internal linkaqe reqister 

Work register 

Parameter reqister 

LCE address 

Address of the current TP field in the LCB 

DCE address 

Work reqister 

Work reqister 

Wcrk reqister 

Terminal entry address 

Work reqister 

CCW address 

Dispatcher base - points to model CCWs 

Base reqister 

AVT address 

Internal linkaqe reqister 

Wcrk reqister 

Callinq routine save area address 
Return address 



TCB address of the terminating task 
Calling routine save area address 
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AV1SAVE2 address, if from IEBQNA; 

neqative TCB address, if f rem IEDQNA3 

If there is disk activity, the address of the 

Closedown Completion QCE 
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Save area address 
Return address' 
Entry point address 

Termrame offset of the terminal specified in 
the TCBNG macro 
Save area address 
Return address 
Entry point address 

Address of OPEN or CLOSE macro DCB 

Checkpoint wcrk area address 

DEB chain address 

PCE address 

AVT address 

Current TCB address 

Access method work area address 

Base reqister 

Save area address 

Return address 

TFDQKE05 address 

Peturn code 
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Work reqister 

Work reqister 

Address of the checkpoint work area 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Address of the checkpoint record 

Routine base reqister 

AVT address 

Return address 

Entry point address 



Checkpoint wcrk area address 

AVT address 

Base reqister 

Address of IIDQNF tranch table 

Entry point address of the loaded module 

Checkpoint work area address 

Address of the request element this module 

is tc process 

Disk record address 

AVT address 

IFDCNF rase reqister 

Return address 

Entry point address 

Offset to the next module to qain control: 

X'40* - Checkpoint Queue Manaqer 

X'58' - No Available Cere routine 

X'€C* - No Incident Records routine 
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Checkpoint wcrk area address 

Address of the request element this module 

is tc process 
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Disk record address 

AVT address 

IEDQNF base reqister 

Return address 

Entry pcint address 

Offset to the next module to gain control: 

X'40 f •- Checkpoint Queue Manaqer 

X'58' - No Available Cere routine 

X'6C' - No Incident Records routine 

Checkpoint work area address 

Address of the request element this module 

is tc process 

Disk record address 

AVT address 

IEDQNF base reqister 

Return addreto 

Entry pcint address 

Offset to the next module to gain control: 

X'40 f - Checkpoint Queue Manager 

X'58' - No Available Core routine 

X'6C - No Incident Records routine 

Checkpoint work area address 

Address of the request element this module 

is to process 

Disk record address 

AVT address 

IEDQNF base reqister 

Return address 

Entry pcint address 

Offset to the mext module to qain control: 

X'40' - Checkpoint Queue Manaqer 

X'48 1 .- Checkpoint Eisk I/O routine 

X'58» - No Available Core routine 

Checkpoint wcrk area address 

Address of the request element this module 

Disk record address 

AVT address 

IEDQNF base reqister 

Return address 

Entry pcint address 

Offset to the next module to qain control: 

X'40' - Checkpoint Queue Manaqer 

X'58' •- No Available Cere routine 
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Checkpoint wcrk area address 

Address of the last request element for which a 

disk record was built 

Address of the last disk record built 

AVT address 

IEDQNF base reqister 

Return address 

Fntry point address 

Checkpoint work area address 

AVT address 

IEDQNF base reqister 

Return address 

Entry pcint address 

Return code: 

X'30* '- CKREC is incomplete 

X'38' - Environment Checkpoint is incomplete 
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Checkpoint work area address 

AVT address 

IEDQKF base reqister 

Return address 

Entry point address 
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Return 
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Return 
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Entry 







Return 

X'CO' 
X«04» 



Checkpoint wcrk area address 

Address of the request element this module is 

to process 

AVT address 

IEDQBF base reqister 

Return address 

Entry point address 

If there are no outstandinq GETMAIN records, 

the offset to the notification and Disposition 

routine (X'SOM 

Checkpoint wcrk area address 

AVT address 

IEDQNE base reqister 

Return address 

Entry pcint address 

Address of chain cf elements to be tposted 

to the ready queue 

Address of chain of elements to be tposted 

to the TCAM Dispatcher 

Address of QCB for IEDQBD02 routine 

SCE address 

ICB address 

ICB address 

Priority tc be put in the LCE for the 

tpost to IEBQBB02 

TCAM Dispatcher address 

IEEQNX address 

AVTSAVE2 address 

AVT address 

AVTsaVE3 address 

Error code 

AVT address 

Base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'00 f - successful completion 

X'04 1 - TCAM already in the system 

X'08 1 - Insufficient main storaqe to satisfy GETMAIN 

request for permanent storage 
X*0C» - Insufficient main storaqe to satisfy 

GETMAIN request for temporary storage 
X'10' - Terminal definition error 
X'14 f - Primary operator control terminal 

improperly defined 



parameter; AVT address 

dress 

se area address; start of keyword address 

address for subroutines 
s of the AVT field to be modified 
s of the first character beyond the operand 

copy of the decimal character keyword 

of bytes in the keyword 
eqister 

to the list cf keywords 
entor of the index throuqh the keyword 
(Value - 2) 

nq point in the keyword table search lcop 
eqister 
se reqister 

address to IEEQCA 

address from an internal subroutine 
pcint address 

code: 

- Successful completion 

- TCAM is already in the system (CVT 
word not = zero) 
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AVT address 

Callinq routine save area address 
Return code: 

X'CO* - Successful completion 
X'08* -; Insufficient main storage to satisfy 
the GETMAIN request 

Work register 

AVT address 

Address of current Termname Tatle entry 

Length in bytes of a full Termname Table 

entry 

Ienqth of a Termname Table entry minus one 

length cf a Termname Table entry minus three 

Address of the last entry in the Termname 

Table 

Even numbered register for divide operations; 

address of the next offset entry 

Total number of entries in the Termname 

Table 

Address of the first entry in the Termname 

Tatle 

AVT base reqister 

Address of the end of the offset entries 

Work reqister 

Routine base reqister- 

Callinq routine save area address 

Address of the beqinninq of the Termname 

Table 

Address of the current offset entry 

Address of the next Termname Table entry 

Return cede: 

X'CO' - Successful completion 

X'12' - Insufficient main storaqe to satisfy the 

GETKAIN request 
X'16 1 - Terminal definition error 
X'2C - Frimary operator control terminal 

definition error 
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Parameter reqister 
ECE address 
AVT address 
AVT hase address 
Routine base reqister 
Save area address 
Return address 
Work reqister 

Work reqister 

Ordinal index to a Termname Table entry 

Termrame Table address cf an entry 

Return address 

Entry pcint address 

Work reqister 

Address of the input parameter list for the 

routine to be executed; the first two bytes 

of this list contain the index to the address 

of the appropriate routine in the MH VCCN table, 

SCB address 

ICE address 

Current buffer address 

AVT address 

Ease reqister 

Callinq routine save area address 

Index byte 

Parameter list address for GETMAIN or FFEEMAIN 
Parameter list address for OPEN, CLOSE, WRITE, 
CHECK, EEOV, WTO 
Address of the messaqe for WRITE and WTC 
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Peturn code 

Return address from internal subroutines 

WRI^E return code 

Volume counter 

Record counter 

JPCP address 

Hessaqe text address 

Lenqtb of the message, block size 

Work area buffer address 

SYSPPINT or dat DCBs address 

Poutine base register; save area address 

Peturn a'ddress 

Scratch register 

Entry point address 

Scratch reqister 

Return code: 

X'OC - Successful completion 

X'04' - I/O error on SYSPRINT 

X'08« - KEYLEN omitted or invalid 

X'OC - I/O error on IEDQDATA 

XMC - Illeqal SPACE parameters 

X' 14' - Unable to open 
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Entry Cede 

Operator control AVT address; work register 

Operator control AVI address 

AVT address 

Operator control save area address 

Entry code 

Poutine base reqister 

Save area address 

Entry code 

Operator control AVT address 

Operator ccntrcl AVT address 

CIP address 

Peturn address 

Compare register 

Routine base reqister 

Peturn address 

Entr? Code 

Operator control AVI address 

Peturn address 

Poutine base reqister 

Peturn reqister 

Peturn code 

X'CO' flc errors detected 

X'02' Errors detected 
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Entry code; work reqister 

Operator ccntrcl AVT address 

Operator control AVT address 

CIP address 

Scan pointer 

Work register 

Work register 

Puffer address 

Routine base register 

Peturn address 

length scanned 

Operator control AVT address 

AVT address 

Buffer address 

Entry code 

Poutine base register 

Peturn address 
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Module address 

Module index 

Operator control AVT address 

Index reqister 

lenqth of the entry 

Buffer address 

Pointer to the vert tatle 

Entry code 

Save area address 

Return address; EAL return 

Return code 

Exit address 

Parameter address 

Parameter address 

Operator control AVT address 

CIE address 

Index reqister 

lenqth of the entry 

Buffer address 

Pointer to the verb tatle 

Entry code 

Routine base reqister 

Return address 

Operator control A,VT address 

CIE address 

AVT address 

Index recister 

lenqth of the entry 

Buffer address 

Pointer to the verb table 

Entry code 

Routine base reqister 

Save area address 

Return address; EAI return 

Operator control AVT address 

AVT address 

EAI (link) address 

TCE address 

Branch and link return address 

Entry code 

Routine base reqister 

Entry code 

Operator control AVT address 

Operator control AVT address 

BAI (link) address 

Option Table address 

Entry code 

Routine base reqister 

Return address 

lenqth of the field 

Address of the messaqe 

Operator ccntrcl AVT address 

AVT address 

Work reqister 

Entry code 

Routine base reqister 

Parameter for DEIETE, WTO, AQCTL 

Operator control AVT address 

CIE address 

AVT address 

Work reqister 

Work reqister 

Entry code 

Routine base reqister 

Save area address 
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IGC1303D TGC1303C 2 
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IGE0004G IGE00C4G 1 
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Address of the message 

Operator control AVT address 

AVT address 

Work address 

Entry code 

Routine base reqister 

Entry code 

Operator control AVT address 

Operator control AVT address 

Scan pointer 

AVT address 

Return address 

Scan offset 

Work reqister 

Buffer address 

Prefix address 

Work reqister 

Entry code 

Routine base reqister 

Return address 

EAI address 

Operator control AVT address 

AVT address 

Entry cede 

Routine base reqister 

Work reqister 

Termname entry lenqth; SCB address 

Operator ccntrol AVT address 

Scan pointer 

AVT address 

Terirrame table address 

1CB address 

Pointer to prefix 

Work reqister 

Entry code 

Routine base reqister 

Work reqister 

Work reqister, parameter 

Buffer address 

1CB address; prefix address 

AVT address 

ERF address 

Keylenqth 

Number of units in the buffer 

Prefix address 

Address of the message; length of the message 

Work reqister 

Entry code 

Routine base, reqister 

Entry point address 

Input parameter list address 

IEAC£T01 address; Completion code 

Complement of the ECE address 

TJIE for the ECB to be tposted in the lew-crder 

sixteen bits 

Return address 

Return code: 

X'OO* - Successful completion 

X'04' - No active TCAM MCP in the system 

Extended save area address 
Return address 

12 Star address 
OCE address 
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ICB address 

ccw address 

AVT tase reqister. 

SCB address 

linkaqe for next mcdule load 

XCTI reqister 

Ease reqister 

12 star address 

UCB address 

ICE address 

SCB address 

CCW address 

DCB address 

AVT case reqister 

linkaqe for next module load 

XCTI reqister 

Base reqister 

12 Star address 

UCB address 

ICE address 

linkaqe- for next mcdule load 

Base reqister 

12 star address 

UCB address 

ICB address 

SCB address 

CCW address 

AVT tase reqister 

linkaqe for next mcdule load 

XCTI reqister 

Base reqister 

12 Star address 

SCB address 

UCE address 

ICB address 

ECB address 

CCW address 

AVI tase reqister 

linkaqe for next mcdule load 

XCTI reqister 

Ease reqister 

12 Star address 

ICB tase reqister 

OCE address 

DCB address 

CCW tase reqister 

AVT tase register 

linkaqe for next mcdule load 

XCTI reqister 

Base reqister 

12 Star address 

UCE address 

ICE address 

SCB address 

CCW address 

AVT tase reqister 

linkaqe for next mcdule load 

XCTI reqister 

Ease reqister 

12 Star address 

linkaqe for next mcdule load 

XCTI reqister 

Base reqister 
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12 Star address 

ICE address 

AVT address 

linkaqe for next rocdule load 

Base reqister 

12 Star address 

CCW tase reqister 

UCE address 

ICE address 

DCE address 

AVT tase reqister 

SCE address 

linkaqe for next rocdule load 

XCTI reqister 

Ease reqister 

12 Star address 

ICE tase reqister 

SCE tase reqister 

ECE tase reqister 

CCfl tase reqister 

AVT tase reqister 

linkaqe for next mcdule lead 

XCTI reqister 

Ease reqister 

12 Star address 

ICE tase reqister 

DCE tase reqister 

CCW tase reqister 

SCE address 

AVT tase reqister 

linkaqe for next rocdule load 

XCTI reqister 

Ease reqister 

12 Star address 

ICE tase reqister 

SCB tase reqister 

DCE tase reqister 

CCVj tase reqister 

AVT tase reqister 

linkaqe for next rocdule load 

XCTI reqister 

Ease reqister 

12 Star address 
1CB tase reqister 
UCE tase reqister 
DCE tase reqister 
CCW tase reqister 
AVT tase reqister 
XCTI reqister 
Ease reqister 

EQE address 

ICE tase reqister 

UCE address 

CC^ tase reqister 

linkaae for next mcdule load 

XCTI reqister 

Ease reqister 

TO Supervisor reqister 

ICE address 

DEE address 

ECE address 

Address of the Current I/O Interrupt Trace 

Tatle entry 



Diagnostic Aids 1155 



6 


W 


7 


W 


8 


V) 


9 


w 


10 


w 


11 


I 


12 


I 


13 


I 


14 


I 


15 


I 


IGG019Q1 TGRCl^Ol 1 


I 


a 





10 





IGG019Q2 TGGC1SQ2 2 


T 


4 


I 


6 


c 


12 





13 





14 





TGG019Q3 IGGG19Q3 2 


I 


4 


I 


6 





12 





13 





14 





TGG019Q4 IGG01904 2 


I 


4 


I 


6 





12 


c 


13 





14 





TGG019Q5 IGGC19QE 2 


I 


4 


I 


6 





12 





13 





14 





TGG019Q6 TGGC19Q6 1 


T 


4 





7 





IGG019Q7 TGGC19Q7 1 


I 


4 





7 





TGG019Q8 IGGC1SQ8 2 


I 


TGG019Q8+4 12 


I 


TGG019C8+8 14 


I 


IGG019C8+12 




TGGC1908+16 




IGG019RA TGGC19FA 1 


I 


2 


I 


3 


I 


4 


I 


7 


I 


14 


I 


15 


T 


TGG019RB DSPPYPAS 1 


T 







3 


I 







7 


I 



l/c Trace control words address 

Current line's tJCE address 

work register 

Work reqister 

Work reqister 

Return address in IGG019R0 

IGGC19Q0 base reqister 

AVT address 

SCE address 

IGGC19TP0 base reqister 

Attention element or LCE address 

LCB address 
DCE address 

ICE address 
DCB address 
Prefix address 
Interrupted CCW address 
RVT address 
SCE address 

ICE address 
DCB address 
Prefix address 
Interrupted CCW address 
AVT address 
SCE address 

ICE address 
DCB address 
Prefix address 
Interrupted CCW address 
AVT address 
SCB address 

LCB address 
DCE address 
Prefix address 
Interrupted CCW address 
AVT address 
SCE address 

Buffer, ICB r or CCE address 
ICB address 
QCE address 

Buffer, ICE, or QCE address 
ICE address 
QCE address 

Checkpoint work area address 
Base reqister 
Return address 



Address of the request element that this module 

is tc process 

I0E address 

DEE address 

DCB address 

UCE address 

Return address 

Entry pcint address 

Address of the element to pass 
Address of the last dispatched RCB 
Address of the STCB controllinq the sufctask 
Address of the last dispatched STCB 
Address of the CCE ccntrollinq the suttask 
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3 







7 







11 


I 




12 


T 




14 







15 





GG019RP 


DSPDISP 1 







3 







7 







11 


T 




12 


I 




14 







15 






TGG01°RE DS^EIETE 1 





3 







7 







11 


T 




12 


I 




14 







15 





TGGO 19^ 


DSPIIEO 1 


I 




DSPLIEOP 







3 







7 


T 





11 


T 




12 


I 




14 







15 





IGG01 °PR 


DSPLIS"" 1 


T 






3 







7 







11 


I 




12 


I 




14 







15 





T GGO 1 9PP 


DS^FOST 1 


I 




^SPFCSTP 







3 


c 




7 







11 


I 




12 


T 




14 







15 





"'"GGO 1 9 r> 5 


DSPFETO 1 


T 




rcittrpxcp 







3 







7 


T 





11 


T 




12 


T 




1tt 


c 




15 






Address of the last dispatched QCB 

Address of the TCAM Dispatcher (TGG019BE) 

AVTSAVE2 address 

Return address 

Entry point of the subtask to be dispatched 

Address cf the first item in a chain tc be 

tposted 

Address of the last dispatched PCB 

Address of the last dispatcher STCB 

Address of the last dispatched QCB 

Address of the TCAM Dispatcher (IGG019BB) 

AVTSAVE2 address 

Return address 

Entry pcint cf the subtask to be dispatched 

Address of the last dispatched RCB 

Address of the last dispatched STCB 

Address of the last dispatched QCB 

Address cf the TCAM Dispatcher (IGG019BE) 

AVTSSVE2 address 

Return address 

Entry point of the subtask to be dispatched 

Address of the first item in a chain tc be 

tposted 

Address of the last dispatched PCB 

Address cf the last dispatched STCB 

Address of the last dispatched QCB 

Address of the TCAM rispatcher (TGGC19RB) 

AVTSAVE2 address 

Peturn address 

Entry point of the subtask to be dispatched 

Address of an item 

Address of the last dispatched PCB 

Address of the last dispatched STCB 

Address cf the chain tc receive the item 

Address. of the last dispatched QCB 

Address of the TCAM Dispatcher (IGG019PE) 

AVTSBVE2 address 

Return address 

Entry point of the subtask to be dispatched 

-Address cf a list cf items to be tposted 
Address of the last dispatched RCB 
Address of the last dispatched STCB 
Address cf the last dispatched QCB 
Address of the TCAM' Dispatcher (IGG019PB) 
AVTSRVE2 address 
Peturn address 
Entry pcint cf the subtask to be dispatched 

Address of an RCE to be tposted 
Address of the last dispatched RCB 
Address of the last dispatched STCB 
Address of the last dispatched QCB 
Address of the TCAM Dispatcher (TGG019PE) 
AVTSAVE2 address 
Return address 
^ntry pcint cf the subtask to be dispatched 

Address of ar item 

Address of the last dispatched RCE 

Address of the last dispatched STCB 

Address cf the chain tc receive the item 

Address of the last dispatched QCB 

Address of the TCAM Dispatcher (TGG019BE) 

AVTSAVE2 address 

Return address 

Entry pcint of the subtask to be dispatched 
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"GGO 19EB 



T GG9 1 9 T} '° 



DSPTSTQ 1 


C 


DSPTSTQ*? 3 


I 







7 


I 







11 


T 


12 


I 


Mi 





15 





PSPtJNAV 1 





n SPUNAVF ? 


T 







7 


T 







11 


I 


12 


I 


14 





15 






Address of the last dispatched P.CB 

Address of the desired OCB 

Address of the last dispatched STCB 

Address of the QCE that currently has the SICE 

at tie top of its SICE chain 

Address of the last dispatched QCB 

Address of the TCAH Dispatcher (IGG019PE) 

AVTSJVE2 address 

Return address 

Entry point of the subtask to be dispatched 

Address of the last dispatched PCB 

Address of the desired QCB 

Address of the last dispatched STCB 

Address of the QCE that currently has. the STCB at 

the top of its STCE chain 

Address of the last dispatched QCB 

Address of the TCAM Dispatcher (IGG019FE) 

SVTSJVE2 address 

Return address 

Entry point of the subtask to be dispatched 



IGGCIQ? 15 . UST3Kfl! ,T 1 
3 







G 




7 


I 





11 


T 




12 


T 




m 







15 





GG019PC 


TGGC19FC 


W 




1 


W 
G 




2' 


W 




U 


W 




5 


V 




6 


w 




7 


w 




8 


w 




Q 


\J 




10 


W 




11 


W 

c 




12 


ti 




13 


T 




MX 


W 




15 


I 


GG019PC 


TEDQFP 


W 




1 


V 





2 


w 




3 


w 




. 6 


W 




7 


W 




a 


w 




9 


w 




10 


V 




11 


w 




12 


w 



Address of the last dispatched F.CB 

Address of the QCE from which an RCB is to be 

obtained 

Address of the last dispatched STCB 

Address of the QCE that contains the STCE to 

receive the element 

Address of the last dispatched QCB 

Address of the TCAH Dispatcher (IGG019EB) 

AVTSAVE2 address 

Eeturn address 

Entry point of the subtask to be dispatched 

Cylinder ID of current arm position 

ICE address; work reqister 

Ncnreu sable disk threshold closedown element 

Cylinder ID of the next CPB on the new queue 

Address of the previous CPB on the new queue 

DEE address 

Subroutine return address 

CPB address 

Number of extents 

Work reqister 

Address of the next CPE on the new queue; 

modified CPB address 

TOE address 

Dispatcher address 

Base reqister 

AVTSAVE2 address 

ICE size; subroutine return address 

Entry point address 

Work reqister 

Threshold value; even divide register 

Absolute disk record number; odd divide 

reqister 

Abend code for Abend; messaqe address for WTC 

Even divide reqister 

Cdd divide reqister 

CPE address 

DEE address 

Number of extents 

Numher of records per track 

Number of tracks per cylinder 

Numter of records in the data set 

Product of the number cf volumes x 

number of records per track 
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13. T AV1SAVE2 address 

14 I IGGC19FC return address 

15 I Entry point address; base register 

IGG019PD TGGC1°*>D 1 I ICE cr buffer address 

3 T STCE address 

l I QCE address 

11 I TCAM Dispatcher address 

13 I AVTSAVE2 address 

15 I "Entry pcint address 

TGG01°?F IGG019F T ¥ Nork reaister 

1 W Parameter list address 

5 W DEE address 

"7 W CPE address 

11 W ICE address 

C ^CAM Dispatcher address 

12 W Poutire base reqister 

13 I r Address cf A"tfTSAVE2 

14 w TOE size; subroutine return reqister 

15 T Entry pcint address 
w Work reqister 

tcg019 t >" lEDC^P ~ see TGGOig^C TEDQEP 

IGG019 W G TGGC19PG T GET: the address cf the application 

proqram work area. 
1 T GFT: the address of the input DCB 

*EAD: the address cf the EECB 
13 I Peqister save area address 
11.. T Peturn address 
15 T Entry pcint address 

Return code from a CSAM operation: 
X'OO 1 - Successful completion 

X'04* - SE^EC* 1 condition with no EODAE specified 
7'C8' - Work area overflow 

TGG01°F" TGGC19EH I Address of the application program work 

area 

1 I DCE address 

13 I Peqister save area address 

14 T Peturn address 

15 1 Entry pcint address 
C Peturn cede: 

X'OO' - Successful completion 
X«04' - Work area overflow 

TGGOig^T TGG019PT I Address of the application proqram PU'VWPTTE 

work area (net applicable for locate mode) 
1 I PUT: the address cf the POT DCE (QSAM) 

WPTTE: the address of the DECE (BSAH) 
If Locate mode - PDT/WPITE work area address 

13 I Peqister save area address 

14 T Peturn address 

15 I Entry pcint address 

Peturn code for a PUT (QSAM) operation: 
X'CC* - Successful completion 

X'OC - Invalid terminal name or Terminal Table 
offset 

X'OP* - Messaqe seqments are not in the proper 
sequence 

TGG019PJ TGG019PG I Address of the application proqram 

PDT/WPTTE work area 

1 T PT3T DCE address 

13 I Peqister save area address 

14 I . . Peturn address 

15 I Entry pcint address 
C Peturn code: 

X'OC - Successful completion 
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X * UO * - Message segments or records 
not in prefer sequence 



TG6019RK 


IGGC19FFC 1 


I 




2 


"T 




6 


w 




8 


I r 




9 


w 




11 


I 




11 


IS 




12 


w 




14 


I 

w 




15 


I 
w 


TGG019RL 


TGGC19RL 1 


I 




13 


I 




14 


I-- 




15 


T 





12 star address 

TC.B address 

Terapcrary AVT tase 

TCS reqister 

AVT address 

CPE Cleanup CCB address; Multiprocessor CVT 

address 

ECE address for OS Pest 

Base reqister: temporary storage of the TCB 

address durinq the OS Post 

Return address 

TCB address; Return address from. OS Post 

Entry pcint address 

work reqister; internal subroutine entry register 

DECE address 

Oser-prcvided register save area address 

Return address 

Entry pcint address 

Beturn code: 

X'OC - successful completion 

X'04' - SETECF without EODAD 

X'08' - work area overflow (READ) or sequence 

error (WRITE) 

X'OC - invalid destination 



TGG019*"* TGG019RM 



1 


I 


2 


W 


3 


W 


4 


w 


5 


w 


6 


w 


7 


w 


12 


I 


13 


I 


14 


I 


15 


I 








GG019TN 


TGGC19RN 


I 




1 


I 




2 


T 




3 


I 




4 


I 




5 


I 




6 


T 




7 


I 




8 


T 




9 


I 




10 


I 




11 


V 




12 


T 




13 


W 




14 


T 




15 


W 



Address of the 11-byte input retrieve data 

area: 

Bytes C-7 - Terminal name (left adjusted and 

padded with Hanks) to initiate retrieval; 

blank to terminate retrieval 

Bytes 8-9 - Message sequence number 

Byte 10 - Sequence number type (I for input, 

for output) 

DCB address 

Work reqister 

Termname Table address 

AVT address 

DCB address 

DEB address 

Access method work area address 

Routine base reqister 

Callinq routine save area address 

Return address 

Entry pcint address 

Return code: 

X'CO' - Successful completion 

X'04' - Invalid seguence number type specified 

X'08' - Invalid terminal name specified 

Reserved reqister 

12 star address 

IOB address 

EEE address 

DCB address 

Reserved register 

Reserved reqister 

Beserved reqister 

Reserved register 

Current buffer address 

AVT address 

Work register 

Base register 

Work register 

IOS return address 

Work register 
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IGG019RO - see IGGC19PE 



TpcQ 1 opr? 


^EUS 


W 




1 


W 




2 


» 




3 


w 




1 


V! 




5 


w 




6 


w 




7 


w 




8 


w 




9 


w 




10 


VI 




11 


w 






12 


I 





13 


I 




11 


w 




15 


I 




TGGO 1 9PP 


COPY C 


VI 




1 


I 




2 


w 




3 


w 




4 


w 




K 


w 




6 


w 




7 


w 




9 


w 




10 


w 




11 


w 






12 


i 






13 


IrO 




11 


w 




15 


I 




IGG019BQ 


IGGC19PQ 


w 




1 


I 




2 


I 




3 


I 




<4 


I 




9 


I 




10 


I 




11 


w 




12 


I 




13 


w 




14 


I 




15 


I 


IGG019RO 


IGG019P0 2 


I 




1 


I 




6 







12 







13 







11 






$crk reqister 

Work reqister 

Work reqister 

SCE address 

ICB address 

Teritiname Table entry address 

Euffer address 

QCE address 

Work reqister 

Unit work area address 

DCE address 

CFE address 

TCBM Dispatcher address 

Routine base reqister 

Address of IEDQEA+2 

Callinq routine save area address 

Work reqister 

Entry point address 

address of IEDQEA02 

Work reqister 

Address cf the first unit of the buffer 

to b€ copied 

Work reqister 

SCE address 

ICE address 

Teriflrame Table entry address 

Euffer address 

CCE address 

Unit work area base address 

CCE address 

CPE address 

Dispatcher address 

Routine base register 

Address of IEDQEA+2 

Callinq routine save area address 

Work reqister 

Entry point address 

Address of IEDQFA02 

Work reqister 

Parameter register 

DEB base register 

CVT base register 

TCE address 

AVT address 

Process entry work area address 

Work register 

Routine base register 

Work register 

Return address 

CVT address 

ICE address 
DCB address 
Prefix address 
Interrupted CCW address 
AVT address 
SCB address 



IGG019P1 



IGG019P1 1 

1 

7 

10 



ICB address or QCB address 
LCB address 
QCB address 
CCB address 
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IGG019R2 IGG019R2 1 

2 

6 

8 

9 

10 

11 

12 



13 

ill 



15 



I 

I 

W 

1,0 

1,0 

w 
w 
w 



12 star address 

TOB address 

Temporary aVT base address 

IOS register 

IOS register 

RVT address 

CPB Cleanup QCE addres: CPB address 

Base register ECE address; 

Temporary storage of the TCP address during 

the OS Post 

Calling routine save area address 

Return address 

Work register 

Entry point address 

Work register 



IGG019R3 IGG019R3 1 

a 

10 



ICB address 
ICB address 
ECB address 



IGG019R4 IGG019FV1 

a 

7 



Buffer address, ICB address,or QCE address 
ICB address 
QCB address 



IGG019R5 IGGC19R5 3 

6 

7 

9 

13 



EBB address 
ECB address 
OCB address 
ICB address 
AVT address 



IGG019R6 IGG01SR6 1 

2 

3 

H 

5 

6 

7 

8 

9 

10 

11 

12 

13 

15 

IGG01930 IGG01S3C 
1 
2 
3 

a 

5 



9 

10 

11 

12 
13 
1U 
15 



ICB address 

IOB address from the DCB 

IOB address in the ICB 

Termoame Table address 

length of the terminal name 

Terminal. name address 

Terminal entry address 

QCB address 

ICB address 

DCB/SCB address 

TCAH Dispatcher" address 

Routine base register 

Calling routine save area address 

Entry point address 

Work register 

Work register 

Current DCB address 

TICT address 

DCB work area address 

address of the first entry in the DCB parameter 

list 

address of the Where-tc-Go Table 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

address of the current entry in the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Go 

Table 

aVT address 

Current DCB address 

DEB address 

Routine base register 

Work register 

Work register 

Work register 
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TGG01931 IGGC1931 


H 


1 


W 


2 


W 


3 


W 


4 


w 


5 


I 


6 


I 


7 


I 







8 


I 







9 


w 


10 


w 


11 


W 


12 


I 


13 


w 


14 


V 


15 


VJ 


IGG01933 IGG01933 





1 





2 


I 


3 


w 


4 


I 


5 


I 


6 


I 


7 


I 



9 


I 


10 


W 


11 


I 


12 


I 


13 


w 


14 


w 


15 


I 



Work reqister 

Work reqister 

Current DCB address 

Work reqister 

DCB wcrk area address 

Address of the first entry in the DCB 

parameter list 

Address of the Where-to-Go Table 

Address of the current entry in the CCE 

parameter list 

Updated to the next entry in the DCB 

parameter list 

Address of the current entry in the 

Where-to-Go Table 

Updated to the next entry in the Where-to-Go 

Tatle 

AVT address 

Work reqister 

Work reqister 

Routine base reqister 

Work reqister 

Work reqister 

Work reqister 

Error code to user-specified error routine 

Opticn code to user-specified error routine 

Address of the current DCB 

Work reqister 

Address of the DCB Open Work Area 

Address cf the first entry in the 

DCB parameter list 

Address of the Where-to-Go Table 

Address of the current entry in the 

DCB parameter list 

If reqister 15 = 0, updated to the next entry in the 

DCB parameter list 

If reqister 15 * 1, the address of tht DCB parameter 

list entry for the module that detected the error 

If reqister 15 is qreater than 1 f destroyed 

Address of the current entry in the 

Where-to-Go Table 

If reqister 15 = r updated to the next entry 

in the Where-to-Go Table 

AVT address 

Work reqister 

Address of the current DEB 

Routine base address 

Work reqister 

Work reqister 

Return Code: 

X'00* - Iqnore the data set in error 

X'OV - Continue processinq with the 

error causinq limited capabilities 
X«02 - ABEND the TCAM job 



TGG01934 IGG01S34 



Work reqister 

Work reqister 

Current DCB address 

Routine base reqister 

DCB work area address 

Address of the first entry in the DCB 

parameter list 

Address of the Where-to-Go Table 

Address of the current entry in the DCB parameter 

list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Go 

Tatle 

Updated to the next entry in the Where-to-Gc 

Table 
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9 


I 


10 


I 


11 


I 


12 


I 


13 


V) 


14 


w 


15 


w 


T6601935 IGGC1S35 


w 


1 


W 


2 


w 


3 


w 


4 


w 


5 


w 


6 


I 


7 


I 







8 


I 







9 


w 


10 


w 


11 


W 


12 


I 


13 


V 


14 


w 


15 


w 


IGG01936 IGGC1936 


w 


1 


w 


2 


I 


3 


I 


4 


T 


5 


I 


6 


T 


7 


i 



IGG01937 IGG01937 



9 
10 
11 
12 
13 
14 
15 


1 
2 
3 
4 
5 
6 
7 



9 
10 
11 
12 
13 



AVT address 
Current UCB address 
DEE address 
TTOT address 
Work reqister 
Work reqister 
Work reqister 

Work reqister 

Work reqister 

Current DCB address 

TIOT address 

DCB work area address 

DCB parameter list address 

Where-to-Go Tatle address 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the 

DCB parameter list 

Address of the current entry in the 

Where-to-Go table 

Updated to the next entry in the 

Where-to-Go Table 

AVT address 

Current UCB address 

DEB address 

Routine base reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Address of the current ECB 

TTOT address 

Address of the DCB wcrk area 

ECB parameter list address 

Where-to-Go Table address 

Address of the current entry in the DCB parameter 

list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Go 

Table 

Updated to the next entry in the Where-to-Gc 

Table 

AVT address 

Total number of CCWs required for each device 

DEB address 

Routine base reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Address of the current ECB 

TIOT Address 

Address of the DCB work area 

ECB parameter list address 

Where-to-Gc Table address 

Address of the current entry in the DCB parameter 

list 

Updated to the next entry in the DCB parameter list 

Address of the current entry in the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Go Table 

AVT address 

Address of the current UCB 

DEB address 

Routine base reqister 

Work reqister 
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IGG01938 IGGC1938 



14 

15 


1 
2 
3 
4 
5 
6 
7 





9 


I 




10 


W 




11 


W 




12 


I 




13 


V) 




14 


w 




15 


Vi 


IGG01939, 


IGG01939 


w 




1 


w 




2 


I 




3 


w 




4 


I 




5 


I 




6 


I 




7 
8 


I 


T 





9 


I 




10 


VI 




11 


W 




12 


I 




13 


Vi 




14 


w 




15 


w 


TGG01940 


TGGC194C 


w 




1 


w 




2 


I 




3 


V] 




4 


I 




5 


I 




6. 


T 




7 


I 





8 


I 



9 


I 


10 


W 


11 


W 


12 


I 


13 


W 


14 


W 


15 


W 



Work reqister 
Work reqister 

Work reqister 

Work reqister 

address of the current DCB 

Work reqister 

Address of the DCB wcrk area 

ECB parameter list address 

Where-to-Go Tatle address 

Address of the current entry in the DCE parameter 

list 

Updated to the next current entry in the DCE 

parameter list 

Address of the current entry in the Where-tc-Go 

Table 

Updated for the next entry in the Where-to-Go 

Tatle 

AVT address 

Work reqister 

Work reqister 

Routine base reqister 

Wcrk reqister 

Work reqister 

Work reqister 

Work reqister 

Wcrk reqister 

Address of the current DCB 

Work reqister 

Address of the DCB wcrk area 

DCB parameter list address 

Where-to-Go Tatle address 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-to-Go 

Tatle 

Updated to the next entry in the 

Where-to-Go Table 

AVT address 

Work reqister 

Wcrk reqister 

Boutine base reqister 

Work reqister 

Work reqister 

Wcrk reqister 

Work reqister 

Wcrk reqister 

Address of the current DCB 

Work reqister 

Address of the DCB wcrk area 

DCB parameter list address 

Where-tc-Go Tatle address 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list " L 

Address of the current entry in the Where-to-Go 

Tatle 

Updated to the next entry in the 

Where-tc-Go Table 

AVT address 

Work reqister 

Work reqister 

Routine base reqister 

Work reqister 

Work reqister 

Work reqister 



Diagnostic Aids 1165 



IGG019U1 


TGGC1S41 2 

5 



T 




6 
7 


I 
I 






8 


r 






12 


i 


TGG019U2 


TGGC1942 2 
5 


i 

T 




6 

7 


T 
I 






8 


T 





12 


T 



Checkpoint wcrk area address 

Address of the first entry in the DCB parameter 

list 

Address of the Where-tc-Go Table 

Address of the current entry in the DCB 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-To-Go 

Tatle 

Updated to the next entry in the Where-TO-Gc 

Table 

Base register 

Checkpoint wcrk area address 

Address of the first entry in the DCB parameter 

list 

Address of the Where-to-Go Table 

Address cf the current entry in the CCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Go 

Table 

Updated to the next entry in the Where-to-Go 

Table 

Ease reqister 



"GG019U3 IGGC1943 2 
5 



12 

TGG01944 TGG019U4 2 
5 



12 

TGG01945 TGG019M5 2 
5 



12 



Checkpoint wcrk area address 

Address of the first entry in the DCB parameter 

list 

Address of the Hhere-tc-Go Table 

Address of the current entry in the DCB 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Gc 

Table 

Base reqister 

Checkpoint wcrk area address 

Address cf the first entry in the DCB parameter 

list 

Address of the Where-tc-Go Table 

Address of the current entry in the DCB 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in. the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Go 

Table 

Base reqister 

Checkpoint wcrk area address 

Address of the first entry in the DCB parameter 

list 

Address of the Where-to-Go Table 

Address cf the current entry in the DCB parametei 

list 

Updated to the next entry in the DCB parameter 

list 

Address cf the current entry in the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Go 

Table 

Base reqister 
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TGG01946 TGG01946 5 



Address of the first entry in the DCE parameter 

list 

Address of the Where-to-Go Table 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-to-Go 

Tatle 

Updated to the next entry in the Where-tc-Gc 

Table 



-GG0i9<n iggoi94'? 5 



6 


I 


7 


I 







8 


T 








Address of the first entry in the DCB parameter 

list 

Address of the Where-to-Go Table 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Go 

Tatle 

Updated to the next entry in the Where-to-Gc 

Tatle 



TGG01948 TGGC1?4f 
1 
2 
3 
4 
5 



Work reqister 

Work reqister 

Address cf the current DCB 

Work reqister 

Address of the CCE wcrk area 

Address of the first entry in the DCB parameter 

list 

Address of the Where-to-Go Table 

Address of the current entry in the DCB 

parameter list 

Updated to the next entry in the DCE parameter 

list 

Address cf the current entry in the Where-to-Go 

list 

Updated to the next entry in the Where-to-Gc 

Table 

AVT address 





10 


W 




11 


W 




12 


I 




13 


w 




14 


w 




15 


w 


GG0194 C > 


IGG01949 2 


T 




5 


I 




6 


I 




7 

8 


T 


T 



Work reqister 

Work reqister 

Routine base reqister 

Work reqister 

Wcrk reqister 

Work reqister 

Checkpoint wcrk area address 

Address cf the first entry in the DCE 

parameter list 

Where-to-Gc Tatle address 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the 

CCE parameter list 

Address of the current entry in the 

Where-tc-Go Table 

Updated to the next entry in the 

Where-tc-Gc Table 



TGG02030 



TGG02C30 
1 
2 
3 
4 
5 



Work reqister 

Wcrk reqister 

Current CCE address 

TTCT address 

CCB work area address 

Address of the first entry in the DCB parameter 

list 

Address of the Where-tc-Go Table 
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9 


T 


10 


T 


11 


I 


12 


I 


13 


W : 


14 


W 


15 


w 


TGG02035 IGG02035 


w 


1 


w 


2 


I 


3 


I 


a 


T 


5 


T 


6 


T 


7 


I 







8 


I 



9 
10 
11 
12 
13 
14 
15 



Address of the current entry in the DCE parameter 

list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Gc 

Table 

Updated to the next entry in the Where-tc-Gc 

Tatle 

AVT address 

Current UCP address 

DEE address 

Routine base reqister 

Work register 

Work reqister 

Work reqister 

Work reqister 

Wcrk reqister 

DCE base reqister 

TCB base reqister 

Terrorame Table entry DSECT base 

Address of the first entry in the DCE parameter 

list 

Address of the Where-tc-Go Table 

Address of the current entry in the DCB parameter 

list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-to-Go 

Table 

Updated to the next entry in the Where-to-Gc 

Table 

AVT base address 

Termname table base address 

DEE base address 

Routine base address 

PCE ESECT base reqister 

Work reqister 

Work reqister 



TGG02036 TGG02C36 



TGG02041 IGG02041 5 



9 


I 


10 


T 


11 


T 


12 


W 


13 


w 


14 


w 


15 


w 


5 


T 


2 


I 


6 


T 


7 


I 



Work reqister 

Work reqister 

Current DCB address 

TTOT address 

DCP wcrk area address 

Address of the first entry in the DCE parameter 

list 

Address of the Where-to-Go Table 

Address cf the current entry in the DCE parameter 

list 

Updated to the next entry in the DCP parameter 

list 

Address cf the current entry in the Where-tc-Gc 

Table 

Updated to the next entry in the Where-to-Gc 

Table 

AVT address 

Current DCE address 

Routine base address 

Work reqister 

Work reqister 

Work reqister 

Work reqister 

Address cf the first entry in the DCB parameter 

list 

Checkpoint work area address 

Address cf the Where-to-Go Table 

Address of the current entry in the DCE 

parameter list 
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12 



Updated to the next entry in the DCE parameter 

list 

Address of the current entry in the Where-to-Go 

Tatle 

Updated to the next entry in the Where-to-Gc 

Tatle 

Base reqister 



TGG02046 IGG02C46 5 





6 
7 


I 

T 





8 


I 



IGG02047 


IGG02C47 3 
4 
5 


w 
w 

1,0 




6 
7 


VI 
IrO 

w 

I 






8 


T 





9 
10 
12 
13 


w 
w 

T 
W 



Address of the first entry in the DCB parameter 

list 

Address of the Where-tc-Go Table 

Address of the current entry in the DCE 

parameter list 

Updated to the next entry in the DCB parameter 

list 

Address of the current entry in the Where-tc-Go 

Table 

Updated to the next entry in the Where-to-Gc 

Tatle 

DCE address 

DEE address 

Address cf the first entry in the DCB parameter 

list 

ICE address 

Address of the system Where-to-Gc Table 

1CB address 

Address of the current entry in the ECE 

parameter list 

Address of the next entry in the DCB parameter 

list 

Address cf the current entry in the system 

Where-to-Gc Table 

Address of the next entry in the system 

Where-tc-Go Table 

SCE address 

AVT address 

Base reqister 

Open/Close work area address 
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A^PE^PTX A: LIST OF TCAM MODULES EY LTBFAFY 



^his appendix identifies the modules that comprise TCAM. The modules 
are orqanized by the. libraries in which the modules reside. The 
modules in each library are in alphabetical order by name. For those 
modules that represent macro instruction implementing routines, the 
mnemonic operation code for the macro is included in parentheses. 

All resident TCAM modules are in SYS1 . TELCMITB. Transient modules 
reside in SYS1 . 1INK.LTB , and all Open, Close, Get, and Put modules are 
in SYS1.SVCLTP. The system nucleus modules are in SYS1 . NUCLEUS,. The 
m CAM module IEDQTNT is not stored in a library; rather, it is 
assembled as part of the Termname Table,. TCAM macros are in 
SYS1.MACLIE. 

SYSJ^ITNKITB 

T^POC^" Modify Options Routine 

IEDOCG Copy Line Information Poutine 

TEDOCH Copy Terminal Information Poutine 

^EPOCT Copy I.CB Information Pcutine 

TEDOCJ Copy CCB Information Poutine 

I^DOCK Copy Held Terminals Poutine 

T EDOCL Copy Invitation List Entry Poutine 

tep-OCM Copy Operator Control terminal Poutine 

T EP0CN Chanqe Control Terminal Poutine 

TEDOCO Change Terminal Poutine 

TFDOCP Alter Trace Status Poutine 

TEPOCO Stop/Pesume Terminal Transmission Poutine 

T EDOCU Start line Poutine 

IED0CV Stop Line Poutine 

TEPOCW Modify Poll Routine 

T^DOCX Modify Intense Poutine 

T EP0C7 Chanqe Interval Type Pcutine 

TEDOCO WCP Closedown Processinq Poutine 
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IED0C1 ICHNG Processinq Routine 

TEDQC2 On^Line Test Interface Routine 

IED0C3 Copy Invitation list Status Routine 

TED0C5 Nonexecutable Work: Area for Operator Control 

TEDQC6 Debug Service Aid Router 

T ED0E6 Password Scramble Routine 

TEDOHI System Delay Routine 

TED0NA2 Nonresident Closedown Completion Routine 

TEDONB Application Prcqram/Checkpoint Interface Routine 

IEDOND Ready Routine (READY) 

tt?t)onf Checkpoint Executor 

IEDQNG Build Incident Record for MH Routine 

T EDQNH Puild Incident Record for TCHNG Routine 

TEDQNJ Incident Checkpoint for Operator Control Routine 

^EDONK Environment Checkpoint Routine 

IED0NM Puild CKREQ Disk, Record Routine 

TEDONO Checkpoint Queue Manaqer 

T EDQNP Checkpoint Disk I/O Routine 

TEDQNQ Checkpoint Notification and Disposition Routine 

TEDONR Checkpoint - No Available Core Routine 

T ED0NS Checkpoint - No Incident Records Routine 

IEDONX Ooeratcr Awareness Messaqe Router 

TPDOOA link Routine 

TEDQOB WTOR Interpreter Routine 

T^DOOG INTRO GETMAIN Routine 

I^DOOM Termname Table Sort Routine 

T EDOOS Attach Routine 

IEDO Y A Disk Messaqe Cueue Initializer 
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S.Y31. WACITB 

ATTEN Activates the TSO/TCAM attention processinq routine 

CANCEIMG Cancels messaqes 

CAP^TAGE Processes characters that move the carriaqe 

CHECKPT Takes an Incident Checkpoint record of the 
option fields 

CHNGP Modifies an invitation list 

CHNGT Places specified data in a Terminal Table entry 

CKPEO Checkpoints the MCP 

CLOSEMC Closes down the telecommunications system 

CODE Translates the data in the buffer currently beinq 
handled 

^OPY D Examines the contents of an invitation list 

COPYQ Examines the contents of a QCB 

COPYT Examines the contents of a Terminal Table entry 

COUNTER Maintains a count of complete messaqes or of messaqe 
seqments received from cr sent to a terminal 

CPTO* c,T ' Specifies the maximum allowable incominq messaqe 
lenqth 

DATETIM"* 3 ' Inserts, the date and time in an incominq or outqcinq 
messaqe header 

EFPOPMSG Sends an error messaqe when an error occurs 

EOPWARD Queues messaqes for specified destinations 

HANGUP Checks for I/O errors 

HOLT) suspends transmission to a terminal 

TCHNG Modifies an invitation list 

^COPY Examines the contents of an invitation list 

TEDOCHA^ Internal assembly macro to check character strinqs 

TEDOCHT Internal assembly macro to determine device 
characteristics 
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IEDOCKO Internal assembly macro to perform validity checkinq 
on terminal operands 

TEDO^EA Internal assembly macro for the FE serviceability 
modules 

TEDOGCH Internal assembly macro to generate device dependent 
fields for a terminal entry 

TEDQMASK Internal assembly macro to analyze mask operands 

IEDOSCAN Internal assembly macro to search for a character 
strinq 

TEDO^O Internal assembly macrc to qenerate the option fields 
specified by a TERMINAL macro 

IEDQT0 Internal assembly macro to qenerate QCBs 

TEDO^T Internal assembly macro to qenerate a Termname 
Table entry 

T ED0VCON Internal assembly macrc to provide proper branchinq 
addresses for all the macros 

TNEUE Identifies a subqroup that handles incominq messaqe 
buffers 

T NEND Identifies the end of the MH incominq qroup 

TNHDP Identifies the beqinninq of an inheader subqroup 

T *TITTATE Sends messaqe seqments immediately to their 
destination 

TN^SG Identifies the beqinninq of an MR inmessaqe subqroup 

tmtpo Creates the AVT 

TNVL T ST Generates the invitation list for a line 

INVLTST1 Internal assembly macro to qenerate an invitation list 

TNVLIST2 Internal assembly macro to qenerate an invitation list 

INVIIST3 Internal assembly macro to qenerate an invitation list 

I.TNEGPP TSC MCF aeneration macro 

LISTTA TSO MCF qeneration macro 

LOCK Locks one terminal on a line to an application 
proqrair 
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LOCOPT locates a field in the Option Table 

LOG loqs complete messaqes or messaqe seqments 

t OGON Performs loqon procedures 

LOGTYPE Initializes for usinq the TCAM lcqqinq facility 

flCPCLOSE Initiates closedown of the telecommunications system 

MRELE.RSE Releases messaqes queued for a destination 

MSGEDTT Inserts specified characters into specific locations 
in a messaqe 

MSGFORM Inserts EOT line control characters in outqoinq 
messaqes 

MSGGEN Generates an unqueued messaqe 

MSGLIMIT Limits the number of messaqes durinq a sinqle 
transmission sequence 

MSGTYPE Controls the path of a header throuqh an MH 

OPTION Defines the Option Table 

ORIGIN Checks the validity of the oriqin field in a messaqe 
header 

OUTBUF Identifies a subqroup that handles outqoinq messaqe 

buffers 

OUTEND Identifies the end of any MH outqoinq qrcup 

OUTHDR Identifies the beqinninq of an outheader subqroup 

OUTMSG Identifies the beqinninq of an MB outmessaqe subqroup 

PATH Dynamically varies the path of a messaqe throuqh an MH 

PCB Generates a Process Control Block in an MCP to 
interface with an application proqram 

PRIORITY Specifies priority handlinq for messaqes 

PROCESS Interfaces between the MCP and an application proqram 

OCOPY Examines the contents of a OCB 

OSTART Differentiates between a QTAM and a TCAM application 
proqram 

*EADY Initializes and activates the MCP 
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PED^hect Queues a lessaqe for an additional destination 

^ELEASEM Releases messaqes queued for a destination 

B ET W IEVE Retrieves a messaqe for reprocessinq 

PTAOTOPT Pesumes automatic promptinq (after 
a null line) . 

SCREEN Modifies the Write operations for display terminals 

SEQUENCE Checks the input sequence number .of an incoming 
messaqe 

SETEC"? Indicates an EOF messaqe 

S^TSCAN Proves the scan pointer forward or backward or returns 
the address of the last character of a specific 
character strinq 

SGIEC3TP Moves ETAM, QTAM, and TCAM modules into SYS1.SVCIIE 
at system qeneration time 

SGTEC5TP Moves BTAM, QTAM, and TCAM modules into SYS1 . LINKLIB, 

SYS1.SVCLIB, and SYS1. TltCHLIB at system qeneration time 

SGIEC2PT Generates UCBs at system qeneration time 

SGTEC519 Moves the proper macros into SYS1.MACLIE at system 
qeneration time 

STMATTN Handles a simulated attention strinq or code 

SPAUTOPT Stops automatic promptinq 

S^AP^IN Activates a line or line qroup 

ST*. p TMW Establishes addressability for an MH routine 

STATTN Sets up a simulated attention strinq 
or code, time or lines 

STAUTOCP Starts automatic character proirptinq 

■S^AUTOLN Starts automatic line numberinq 

STBP.EAK Allows the user to specify the presence of the 
reverse break feature 

STCC Allows the user to specify line and character 
deletion characters 

STCLEA^ Specifies the character strinq used to clear 
the 2260 screen 
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STCOM Specifies whether to allow other TSO stations 
to send the user messaqes 

STOPLN Deactivates a line or line qroup 

STSIZF Specifies the lenqth of a line or the lenqth 
of and the number of lines for a 2260 

STTTMEOU Specifies whether a 1050 has the timeout 
suppression feature 

TCHNG Places specified data in a Terminal Table entry 

TTLEARQ Allows the user to clear the TSO input or 
output queue, 

TCO^Y "Examines the contents of a Terminal Table entry 

TERMINAL Creates a sinqle cr qrcup entry in the Terminal Table 

TER^SET Sets a bit in the Error Record 

TGET Transfers a line of input from. a TSO terminal 
to the user's data area. 

TLTST Defines a cascade-list or distribution-list entry 
in the Terminal Table 

TPROCESS Interfaces between the MCP and an application proqram 

^PUT Transfers a line of output from the user's data 
area to a TSO terminal 

TRANLIST Generates a control table for use by the Dynamic 
Translation routine (IEDQA3) 

TSTNPUT Generates a QCB for the TSO subtask and creates an 
extension of the AVT for TSO support 

TSOMCP TSO WCP qeneration macro 

TSOMH TSO MCP qeneration macro 

STABLE Defines the Terminal Table 

UNLOCK Removes a terminal from extended lock mode 

SY.S1, NUCLEUS 

IED0ATTN Attention Routine 

IGC102 AOCTL SVC 102 Routine 
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SYSI.SVCLIB 

TGC1303D TCAM Command Scheduler - SVC 34 

TGC0010D Operator Control Control Module - Load 

IGC0110D Operator Control Control Module - Load 1 

TGC0210D Operator Control Control Module - Load 2 

IGC0310D Operator Control Control Module - Load 3 

TGC0410D Operator Control Control Module - Load 4 

TGC0510D Operator Control Control Module - Load 5 

TGE0004G Start/Stop ERP Control Module 

TGE0104G Bead/Write Unit Check and Unit Exception ERP Module 

IGE0204G Non-operational Control Unit Module 

TGE0304G Unit Check for Non-read, Non-write, and Non-poll 
CCWs ERP Module 

I GEO 40 4 G Auto Poll and Pead Response to Poll Unit Check 
and Unit Exception ERP Module 

TGE0504G Error Post and Second Level CCW Return Module 

IGE0604G Unit Check and Unit Exception on Read/Write CCWs for 
Audio and 2260 Local Devices EBP Module 

IGE0804G Start/Stop Channel Check Module 

TGE0904G Closedown Terminal statistics Recording Module 

TGE0004H ESC EPP Control Module 

TGE0104H PSC Read/Write Equipment Check, lost Data, Intervention 
Required, and Unit Exception ERP Module 

IGE0204H BSC ^ead/Write Data Check, Overrun, and Command 
Reiect ERP Module 

IGE0404H BSC Second Level CCW Return Module 

IGE0504H ESC Error Post Module 

IGE0804H ESC Channel Check ERP Module 

IGG019Q0 Line I/O Interrupt Trace Routine 
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IGG019Q1 Local deceive Scheduler 

IGG019Q2 Line End Appendaqe for ESC Lines 

TGG019Q3 Line End Appendaqe for Start/Stop Lines 

IGG019O4 Line End Appendaqe for Leased and Start/Stop 
Lines and No TSO 

IGG019Q5 Line End Appendaqe for a QTAM Compatible System 

TGG019Q6 Send Scheduler for Leased Lines and 
No TSO 

IGG019Q7 send Scheduler with No TSO 

TGG019Q8 Checkpoint Continuation Bestart Subroutine^ 

IGG019BA Checkpoint Disk End Appendaqe 

IGG019BB TCAM Dispatcher 

TGG019BC EXCP Driver 

TGG019BD Buffered Terminal Scheduler 

TGG019BF EXCP Drive for a Sinqle CPB 

IGG019BG GET/BEAD Boutine 

TGG019BH Get Compatible Boutine 

IGG019BT PUT/WBTTE Boutine 

TGG019BJ Put Compatible Boutine 

IGG019BK Disk End Appendaqe for a Sinqle CPE 

TGG019BL Check Boutine (CHECK) 

IGG019BM Point Boutine (POINT) 

TGG019BN PCI Appendaqe 

IGG019BO TCAP Dispatcher with Subtask Trace 

IGG019BP Beusability-Copy Subtask 

TGG019BQ Post Pendinq Boutine 

TGG019BB IBM 1030, 1050, 1060, 27U0, 2741 Special Characters 
Table 

IGG019BS IBM 2260 Bemote Special Characters Table 

r 
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TGG019RT AT&T 115A or Western Union 83B3 Special Characters 
Tafcle 

TGG019RU AT&T TWX, with Odd Parity Special Characters Table 

IGG019RV IBM 2260 Local Special Characters Table 

TGG019RW World Trade Teletype Adapter (WTTA) Special Characters 
Tafcle 

TGG019RX AT&T TWX, with Even Parity Special Characters Table 

T GG019RY Audio Special Characters Table 

IGG019R0 Line End Appendaqe 

IGG019R1 Dial Receive Scheduler 

TGG019R2 Disk End Appendaqe 

TGG019R3 Leased Receive Scheduler 

IGG019RU Send Scheduler 

IGG019R5 Attention Handler 

IGG019R6 Startup Hessaqe Routine 

TGG019R7 ESC EBCDIC Code Special Characters Table 

TGG019R8 ESC USASCII Code Special Characters Table 

TGG019R9 BSC 6-bit Code Special Characters Table 

TGG01930 Disk Messaqe Queues Open - 1 

TGG01931 Disk Messaqe Queues Open - 2 

TGG01933 open Error Handler 

TGG0193U Disk Messaqe Queues Open - 3 

TGG01935 Line Group Open - 1 . 

IGG01936 Line Group Open - 2 

TGG01937 Line Group Open - 3 

TGG01938 Line Group Open - U 

IGG01939 Line Group Open - 5 . 

TGG01940 Line Group Open - 6 

IGG01941 Checkpoint Open Routine 
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IGG019H2 Checkpoint Disk Initialization Routine 

IGG01943 Checkpoint/Restart from Environment Record Routine 

TGG01944 Checkpoint/Restart from Incident and CKREQ Records 
Routine 

TGG01945 Checkpoint Continuation Restart Routine 

IGG01946 GET/PUT and READ/WRITE Cpen Executor - 1 

IGG01947 GET/PUT and READ/WRITE Open Executor - 2 

IGG01948 Line Group Open - 7 

IGG02030 Disk Messaqe Queues Close Routine 

IGG02035 Line Group Close Routine - 1 

IGG02036 Line Group Close Routine - 2 

IGG02041 Checkpoint Close Routine 

TGG02046 GET/PUT and READ/WRITE Close Executor - 1 

IGG020U7 GET/PUT and READ/WRITE Close Executor - 2 

SYSJaTELCMLIB 

TEDAYA TSC Attention Routine 

TEDAYC TSO Carriaqe Subroutine 

IEDAYD Time Sharinq Destination Scheduler 

TEDAYE TSO TICC Edit Routine 

TEDAYE TSO IOHALT Routine 

IED0YH TSO Hanqup Routine 

TEDAYI TSINPUT Routine 

TEDAYL TSO loqcn Routine 

IEDAYM TSO Messaqe Generation Routine 

TEDAYO TSOUTPUT Routine 

IEDAYR STARTMH Subtask for TCAM-TSO Mixed 

IEDAYS TSO Simulated Attention Routine 

IEDAYT TSO Abend Interface Routine 
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TEDAYX TSC TNMSG/OTJTMSG Linker Routine 

IEDAYY TSO Asynchronous Time relay Removal Routine 

IEDAYZ Time Sharinq Scheduler 

TEDQAA STARTMH Subtask (STARTMH') 

TEDOAC Date and Time Provision Routine (EATETIME) 

IEDQAD Output Sequence Number Provision Routine 

IEDQAE Locate Option Field Address Routine (LOCOPT) 

TEDOAF Insert Data Routine 

IEDOAG Messaqe Limit Routine 

TEDQAH Input Sequence Number Insertion Routine 

IEDQAI Skip Forward and Scan Routine 

IEDOAJ Skip to Character Set Routine 

IEDOfiK Line Control Insertion Routine 

TEDQAI Address Finder Routine 

TEDQAM Oriqin Routine 

IEDQAN Multiple Insert/Remove Routine 

IEDOAO Unit Request Interface Routine 

TEDQAP Remove at Offset Routine 

IEDOAQ Operator Control Interface Routine 

IEDQAR Cancel Messaqe Routine 

IEDQAS Hold/Release Terminal Routine 

TEDQAT Create an Error Messaqe Routine 

TEDOAU Cutoff Messaqe Transmission Routine 

lEDQftV lookup Terminal Entry Routine 

IEDQAW Translate Buffer Routine 

TEDOAX Buffer Step Routine 

IEDOAY Screen Routine 

IEDOAZ Redirect a Messaqe Routine 
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TEDQAO Skip Backward Routine 

IEDOA1 Binary Search Routine 

I EDO A 2 Insert at Offset Routine 

TEDOA3 Dynamic Translation Routine 

IEDQA4 Incominq/Outqoinq Messaqe Delimiter Routine 

TEDQA5 Forward Routine 

IED0A6 Line control Initialization Routine 

TEDQA7 Counter Routine 

TED0A8 Multiple Insert at Offset Routine 

TEDOBA Multiple Routinq Subtask 

IEDOBB Checkpoint Request Routine 

T EDQBC Distribution List Subtask 

IEDOBD Buffer Dispositi-on Subtask 

IEDOBE Lock Routine 

TEDOBF Unlock Routine 

IEDQEG Cascade List Subtask 

IEDOBL Messaqe Generation Routine (MSGGEN) 

TEDOBT EOE/ETB Handlinq Subtask 

TEDQBW Unit Request Routine 

TEDOBX Loq Seqment Routine 

IED0BY Loq Messaqe Routine 

IEDOEZ Loq Scheduler 

IEDOCA Resident Operator Control Module 

TEDOEC Put Scheduler 

TEDOES Retrieve Service Routine 

IEDOET Operator Control/Application Proqram Interface Boutine 

IEDQEU Open/Close Subtask 

IEDOEW Get Scheduler 
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I1D0EZ Get Scheduler FIFO Routine 

TED0E1 TCOPY Service Routine (TCOPY) 

TED0E2 QCOFY Service Foutine (QCOPY) 

TEDQE3 ^CHNG Service Routine (TCHNG) 

IED0E4 ICOPY Service Routine (ICOPY) 

IED0F7 Retrieve Scheduler 

TEDOFA CPF Initialization Module 

^EDOFAI CPB Initialization-Main Storaqe Queuing Only 

TBD0' P 'A2 CPB Initialization-Disk Queuing Cnly 

TEDOGA Buffer Management Module 

IEDOGT Transparent Transmission CCW Building Poutine 

TEDQHG Time Delay Subtask 

IEDOHK Stop line I/O Subtask 

TEDQHM Destination Scheduler 

TED0HM1 Destination Scheduler-Main Storaqe Queuing Only 

IED0HM2 Destination Scheduler-Disk Queuing Only 

TEDQKA Activate-I/O Generator Subtask 

TEDOKB Activate-T/O Generator Subtask for BSC Lines 

T EDOKC Activate-I/O Generator Subtask fcr Start/Stop lines 

TEDQKD Activate-I/O Generator Subtask fcr Leased and Start/Stop 
Lines and No TSO 

TEDQKE Activate-I/O Generator Subtask fcr a QTAM Compatible 
Svstem 

TFDQLM Return Interface Poutine 

TEDONA Pesident Closedown Completion Routine 

IEDOUI User Interface Poutine 

TED010 IBM 1030 Translate Table 

IEDQ11 IBM 1050 Translate Table 

IED012 IBM 1050 Folded Translate Table 
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IED013 IBM 1060 Translate Table 

TED014 IBM 2260 Translate Table 

IEDQ15 Alias for IEDQ14 

IEDQ16 IBM 2740 Translate Table 

IEDQ17 IBM 2740 Folded Translate Table 

TEDQ18 World Trade Teletype Adapter (NTTA) , ITA2 Translate 
Table 

IED019 World Trade Teletype Adapter (WTTA) , ZSC3 Translate 

Table 

TEDQ20 ATf-T 115A or Western Union 83B3 Translate Table 

TED021 AT&T TWX, with Parity Translate Table 

TEDQ22 AT&T TWX, without Parity Translate Table 

IED023 IBM 2780, 6-bit Code Translate. Table 

IEDQ24 USASCII Code Translate Table 

IEDQ25 Dummy Table (EECCIC to EBCDIC) 

IED026 IBM 2741 , BCD Code Translate Table 

TEDQ27 IBM 2741, EECC Code Translate Table 

TED028 IBM 2741, Correspondence Code Translate Table 
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APPENDIX B. TCAM QUEUES AND OCBS 



TCAM QUEUES 

Checkpoint Disk I/O queue - Checkpoint disk records wait on this queue 
to be written to disk. The records are queued in FIFO order. The 
first word of the record is the link field. Each time an 
environment checkpoint record is put on the checkpoint disk I/O 
queue, the IEDONO routine scans the queue. If there are any 
incident checkpoint disk records on the queue, the IEDQNO routine 
removes them and frees them up. Since the information in the 
incident checkpoint record is included in each environment record, 
it is not necessary to write bcth records to disk. The Checkpoint 
Executor routine (IFDONF) looks at the queue when a record is put 
on the queue, and qives control to the Checkpoint Disk I/O routine 
(IEDONP) . 

Communication queue - This is a queue of command input blocks in FIFO 
order, chained by the first word in each CIB. The communication 
queue is used to queue command input blocks containinq operator 
control commands from the console. An SVC 34 from the Command 
Scheduler places the CIBs on the queue, and the SVC 34 routine 
removes them. The second word of the queue is the communication 
ECB. 

Copy Buffer queue - When a messaqe is to be copied from one queue 
medium to another, the first buffer of the messaqe is tposted to 
COPY, which hanqs the buffer on the copy buffer queue, pointed to 
by the AVTCOPY field. This field also points to the Copy QCB 
whose first two words are used as a FIFO queue of buffers* Each 
messaqe stays on the Copy Buffer queue- until a CPB is available to 
be used tc copy the messaqe. One CPE is used per messaqe,. The 
use of this queue ensures that messaqes will be copied in the 
order that the copy operation was requested as CPBs become 
available. Buffers are chained by their second word r There is a 
zero in the second word of the last buffer,. 

CPB Free Pool queue - The AVTFCPE field contains the address of the 
first of a chain of CPBs that are not busy. They are chained by 
CPBNEXT, with a zero in the last one. This is not a FIFO queue 
(as is other CPB queues) but a LIFO (last in, first out) queue. 
If the user specifies too many CPBs (TNTBO CPB=inteqer) , the CPBs 
at the end of this free pool chain will never have been used.. The 
user should look at a TCAM dump for unused CPBs and be able to 
specify a smaller number next time, thereby savinq main storage. 

Disabled Peady queue - The disabled ready queue is a FIFO queue that 
contains elements passed from application proqrams and attached 
tasks for processinq by the MCP. The contents of this queue are 
merqed into the enabled ready queue by the TCAM Dispatcher. 
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Disk End queue - ^here are two disk end queues. The address of the 
first is at AVTDKAPQ. This queue is used to pass CPEs from the 
Disk End Appendaqe to the CPB Cleanup routine. The address of the 
second queue is at AVTDKENQ. This queue is used as an alternate 
in the disabled/enabled interface to pass CPBs from the Disk End 
Appendaqe to the CPB Cleanup routine. If the AVTBPLKN bit is on, 
the Disk End Appendaqe cannot put a CPB in the disk end queue 
pointed to by AVTDKAPQ, but must place it in the queue pointed to 
by AVTDKENC. 



Enabled Ready queue - see Ready queue. 

EXCP queue - This is a chain of CPBs for the one cylinder, in one 
extent of a disk messaqe queues data set, that is currently ready 
for I/O execution. CPBs are ordered on this chain by FIFO order. 
CPB Initialization waits en this queue for the I/O to complete so 
it can build a new CPB and do another EXCP. 

EXCP Driver Input queue - This is a chain of CPBs that the EXCP Driver 
processes until it is empty. Only Read or Write CCW op codes and 
the buffer unit address are in the channel proqram. The disk 
address is an absolute disk address in the same form as when taken 
from the CPERADDR or CPBNADDR field. An indication of reusability 
or nonreusatility is in the CPBFLAG. The EXCP Driver removes the 
CPBs in FIFO order, hanqs each one on the New queue by cylinder, 
and then completes the channel proqram. No EXCP is issued until 
the input queue is emptied. A doubleword queue pointer is in. the 
AVTTNCPQ field. 

FEFO queue - f irst-ended-f irst-out - A FEFO message queue is ordered 
so that the messaqe that ends first will be sent out first 
reqardless of the order in which the messaqes started being 
received. 

FIFO queue - A FIFO queue is any queue of elements that is managed on 
a f irst-in-f irst-out basis. When an element is placed on the 
queue, it is placed in the order in which it was received and the 
first element on the queue is the first to be removed. 

Hold queue - A hold queue is a FEFO-ordered queue that is a part of 
the priority level QCB for each Destination QCB,. If a terminal is 
intercepted (held), its messaqes are placed in this queue while 
messaqes for other terminals on this Destination QCB are sent. 

New queue - A queue on the IOB chain of CPBs beinq built by EXCP 
Driver. The CPBs are sorted on this queue by absolute cylinder 
number and are in FIFO order for any cylinder group. The CPBs are 
placed on the queue One at a time from the input queue by the EXCP 
Driver. They are removed by cylinder qroup and are placed on the 
Retry queue. 

No-buffer queue - This is a FIFO^ordered queue of CPBs for read 
operations when no buffers are in the buffer unit pool. This is 
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an internal queue used by IEDO/PA and IEDQFQ, The elements are 
linked by the CPBNEXT field. 

No-CPB queue - This is queue of buffers and ERBs waitinq for CPBs. 
The queue is located in the AVTand serves as a place to keep 
elements until CPBs are built for them. 

Operator Control queue - This is FIFO queue of buffers, dummy CPBs 
from application proqrams and TOTE, stopped LCBs, and dummy ERBs 
with buffers associated. The second word of the queue is the 
Operator Control ECB. The queue is used as a communication link 
between the TCAM MCP and Operator Control. All commands other 
than those from the console are placec! on this queue, as well as 
elements (LCBs, FRBs) requested by Operator Control. 

^eady queue - This is a priority-FIFO ordered queue of TCAM elements 
that are to be processed by the TCAM suttasks. 

p etry queue - This is a chain of CPBs for one cylinder in an extent of 
the disk messaqe queues data set*. These CPBs are next in line for 
I/O execution after the CPBs on the EXCP queue are processed. 
When the risk End Appendaqe receives control after the CPBs on the 
EXCP queue are finished, it requests TOS to do a "retry" after 
movinq the CPBs on this queue to the EXCP queue. This last move 
avoids an extra EXCP and permits the channel to beqin work on the 
new disk channel proqram faster. 

^EUS CPB queue - When the CPB Cleanup routine finds a CPB belonqinq to 
the Reusability-Copy subtask (CPBFLAG, CPBREUSN bit on) , it puts 
the CPB on the REUS CPB queue at AVTREUSQ, a doubleword FIFO queue 
of CPBs beinq returned to the Reusability-Copy subtask* Each CPB 
has a 4-bit field in the low-order 4 bits of CPBFLAG identifyinq 
the type cf action the CPB is to do. Since the CPB may be doinq 
I/O for the Reusability-Copy subtask, there may be several CPBs on 
the queue* The CPB Cleanup routine calls the Reusability-Copy 
subtask if either the reusability CPB queue is not empty, the 
reusability 'first time* switch is set (AVTRTJFTN bit in AVTBIT2 1 ) , 
or the 'copy wants control 1 bit is set (AVTCOPYfl in AVTBIT2) . 
Once Reusability-Copy qets control, it continues to process CPBs 
from the reusability CPB queue until that queue is empty. 

System Delay queue - This is a chain of LCBs. The System Delay 
subtask (IED0HIV waits on the queue until all the ICBs are on the 

queue and then beqins the system delay interval. When - -*--- 

delay is requested, the Leased Receive Scheduler and 'tl 
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e as the number of LCBs received by the System Delay subtask, 
time request is posted to the Time Delay subtask (IEDQHG) . 
er the interval is complete, each LCB is removed and tposted to 



same as the number of LCBs received by the Systei 
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itself to resume line activity. 

Time Delay queue - This is a relative time of interrupt ordered chain 
of elements that are requestinq a system STIMER interrupt. The 
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elements are chained by the eighth word in the element. The Time 
Delay QCB is always the last element in the queue. The purpose of 
this queue is to inform the routine tposting the element when a 
specified time has elapsed. 

TCAM QCB5 

Buffer Disposition OCB - The address of the Buffer Disposition subtask 
(IEDOBD) is the first address in the list pointed to by the 
AVTMSGS field of the AVT. The Buffer Disposition QCB comprises 
the first three words of the routine. The Incoming/Outgoing 
Message Delimiter routine (IEDQA4) tposts the last segment of the 
incoming message to the OCB, and the Line End Appendage routine 
(IGG019R0) tposts the last segment of the outgoing message to the 
OCB to execute the I'NMSG and OUTMSG macro instructions. The Line 
End Appendage routine tposts the 1CB to the QCB when the routine 
reaches the end of the polling list to clean up the line. 

Buffer Reguest QCB - The Buffer Reguest QCB address is located in the 
AVTBFREB field in the AVT. The Receive Schedulers (IGG019R1 and 
IGG019R3) tpost to the QCB ERBs requesting buffers for receiving 
operations . Buffer units are chained from the first word of the 
QCB to form the buffer unit pool. 

Buffer Return QCB - The Buffer Return QCB address is located in the 
AVTBFRTB field in the AVT. Routines which are no longer using 
buffers tpost them to the QCB to be returned to the buffer pool. 

Checkpoint QCB - The Checkpoint QCE address is located in the AVTCKPTE 
field in the AVT. This is a special type of QCB for attached 
tasks, and the QCB is also the STCB,. An ECB is in the second word 
of the QCB. The Checkpoint Executor (IEDQNF) waits on the ECB. 
The TCAM Dispatcher posts the ECB when it puts a request element 
on the chain. The Checkpoint QCB is never tposted to itself,. 
However, when a checkpoint request element is tposted to the QCB, 
the Checkpoint Executor is qiven control. 

Closedown Completion Element QCB - the QCB address is located in the 
AVTCLOSB field in the AVT. The MCF Closedown Processinq routine 
(TEDQCO) and the Checkpoint Notification and Disposition routine 
(TEDQNQ) tpost the QCE to itself to qive control to the Resident 
Closedown Completion routine (TEDQNA) . The QCB is used as an 
element with the lowest priority of any element in the system. It 
is the only element ever tposted to the QCB, 

CPB Cleanup OCE - The address of the CPB Cleanup QCB is located in the 
AVTCPBCB field in the AVT. The Disk End Appendage (IGG019R2) , 
upon completion of an T/0 operation, chains the completed CPBs on 
the AVTDKAPQ queue and tposts the QCE to itself to activate the 
CPB Cleanup routine (IEDQFQ) in CPB Initialization (IEDQFA) * 

Cutoff QCB - The Cutoff QCB is located within the Cutoff routine 
(TEDOAU) . The Cutoff routine places the address of the QCB in the 
first word of the LCB. Line End Appendage (IGG019R0) tposts the 
LCB beinq cutoff to the QCB when a channel proqram check occurs or 
when the read skip or write break sequence initiated by the Cutoff 
routine completes. 
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Delete from Time Delay QCB - The address of the Delete from Time Delay 
QCB is in the AVTCPFMB field cf the AVT. Attached tasks tpost a 
special four-word element to this CCB. The element defines 
another element and requests the Time Delay subtask (entry point 
TEDQHG03) to search the time delay queue for a particular element. 
If the Time Delay subtask finds the element on the time delay 
queue, it removes that element. After this process, the subtask 
tposts the four-word element tack to the requestor to indicate the 
completion of the request. 

Destination QCB - A pointer to a specific Destination QCB is in each 
Terminal entry. This pointer does not chanqe, but, as messaqes 
are received or sent, the SCB points to the Destination QCB 
involved. For dial or buffered terminals, the Time Delay subtask 
(IEDOHG) tposts the OCE to itself at the end of a time delay. 
Routines tpost full buffers to be queued to the Destination QCB. 
The Destination Scheduler (IEDQHM) is always the last subtask 
represented on the STCB chain of a Destination QCB,. A Destination 
CCB is made up of a master QCB, which contains the Send Scheduler 
STCB for this QCB and other information pertinent to the entire 
QCB; and one or more priority level QCBs, which' contain all the 
queuinq pointers for messaqes for the particular priority level. 

Disk I/O QCB - The Disk I/O QCB address is located in the AVTDSIQB 
field in the AVT. Buffers requestinq a write on disk or the 
servicinq of a bit are tposted to the Disk I/O QCB for processing 
by CPB Initialization. The schedulers tpost to this QCB EBBs 
requestinq full buffers to send. 

Loq Destination QCB - There is a pointer to a Log Destination QCB in 
every loqtype Terminal Table entry. When a loq messaqe is 
specified, a IOGTYPE macro must be specified in the Terminal Table 
to qenerate a terminal entry, an LCB, and an SCB. The Loq Message 
routine (IEDQEY) tposts a duplicate header to the Log Destination 
QCB after the complete messaqe is received or sent. 

Master QCB - The basic format of a Destination QCB T This QCE contains 
ten words cf destination-specific data. 

Multiple Boutinq QCB - The Multiple Boutinq QCB. is in the list of VCON 
pointed to by the AVTMSGS field in the AVT. The FQBWABD parameter 
list has the index to it. Elements chained on the QCB are either 
TEDQFA recalled buffers or the IEDQEA EBB for the line, 

On-Line Test QCE - The address of the On-Line Test QCB is in the 
AVTOLTQB field of the AVT. Test request messages (messages 
requestinq TOTE to run an on-line test through TCAM) are tposted 
to this OCE. 

Operator Control OCB - The address of the Operator Control QCB is 
located in the AVTOPCOB field in the AVT,. This is a special QCB 
for attached tasks, and the second word of the QCE is an ECB. 
When the Dispatcher receives an element for this QCB at the top of 
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the ready queue, the ECB is posted complete.. The Translation Test 
routine (TEDQA3) tposts buffers containinq operator commands to 
the QCB. The Application Proqram/Operator Control Interface 
routine (IEDQNB) tposts dummy CIBs from application proqrams to 
the QCB. The Buffer Manaqement module-Buffer Request routine 
(TEDOGA) tposts dummy ERBs containinq requested buffers to the 
OCB. The Stop Line I/O subtask (IEDQHK) tposts stopped LCBs to 
the Operator Ccntrcl QCB. 

PCB QCB - The PCE QCB is located in words 2 throuqh 4 of the PCB. 

This QCB is used in support of QTAH compatible RETRIEVE. The 

Dispatcher dispatches the Retrieve Scheduler (IEDQE7) from this 
QCB. The element chain contains retrieved buffers. 

Priority QCB - Priority QCBs follow the Master QCB and are loqically 
a part of the Master Destination OCB. IEDQHM queues messaqes on 
one of the Priority QCBs that is associated with the Master 
Destination <5CB to which the messaqe was tposted. The Send 
Scheduler (IGG019R4) sends messaqes queued on the hiqhest Priority 
OCB first. 

^ut Process QCB - The address of the Put Process QCE is in a process 
entry in the Terminal Table. This QCB provides compatability and 
symmetry so that all terminal entries will look alike to TCAM 
modules. 

QCB for TEDOBD02 - The QCB is located within the IEDQED02 Buffer 
Disposition subtask (IEDQBD02 entry point),. The subtask (IEDQBD) 
tposts the LCB to this QCB when an INMSG/OUTMSG subqroup has been 
executed. 

Read- ahead OCB - The address of the Read-ahead QCB is in the DEBQCEAD 
field of the application proqram data extent blcck r the location 
of which is within the process entry work area PERAQCB. The 
element chain contains buffers processed by the application 
proqram output messaqe handler, but not processed by the GET/READ 
loqic. The Dispatcher uses this QCB to dispatch the Get Scheduler 
(IEDOEW) . 

Recall QCB - The address of this QCB is in the 1CBRCQCB field of the 

LCB. This is a pointer to the QCB of the subtask wishinq control 

to be passed to it with a recalled buffer. The ERE is tposted to 
the QCB indicated in LCERCQCB. 

STARTMH QCB - The address of the STARTMH QCE is in the DCBMH field of 
the DCB for the line qroup. Buffers are tposted to this QCB by 
Line End Appendaqe and. PCI Appendaqe on input when they are 
filled. On output, the buffers are tposted to the QCB by Line End 
Appendaqe after a positive response to addressinq f When buffers 
are tposted to the QCB, IEDQAA receives control unless EOB 
checkinq is requested, in which case IEDQBT receives control. 

QCB for the Stop Line I/O subtask - The address of this QCE is in the 
AVTHK field in the AVT. The Stop Line routine (IEDQCK) tposts 
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stop line requests to this OCE. The various schedulers tpost LCBs 
to it. 

System Delay QCB - The System Delay QCB is located in the first three 
words of the System Delay subtask (IEDQHI) . The address of the 
subtask is in the AVTHI field of the AVT. The System Delay 
subtask tposts the QCB to the Time Delay subtask (IEDQHG) to start 
a wait. At the end of the wait, the Time Delay subtask tposts the 
OCB to itself to activate the System Delay subtask,. 

Time Delay QCB - The Time Delay QCB is the last element on the time 
delay queue. The AQCTL SVC 102 routine . (IGC102) tposts the QCB to 
itself as a result of the STTMEB exit routine. This QCE is used 
by the STTMER exit routine to activate the Time Delay subtask 
(IEDOHG) . 

TSTtfPUT OCB - The address of this QCB is in the AVTTSOPT field of the 
AVT. The QCB is tposted to the TSINPT3T routine (IEDAYI) to remove 
the system WATT and unlock the keyboard. 
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APPENDIX C. IIST OF RELATIVE PROBITIES IB TCAM 



TCAM routines apply relative priorities tc elements throuqh the use of 
the TPBIOP macro. The names and values presented in this table are 
established by this internal macro- 



Name 
PRITNTRQ 



Value 



Use in an ERB 



E4 to request full buffers 
from Disk I/O 



Routines Using 

Send Scheduler 
Receive Scheduler 
Get Scheduler 
Put Scheduler 
Create an Error Messaqe 
Routine 



PRIESPCI E8 to request empty buffers 

from Buffer Request QCB; 
to request full buffers 
from Disk I/O 

PRISBPCI EO to request empty buffers 

from Buffer Request QCB; 
to request full buffers 
from Disk I/O 

PRIDSKRQ EC to request an empty unit 

by chaining the ERB on 
the Buffer Return QCB 

PRIACTTV 1H in tpostinq ERB to the 

Activate QCB to request 
buildinq of an initial 
contact proqram and 
EXCP for the line 



PCI Appendage-on first 

PCI only 
Multiple Routinq 

Subtask 

PCI Appendage-all 

PCIs except the 
first 



CPB Cleanup 



CPB Cleanup 
Buffer Request 
Buffer Return 



PRIDKEOB EO to enable EOB tc recall; 

to tpost to EOB Handlinq 
after an EOB error; must 
be lower priority than 
PRIMHEER 



CPB Cleanup 

CPB Initialization 



PRTRECAL EO to request from Disk I/O 

a copy of the header 



PRIRCQCB EO to return the ERB tc any 

routine specified in 
ICBRCQCB 



All routines request- 

inq recalled headers 
Multiple Routing Subtask 

CPB Cleanup - after 

recall 
Create an Error Message 

Routine 
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t>PTAPEPF DO 
^PIEPTSP EO 



PRTMHEER E4 



PPIUPEQ E8 



PPTAPEEP 



PPTLNEND 



PPTPCBFP 



PPTE^PTB 



DC 



E4 



EO 



E4 



PPTDSKBE EC 



PPICOPY EO 



PRIDESTO E4 



to request full buffers 

to tpost EPB to itself 
on send operations when 
an error occurs before 
EOW ; must be lower 
than PRIMHEEP 

to have a buffer pro- 
cessed by MH 



to request an empty 
unit for insert 
function in MH; roust 
be hiqher than 

PPTMHPFR 

to tpost a buffer to 
an application program 

to have Buffer Dis- 
position finish pro- 
cessing macros and 
cleanup the line 

to return a duplicate 
header to a specified 
routine 

to return a buffer or 
unit to the buffer unit 
pool 



to qive a unit to 
CPB Cleanup 

to have a messaqe 
copied to a different 
data set 

to put a buffer on a 
messaqe queue 



Application Program 
Buffer Disposition 



PCI Appendage 

CPB cleanup 

line End Appendage- 
receiver last 
buffer only 

Unit Reguest 



^PIDKWRT E4 



to have a full buffer 
written en disk 



Incoming/Outgoing Message 
-Delimiter Routine 

line End Appendage- 
send, last 
buffer only 



CPB Cleanup 
Destination Scheduler 



Incoming/Outgoing Message 

Delimiter Routine 
PCI Appendage 
CPB Cleanup 
Destination Scheduler 
Multiple Pouting Subtask 

Euffer Return 



Destination Scheduler 



Incoming/Outgoing Message 

Delimiter Routine 
Multiple Routing Subtask 
Create an Error Message 
Routine 

Destination Scheduler 
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PPTDKSRV EC to have a messaqe 

flaqqed serviced 



Buffer Cleanup 



PRItKCNC EO to have a messaqe 

canceled in the 
messaqe queue 

PRTDKINT EO to have a messaqe 

intercepted 



Cancel Messaqe 



Hold/Release Terminal 
Routine 



^RICKPLN EC to tpost the LCB to 

Checkpoint requestinq 
a checkpoint 



Buffer Disposition 



PPTMULTR EO to tpost the LCB to 

the Multiple Pouter 
routine to continue 



Buffer Disposition 

TIIST 



PPTOPCTI DC to tpost an operator 

control buffer 



Messaqe Handlinq Routine 
Operator Control 

Interface Routine 



PRIDSPLB E4 to tpost last buffer 

of messaqe to Buffer 
Disposition QCB; must be 
lower than any PCI tpost 
of an ERB 



Incominq/Outqoinq 

Messaqe Delimiter 
Routine 



PPI0N1T DC to request On-line 

Test 



STARTMH Subtask 



PRILAEND E4 to start error pro- 
cess in q 



line End Appendaqe 



PRIMHUNT E8 to tpost a unit to 

MB: must be qreater 
than PRIMHEFP 



Unit Request 



P^TRELSE 



PPTCPBCL 



PRTCKPT 



PRTLflERE 



EO 



E8 



DC 



E8 



to release a subtask 
from Time Delay or 
Operator Control 

to Post CPB Cleanup 
complete 

to request a complete 
checkpoint 



to free a line; must qet 
to Destination Scheduler 
before line is free 



Operator Control 
Hold/Release Terminal 



Disk End Appendaqe 



Reusability-Copy subtask 

MCPCLOSE 

Time Delay subtask 

Buffer Disposition 
Put Scheduler 
Send Scheduler 
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^PXCLSDN 10 to request closedown; 

must be lowest 
priority 

PFTAPCKP DC to request an incident 

checkpoint 

^FIO^CKP DC to request an incident 

checkpoint 

PPIL^CL EC to clean up buffers and 

to free a line 



Application Proqram 



Operator Control 



Line End Appendaqe 



^PTLOGLB 



E0 



to tpost a line to 
Buffer Disposition 

to tpost the LOG LCi 
to itself 



INEND 
OUTEND 

LOG Scheduler 



PPISSOL^ DC tposted to Operator 

Control to request 
Start line/Stop line 
to return an element 
from the time delay 
queue 



On-Line Test 
Time Delay 



D PTATTN DC to tpost the attention 

element for local 
devices 



Attention Handler 



PPISYSDL 
PPTLCBDL 



DC 
20 



to initiate system delay Operator Control 



to indicate to 

Environment Checkpoint 

that an LCB is 

on the System Delay 

queue 

to Destination 



System Delay Subtask 
Environment Checkpoint 

Routine 
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Appendix D: TCAM CHANNEL PROGRAMS AND TP OPERATION CODES 



The format of the TCAM channel command word (CCW) is as follows 



Offset 78 



31 



Command 
Code 


Data Address 


32 36 37 39 40 47 48 


63 


Flags 


000 


Reserved 


Count 



The TCAM Channel programs are qenerated by 10 Generator Module 

(TEDOKA) . Channel programs are listed by operation types within 

communication line types. The description of each channel program 

beqins with a qraphic representation of the model channel program 

accordinq to the following cateqories: 

1. Operation - The command code with a brief description of the 
information that is being transferred. 

2. Address - The data address that is set in the CCW before 
execution. 

Buffer refers to the buffer CCW address. 

^able refers to the appropriate location in the Special 
Characters Table. 

List refers to the applicable invitation or addressing list 
entry. 

LCB refers to the Line Control Block. 

Entry refers to addressinq characters, dial digits, etc., in a 
terminal entry. 
-' Idles refers to an idles loop that is used to process data. 

3. "Flags - The flags that are set in the generated CCW are: Chain 
Command (CC) , Chain Data (CD) , and Suppress Length Indication 
(SLT) . 

4. Count - The data count that is set in the generated CCW before 
execution. 
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A Tp OP code differentiates amonq the types of CCWs on which 
interrupts can cccur. In TCAM, the Activate-I/O Generator subtask 
builds a strinq of Tp OP codes for any qiven channel program in the 
LCB. There is one Tp OP Code for each CCW. These codes are retrieved 
and used by Line End Appendaqe. An even-valued Tp OP code represents 
a text or non-text CCW for which an interrupt is anticipated. An odd- 
valued Tp OP code represents a CCW for which no interrupt is 
anticipated. The followinq is a list of the TCAM Tp OP codes: 

Description 

Write EOT For SELECTION 

Open TP OP Code 

Write Pollinq Characters 

Read Response to Pollinq 

Write Pads 

Enable on Dial Line 

Write Addressinq Sequence 

Read Response to Addressinq 

Write EOA Sequence 

Read Response to EOB/ETB 

Write CPU ID 

Read ENQ 

Write ENQ 

Read Response to ENQ 

Write DLE EOT 

Read ID 

Non Read Write CCW's for 
which no Interrupt is 
anticipated 

WRITE EREAK TP-CD 

WRITE ENQ after Selection Response 

Read LCOUT 

Write Response Prior to Text 



Name 


Valu 


TPWREOT 


X 


01 


TPOPEN 


X 


•02 


TPWRPOLL 


X 


'03 


TPRDRFSP 


X 


'04 


TPWRPAD 


X 


'05 


T'PENAELE 


X 


'06 


TPWRAD 


X 


'07 


TPRDRSPD 


X 


'08 


TPWREOA 


X 


'09 


TPRDRPEE 


X 


0A 


TPWRCPU 


X 


'0B 


TPRDENQ 


X 


'0C 


^PWRENQ 


X' 


0D 


TPRSPENO 


X; 


;0E 


TPWRDLET 


X' 


OF 


TPRDID 


X" 


10 


TPNULL 


X 


•11 



^PBREAK 
TPENQAD 
TPRDLC 
TPWRACK 



12 
13 

14 
15 
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Write Response 

Write Tone WTTA BSC 

BSC Head ID ENC 

BSC Read ID ACK 

Abort for Send/Receive 

Read TWX ID 

Buffered Terminal Reset after Block 

Close SDR Recordinq 

Write Reset after Selection 

Read Skip Loop 

Write Idles Loop 

Write DLE STX 

Write DLE ETB (ETX) 

Write ENQ in Response to Text 

Text CCW 
The first two CCWs in Read Initial channel proqrams are the following: 

Operation Address Flaqs Tp Code Count 

A Read Skip CC r SLI 51 1 



TPWRAKNK 


X 


16« . 


TPWRTONE 


X 


»17« . 


TPRDIDNO 


X 


»18« . 


TPRDIDAK 


X 


MA» . 


TPRESET 


X 


»1C« . 


TPTWXID 


X' 


1E' . 


TPBUFEOT 


X 


•20« . 


*PCLOSE 


X 


•22' . 


TPRSPAD 


X' 


24* . 


TPRDSKIP 


X 


■51» . 


TPWRIDLE 


X 1 


53« . 


TPDLESTX 


X' 


57« . 


TPDLEETX 


X 


■59« . 


TPENQRSP 


X 


5E« . 


TPTEXT 


X 


FF 1 . 



Read 
TIC 



Skip 
A 



These CCWs are executed whenever a buffer is not available. The 
initial contact CCWs are constructed in the channel program area plus 
16 (3rd CCW) . 

When an idle character is defined for a device, the first two CCWs in 
Write Initial channel programs are the followinq: 



Operation 

Write 
TIC 



Address Flaqs 

Idles CC,SLI 
A 



Tp Code Count 
53 3 
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CHANNEL PROGRAMS FOR THE AT&T 83B3 SELECTIVE CALLING STATION LINES 

?ead Initial Channel Program 

Operation Address Flaqs Tp Code Count 

Write EOT sequence Table CC r SLI 01 

Write pollinq List CC,SLI 03 

characters 

Read response Buffer CD,SLI 04 2 

TTC Buffer 



^he read initial channel proqram places the line in control mode by 
sendinq the EOT seauence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendage finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Write Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write EOT sequence Table CC/SLI 01 3 

Write addressinq T entry CC,SLI C7 2 

characters 

Read response LCB 08 9 

Write EOA sequence Table CD 09 

TTC Idles 

The write initial channel proqram places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outqoinq 
MP. Pestart is made at the write EOA sequence, which TICs to the 
idles loop and from there writes data. 



CHANNEL PROGRAMS FOR WESTERN ONION PLAN 115A OUTSTATION 



Read Initial Channel Proqram 



Operation 


Address 


Flaqs 


Tp 


Code 


Count 


Write EOT sequence 


Table 


CC,SLI 


07 




3 


Write pollinq 


List 


CC,SLI 


03 






characters 










2 


Read response 


Buffer 


CD,SLI 


04 




2 


TIC 


Buffer 
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The read initial channel proqram places the line in control mode by 
sendinq the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaininq to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendaqe finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCws. 

Write Initial Channel Prcqram 

Count 



Operation 


Address 


Elaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


01 




3 


Write addressinq 


T entry 


CC,SLI 


07 




2 


characters 












Read response 


LCB 




08 




9 


Write EOA sequence 


Table 


CD 


09 




4 


TIC 


Idles 











The write initial channel proqram places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outqoinq 
MH. Restart is made at the write EOA sequence, which TICs to the 
idles loop and from there writes data. 



CHANNEL PROGRAMS EOB IBM 1030 LINES 

Bead Initial Channel Program 

Operation Address Flaqs Tp Code Count 

Write EOT sequence Table CC,SLI 01 3 

Write pollinq List CC,SLI 03 1 

characters 

Head response Buffer CD,SLI 04 2 

TIC Buffer 

The read initial channel proqram places the line in control mode by 
sendinq the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaininq to 
read the rest of the data until an EOB or ECT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendaqe finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns- control to IOS for execution of the CCWs*. 
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Read Continue Channel Program 

Operation Address Flags Tp Code Count 

Write positive (ACK) Table 16 1 

or negative (NAK) 
response 

The read continue channel program sends a positive or negative 
response to the previous message block to indicate a response from 

TCAM. 

Write Initial Channel Program 

Operation Address Flags Tp Code Count 

Write EOT seguence Table CC r SLI 01 3 

Write addressing T entry CC r SLT 07 2 

characters 

Read response LCB 08 9 

Write EOA seguence Table CD 09 1 

TIC Idles 

The write initial channel program places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outgoing 
MH. Restart is made at the write EOA seguence, which TICs to the 
idles loop and from there writes data. 

Write Continue Channel Program 

Operation Address Flags Tp Code Count 

Read response LCB CC,SLI 0A 9 
TIC Buffer 

The write continue channel program reads the response to the last 
message block. If the response is positive, chaining takes place to 
the next write text command. 



CHANNEL PROGRAMS FOR IBM 1050 LEASED LINES 



Read Initial Channel Program 

Operation Address Flags Tp Code Count 

Write EOT seguence Table CC,SLI 01 3 

Write polling List CC,SLI 03 2 

characters 

Read response Buffer CD,SLI 04 2 

TIC Buffer 
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The read initial channel program places the line in control mode by 
sending the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2, Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data; until an EOB or EOT is received or the count 
is zero. A negative response causes channel end and device end with 
unit exception and wrong length indicated. Line End Appendage finds 
the polling restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Read Continue Channel Program 

Operation Address Flags Tp Code Count 

Write positive or Table CC,SLT 16 1 

negative response 
TIC Buffer 

The read continue channel program writes the appropriate response to 
a block of data and then chains tc read data. 



Write Initial Channel Program 

Count 



Operation 


Address 


Flags 


Tp 


Code 


C 


Write EOT seguence 


Table 


CC,SLI 


01 




3 


Write addressing 


T entry 


CC, SLT 


07 




2 


characters 












Read response 


LCB 




C8 




9 


Write EOA seguence 


Table 


CD 


09 




1 


TIC 


Idles 











The write initial channel program places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outgoing 
MH. Restart is made at the write EOA seguence, which TICs * to the 
idles loop and from there writes data. 

Write Continue Channel Program 

Operation Address Flags Tp Code Count 

Read response LCB CC,SLI 0A 9 
TIC Buffer 

The write continue channel program reads the response to the last 
message block. If the response is positive, chaining takes place to 
the next write text command. 
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Write Conversational Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write EOA Table CD, SLI 09 1 

TIC Idles 

^he write conversational channel proqram writes end-of-address and 
then chains to write data. 



CHANNEL PROGRAMS FOR IBM 1050 DIAL 

p ead Initial Channel Proqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


disable 




CC,SLI 


11 




1 


Enable 




SLI 


06 




1 


Write EOT sequence 




CD 


01 




3 


Write pollinq 


List 


CC,SLI 


03 




2 


characters 


' 










Read response 


Buffer 


CD, SLI 


04 




2 


TIC 


Buffer 











^he read initial channel proqram disables and then enables the line 
adapter so that a remote terminal may dial the CPU. An interrupt is 
taken on the enable so that TCAM can set internal switches. Fifteen 
t>ad characters are sent by the CPU, followed by an EOT sequence; this 
places the terminal in control mode. Two pollinq characters are sent 
and then a read response that specifies a data count of two, with 
wronq lenqth indication net suppressed, while the lenqth of the 
response character is one byte. The effect of this technique is as 
follows: 

1 • Positive response-. The response character and the first byte of 
the messaqe are read under control of the Read Response CCW. This 
reduces the data count to zero and causes data chaininq to take 
Dlace. The second and subsequent bytes of the messaqe are read 
under control of the address and count fields of the Read Data 
CCW. Execution continues in the channel with an interrupt 
occurrinq enly at receipt of an EOB or EOT. 

2- Negative response. This response causes chann-el end and device 
end with unit exception and wronq lenqth record indicated. 

m he read initial channel proqram then transf ers-in-channel (TICs) to 
the address in the buffer CCW to read data. 
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T?ead Continue Channel Prcqram 

Operation Address Flaqs Tp Code Count 

Write positive (ACK) Table CC,SLI 16 .1 

or neqative (NAK) 

response 
TTC Buffer 

The read continue channel proqram sends a positive or neqative 
response to the previous messaqe block and continues readinq data. 

Write Initial Channel Prcqram 

Count 



Operation 


Address 


"Flaqs 


Tp Code 


C 


Disable 




CC,SLI 


11 


1 


Dial 


T entry 


CC,SLI 


11 


X 


Write pad characters 


Table 


CD, SLI 


05 


15 


Write EOT sequence 


Table 


CD,SLI 


01 • 


3 


Write addressinq 


T entry 


CC, SLI 


07 


2 


characters 










Head response to 


LCB 


SLI 


08 


9 


address 










Write EOA 


Table 


CD r SLI 


09 


1 


TIC 


Idles 









The write initial channel proqram disables the line and then dials a 
terminal. When the remote terminal answers, the CPU sends the pad 
characters and the EOT sequence, which places the terminal in control 
mode. The address characters select the component, which responds to 
the addressinq. End-of-address terminates addressinq and then the 
write initial channel prcqram TICs to the idles loop and from there to 
a write data. The X count value depends on the number of dial digits 
specified in the terminal entry. 

Write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Head response LCB CC,SLI 0A 9 
TIC Buffer 

The write continue channel proqram reads the response to the last 
messaqe block. If the response is positive, chaining takes place to 
the next write text command. 
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Write Conversational Channel Program 
Operation 



Address 


Flags 


Tp Code 


Count 


Table 


CD,SLI 


09 


1 


Idles 









Write EOA 
TIC 

The write conversational channel program writes End-<-of-Address 
character and then Tics to a write idles loop to write data. 



CHANNEL PROGRAMS FOR IBM 1060 TERMINALS 



Read Initial Channel Program 



Operation 


Address 


Flags 


Tp 


Code 


C 


Write EOT seguence 


Table 


CC,SLI 


01 




3 


Write polling 


List 


CC,SLI 


03 




2 


characters 












Read response 


Buffer 


CD r SLI 


04 




2 


TIC 


Buffer 











Count 



The read initial channel program places the line in control mode by 
sending the EOT seguence, polls the terminal, and then reads the 
response. The read response command has a data count of 2, Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A negative response causes channel end and device end with 
unit exception and wrong length indicated. Line End Appendage finds 
the polling restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs, 

Read Continue Channel Pr ogram 

Operation Address Flags Tp Code Count 

Write positive (ACK) Table SLI 16 1 
or negative (NAK) 
response 

The read continue channel program sends a positive or negative 
response to the previous message block and continues reading data to 
the previous block. 



1208 



Write Initial Channel Proqram 

Count 



Operation 


Address 


71aqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


01 




3 


Write addressinq 


T entry 


CC,SLI 


07 




2 


characters 












Read response 


ICB 




08 




9 


Write EOA sequence 


Table 


CD 


09 




1 


TIC 


Idles 











The write initial channel proqram places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outqoing 
MH. Restart is made at the write EOA sequence, which TICs to the 
idles loop and from there writes data. 

Write Continue Channel Proqram 

Tp Code Count 
0A 9 

The write continue channel proqram reads the response to the last 
messaqe block. If the response is positive, chaininq takes place to 
the next write text command. 

CHANNEL PROGRAMS FOR IBM 2741 LEASEE 



Operation 


Address 


Elaqs 


Read response 


LCB 


CCSLI 


TIC 


Buffer 





Read Initial Channel 


Proqram 










Operation 


Address 


Flaqs 


TP 


Code 


Count 


Write EOT 


Table 


CC,SLI 


07 




3 


sequence 












Prepare 




CC,SLI 


11 




1 


Sense 


LCB 


CCSLI 


11 




1 


Read response 


Buffer 


CD,SLI 


04 




2 


TIC 


Buffer 











The read initial channel proqram sends a write EOT sequence and then 
prepares the control unit to receive a messaqe from a terminal. The 
sense operation informs. the CPU of the status of the terminal through 
the read response. The read initial channel program then TICs to read 

data. 
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Write Initial Channel Program 

Operation Address Flaqs TP Code Count 

Write EOA sequence Table CB,SLI 09 1 

Write Idle Table CD,SLT 05 15 

characters 

TIC Idles 

'he write initial channel program sends an EOA sequence to set up the 
terminal and writes 15 idle characters on the line. The program then 
^ICs to a write command. 



CHANNEL PROGRAM FOR IBM 2741 DIAL 



Read Initial Channel 


Proqram 


Flaqs 


TP 


Code 




Operation 


Address 


C 


Disable 


LCB 


CC r SLI 


11 




1 


Enable 


LCB 


SLI 


06 




1 


Prepare 


LCB 


CC,SLI 


11 




1 


Sense 


LCB 


CC,SLI 


11 




1 


Read response 


Buffer 


CD, SLI 


04 




2 


TIC 


Buffer 











Count 



T'he read initial channel proqram disables and then enables the line to 
receive a call. TCAM takes an interrupt on the enable to set internal 
switches. The prepare command conditions the control unit to receive 
a messaqe. Read response reads the response from the terminal and 
then chains to read data via the TIC. 

Note: The write initial channel proqram for 2741 Dial is the same as 
for 2741 Leased. TCAM, however, does not dial a 2741; the user calls 
to establish the connection. 



CHANNEL PROGRAMS FOR IBM 2740 COMMUNICATION LINES 



IBM 2740 BASIC CHANNEL PROGRAM 
Read Initial Channel Proqram 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


07 




3 


Prepare 




CC,SLI 


11 




1 


Sense 


LCB 


CC,SLI 


11 




1 


Read response 


Buffer 


CD, SLI 


04 




2 


TIC 


Buffer 
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Count 



The read initial channel program sends a write EOT sequence and then 
prepares the control unit to receive a message from a terminal. The 
sense operation informs the CPU of the status of the terminal through 
the read response. The read initial program then TICs to read data. 

Write Initial Channel Program 

Operation Address "Flags Tp Code Count 



Write EOT seguence 


Table 


CD r SLT 


01 


3 


Write EOA seguence 


Table 


CD r SLI 


09 


1 


Write idle 


Table 


CD,SLI 


05 


15 


characters 










TIC 


Idles 









The write initial channel program sends an EOT and EOA seguence for 
setting up the terminal. It then writes 15 idle characters and 
transfers-in-channel to a write command. 



IBM 2740 WITH CHECKING 

T^ead Initial Channel Program 

Count 



Operation 


Address 


Flags 


Tp 


Code 


C 


Write EOT seguence 


Table 


C'CS.LI 


01 




3 


Prepare 




CC,SLI 


11 




1 


Sense 


LCB 


CC r SLI 


11 




1 


Bead response 


Buffer 


CD,SLI 


04 




2 


TIC 


Buffer 











The read initial channel program sends a write EOT seguence, then 
prepares the control unit to receive a message from a terminal. The 
sense operation informs. the CPU of the status of the terminal through 
the read response. The read initial program then TICs to read data. 

Head Continue Channel Program 

Operation Address Flags Tp Code Count 

Write circle Y or Table CC,SLI 16 1 

circle N 
TIC Buffer 

^he read continue channel program is initiated after a read initial 
operation. The proqram writes the response character and then TICs to 
read data. 
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write Initial Channel Program 

Operation Address Flaqs Tp Code Count 

Write EOT sequence Table CD,SLI 01 3 

Write EOA sequence Table CD, SLI 09 1 

Write idle Table CD, SLI 05 15 

characters 

TIC Idles 

*he write initial channel proqram sends an EOT and EOA sequence for 
settinq up the terminal. It then writes 15 idle characters and 
transfers-in-channel to a write command. 

Write Continue Channel Proqra m 

Operation Address Flaqs Tp Code Count 

Read response LCB CC r SLI 0A 9 
TIC Buffer 

The write continue channel proqram reads the response after a write 
initial operation and then TICs to a write text command in the buffer. 

Write Conversational Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write EOA Table CD,SLI 09 1 

TIC Idles 

^he write conversational channel proqram writes End-of-Address 
character and then TICs to a write idles loop to write data. 



IBM 2740 WITH DIM 

Fead Initial Channel Proqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Disable 




V»- V— f. O Li i. 


11 




1 


Enable 




SLI 


06 




1 


Prepare 




CC,SLI 


11 




1 


Sense 


ICB 


CC,SLT 


11 




1 


Head response 


Buffer 


CD, SLI 


04 




2 


TIC 


Buffer 











The read initial channel proqram disables and then enables the line to 
receive a call. TCAM takes an interrupt on the enable to set internal 
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switches. The prepare command conditions the control unit to receive 
a messaae. Head response reads the response from the terminal and 
then chains to read data via the TIC. 



write Initial Channel Prcqram 



Operation 



Address Elaqs 



Disable 

Dial T entry 

Write pad characters Table 
Write EOT sequence Table 
Write EOA pins idles Table 
TIC Idles 



CC,SLI 


11 


CC, SLI 


11 


CD,SLI 


05 


CD, SLI 


01 


CD r SLI 


09 



Tp Code Count 



1 
X 

15 

3 

16 



^he write initial channel proqram disables the line and then dials the 
specified terminal. The channel proqram sends 15 pad characters 
before the EOT sequence. An EOA character plus 15 idle characters are 
sent and then the proqram TICs to write text. The X count, value 
depends on the number of dial characters specified in the terminal 
entry. 



TBN 2740 WITH DIAI AND CHECKING 



Fead Initial Channel Proqram 



Operation 


Address 


Flaqs 


Tp Code 


C 


Disable 




CC,SLI 


11 


1 


Enable 




SLI 


06 


1 


Prepare 




CC r SLI 


11 


1 


Sense 


LCB 


CC,SLI 


11 


1 


Head response 


Buffer 


CD r SLI 


04 


2 


TIC 


Buffer 









Count 



The read initial channel proqram disables and then enables the line to 
receive* a call. The prepare command conditions the control unit to 
receive a messaqe. Pead response reads the terminal's response and 
then chains to read data via the TIC. 



Write Initial Channel Prcqram 



Operation 



Address Flaqs 



Disable CC,SLI 

Dial T entry CC r SLI 

Write pad characters Table CD, SLI 

write EOT sequence Table CD, SLI 

Write EOA plus idles Table CD, SLI 
TIC Idles 



Tp Code Count 



11 
11 

05 
01 
09 



1 
X 

15 
3 

16 
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The write initial channel program disables the line and then dials the 
specified terminal. The channel program sends 15 pad characters 
before the EOT sequence. An EOA character plus 15 idle characters are 
sent and then the program TICs to write text. X represents the number 
of dial digits for the terminal. 



TB*! ?740 WITH DIAI AND TEANSMTT CCNTHOL 

^ead Initial Channel Program 

Count 



Operation 


Address 


Flags 


Tp Code 


C 


Disable 




CC,SLI 


11 


1 


Enable 




SLI 


C6 


1 


Write EOT sequence 




CD 


01 


3 


Write polling 


List 


CC, SLI 


03 


2 


characters 










^ead response 


Buffer 


CD r SLI 


04 


2 


TTC 


Buffer 









The read initial channel program disables and then enables the line 
adapter so that a remote terminal may dial the CPU. After the enable 
TCAW waits for an interrupt from the terminal, after which the channel 
program resumes. Fifteen pad characters are sent by the CPU, followed 
by an EOT seguence; this places the terminal in control mode. Two 
polling characters are sent and then a read response that specifies a 
data count of two. The effect of this technigue is as follows: 

1« Positive response. The response character and the first byte of 
the message are read under control of the Pead Response CCW. This 
reduces the data count to zero and causes data chaining to take 
place. The second and subseguent bytes of the message are read 
under control of the address and count fields of the Eead Data 
CCW. Execution continues in the channel with an interrupt 
occurrinq cnly at receipt of an EOB or EOT. 

2- Negative response. This response causes channel end and device 
end with unit exception and wrong length record indicated. 

The read initial channel program then transf ers-in-channel (TICs) to 
the address in the buffer CCW to read data. 

write Initial Channel Program 

Operation Address Flags Tp Code Count 

Disable CC,SLI 11 1 

Dial T entry CC r SLI 11 X 

Write pad characters Table CD, SLI 05 15 

Write EOT seguence Table CD, SLI 01 3 

Write EOA plus idles Table CD, SLI 09 16 
.TTC Idles 
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The write initial channel proqram disables the line and then dials the 
specified terminal. The channel proqram sends 15 pad characters 
before the EOT sequence. An EOA character plus 15 idle characters are 
sent and then the proqram TICs to write text. X represents the number 
of dial diqits for the terminal. 



IBM 2740 WITH DIAL, TRANSMIT CONTROL, AND CHECKING 

^ead Initial Channel P roqram 

Operation Address Elaqs Tp Code Count 

Disable CC,SLI 11 1 

Enable SLI 06 1 

Write EOT sequence CD 01 3 

Write pollinq List CC r SLI 03 2 

characters 

Read response Euffer CD, SLI 04 2 

TIC Buffer 

The read initial channel proqram disables and then enables the line 
adapter so that a remote terminal may dial the CPU t After the enable, 
TCAM waits for an interrupt from the terminal, after which the channel 
proqram resumes. Fifteen pad characters are sent by the CPU, followed 
by an EOT sequence; this places the terminal in control mode. Two 
pollinq characters are sent and then a read response that specifies a 
data count of two. The effect of this technique is as follows: 

1 • Positive response. The response character and the first byte of 
the messaqe are read under control of the Read Response CCW. This 
reduces the data count to zero and causes data chaininq to take 
place. The second and subsequent bytes of the messaqe are read 
under control of the address and count fields of the Read Data 
CCW. Execution continues in the channel with an interrupt 
occurrinq only at receipt of an EOB or EOT. 

2. Negative response. This response causes channel end and device 
end with unit exception and wrcnq lenqth record indicated. 

The read initial channel proqram then transf ers-in-channel (TICs) to 

the address in the buffer CCW to read data. 

Write Initial Channel Proqram 

Count 



Operation 






Address 


Elaqs 


Tp 


Code 


C 


Disable 








CC,SLI 


11 




1 


Dial 






T entry 


CC,SLI 


11 




X 


Write pad 


characters 


Table 


CD, SLI 


05 




15 


Write EOT 


sequence 


Table 


CD, SLI 


01 




3 


Write EOA 


plus 


idles 


Table 


CD, SLI 


09 




16 


TIC 






Idles 
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The write initial channel program disables the line and then dials the 
specified terminal. The channel program sends 15 pad characters 
before the EOT sequence. An EOA character plus 15 idle characters are 
sent and then the proqram TICs to write text. X represents the number 
of dial digits for the terminal. 



TBH 2740 (DIAL WITH A CONNECTION) 

Read Initial Channel Program 

Operation Address Flags Tp Code Count 

Write EOT sequence Table CC,SLI 01 3 

Prepare CC,SLT 11 1 

Sense XCB CC,SLI 11 1 

Read response Buffer CD, SIT 04 2 

TIC Buffer 

The read initial channel program sends a write EOT sequence, then 
prepares the control unit to receive a messaqe from a terminal. The 
sense operation informs the CPU the status of the terminal through the 
read response. The read initial program then TICs to read data. 

write Initial Channel Program 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CD,SLT 


01 




3 


Write EOA sequence 


Table 


CD,SLI 


09 




1 


Write idle 


Table 


CD, SIT 


05 




15 


characters 












T TC 


Idles 


- 









The write initial channel proqram sends an EOT and EOA sequence for 
settinq up the terminal. It then writes 15 idle characters and 
transfers-in-channel to a write command. 



IBM 2740 WITH CHECKING (DIAL WITH A CONNECTION) 

Read Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write EOT' sequence Table CC,SLI 

Prepare CC,SLT 

Sense ICB CC,SLI 

Read response Buffer CD,SLI 

TIC Buffer 
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11 


3 


11 


1 


11 


1 


04 


2 



The read initial channel program sends a write EOT sequence, then 
prepares the control unit to receive a messaqe from a terminal. The 
sense operation informs the CPU the status of the terminal throuqh the 
read response. The read initial proqram then TICs to read data. 

Write Initial Channel Program 

Operation Address Flaqs Tp Code Count 



Address 


Flaqs 


Tp Code 


C 


Table 


CD, SLI 


01 


3 


Table 


CD, SLI 


09 


1 


Table 


CD, SLI 


05 


15 



Write "EOT sequence 
Write EOA sequence 
Write idle 

characters 
TIC Idles 

The write initial channel proqram sends an EOT and^EOA sequence for 
settinq up the terminal. It then writes 15 idle characters and 
transfers-in-channel to a write command. 



IBM 2740 WITH STATION CONTROL 

*?ead Initial Channel Proqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


01 




3 


Write pollina 


List 


CC,SLI 


03 




2 


characters 












Read response 


Buffer 


CD, SLI 


04 




2 


TIC 


Buffer 











The read initial channel proqram places the line in control mode by 
sendinq the EOT sequence, polls the terminal, . and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendage finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Write Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write EOT sequence Table CC,SLI 01 3 

Write addressinq T entry CC,SLI 07 2 

characters 

Read response LCB 08 9 

Write EOA sequence Table CD 09 1 

TIC Idles 
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The write initial channel proqram places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outqoing 
mh. Restart is made at the write EOA sequence, which TICs to the 
idles loop and from there writes data. 



IBM 2740 WITH STATION CONTROL AND CHECKING 



Read Initial Channel Proqram 

Operation Address Elaqs Tp Code Count 

Write EOT sequence Table CC,SLI 01 3 

Write pollinq List CC,SLI 03 2 

characters 

Read response Buffer CD, SLI 04 2 

TIC Buffer 

The read initial channel proqram places the line in control mode, by 
sendinq the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaininq to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendaqe finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Write Initial Channel Proqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


01 




3 


Write addressinq 


T entry 


CC,SLI 


07 




2 


characters 












Read response 


LCE 




08 




9 


Write EOA sequence 


Table 


CD 


09 




1 


TIC 


Idles 











The write initial channel proqram places the line in control mode, 
addresses a terminal, and reads the response. An interrupt is taken 
on the read response, after which buffers are tposted to the outqoinq 
*H. Restart is made at the write EOA sequence, which TICs to the 
idles loop and from there writes data. 
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IBM 2740 WITH TRANSMIT CONTROL ■ (DIAL WITH A CONNECTION) 
Read Initial Channel Proqram 



Operation 


Address 


Flags 


Tp 


Code 


C 


Write F/OT sequence 


Table 


CC r SLI 


01 




3 


Write polling 


List 


CC,SLI 


03 




2 


characters 












Read response 


Buffer 


CD,SLI 


04 




2 


TIC 


Buffer 











Count 



The read initial channel proqram places the line in control mode by 
sendinq the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendage finds 
the pollinq restart Tp cede, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 



Write Initial Channel Proqram 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLT 


01 




3 


Write EOA sequence 


Table 


CD,SLI 


09 




1 


Write idle 


Table 


CT,SLI 


05 




15 


characters 












TIC 


Idles 











Count 



The write initial channel proqram sends an EOT and EOA sequence for 
settinq up the terminal. It then writes 15 idle characters and TICs 
to a write command. 



IBM 2740 WITH TRANSMIT CONTROL AND CHECKING (DIAL WITH A CONNECTION) 

Read Initial Channel Pro qram 

Operation Address Elaqs Tp Code Count 

Write EOT sequence Table CC,SLI 01 3 

Write polling List CC,SLT 03 2 

characters 

Read response Buffer CD,SLI 04 2 

Tic Buffer 
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The read initial c 
sending the EOT seque 
response- The read 
when there is a one-b 
by data. This redu 
read the rest of the 
is zero. A negative 
unit exception and 
the polling restart T 
polled, and returns c 



hannel progr 
nee, polls 
response 
yte positive 
ces the conn 
data until a 
response cau 
wrong length 
p code, rein 
ontrol to 10 



am places the line in control mode by 
the terminal, and then reads the 
command has a data count of 2. Thus, 

response, the response is followed 
t to zero and causes data chaining to 
n EOB or EOT is received or the count 
ses channel end and device end with 

indicated. Line End Appendage finds 
itializes for the next terminal to be 
S for execution of the CCWs. 



..Write Initial Channel Program 



Operation 




Address 


Flags 


Tp 


Code 


Count 


Write EOT 


sequence 


Table 


CCSLI 


01 




3 


Write EOA 


sequence 


Table 


CD 


09 






TIC 




Idles 











^he write initial channel program places the line in control mode. 
The program then issues the write EOA sequence, TICs to the idles 
loop, and from there writes data. 



CHANNEL PBOGBAMS FOB WOBLD TBADE TELEGRAPH 



Bead Initial Channel Proqram 



Operation 



Address Flaqs 



Tp Code Count 



Prepare 

Sense 

Bead response 

TIC 



LCB 

Buffer 

Buffer 



CCSLI 
CC,SLT 
CD,SLI 



11 
11 
04 



The read initial channel proqram prepares the control unit to receive 
a message from a terminal. The sense operation informs the CPU of the 
status of the terminal throuqh the read response. The read initial 
proqram then TICs to a read text cemmand in the buffer. 



Write Initial Channel Proqram 



Operation 


Address 


Flags 


Tp 


Code 


C 


Write EOT sequence 


Table 


CD,SLI 


01 




3 


Write mark 


Table 


CD,SLI 


05 




21 


characters 












Write 


WBU 


CCSLI 


07 




1 


Bead response 


LCB 




08 




24 


Write EOA sequence 


Table 




09 




1 


TIC 


Idles 











Count 
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^he write initial channel program writes an EOT sequence, sends 21 
mark characters to condition the line, and writes a WRU on the line, 
and reads the response. An interrupt is taken on the read response, 
after which the buffers are tposted to outqoing MH. Restart is at the 
Write EOA sequence, which TTCs to the idles loop and writes data. 



IBM 2260 REMOTE CHANNEL PROGRAMS 



Read Initial Channel Program 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Write EOT sequence 


Table 


CC,SLI 


01 




3 


Write pollinq 


List 


CC,SLI 


03 




3 


characters 












Read response 


Buffer 


CD,SLI 


04 




2 


TIC 


Buffer 











Count 



The read initial channel proqram places the line in control mode by 
sendinq the EOT sequence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. Thus, 
when there is a one-byte positive response, the response is followed 
by data. This reduces the count to zero and causes data chaining to 
read the rest of the data until an EOB or EOT is received or the count 
is zero. A neqative response causes channel end and device end with 
unit exception and wronq lenqth indicated. Line End Appendage finds 
the pollinq restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Read Continue Channel Proqram 



Operation Address 

Write positive (ACK) Table 

or neqative (NAK) 

response 
TIC Buffer 



Flags TP Code Count 
CC,SLI 16 1 



The read continue channel program sends a positive or negative 
response to the previous message block and continues reading data. 



Write Initial Channel Program 



Operation 



Address Flags 



Tp Code Count 



Write EOT sequence 
Write address 
Read response 



Table 


CC,SLI 


01 


3 


T entry 


CC,SLI 


07 


2 


LCB 




08 


9 



The write initial channel proqram writes an EOT sequence followed by 
an address. After the read response, the buffers are tposted to MH 
and data is transferred to the line by EXCP. 
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Write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Head response LCB CC,SLI OA 9 
TIC Buffer 

The write continue channel proqram reads the response to the last 
messaqe block. If the response is positive, chaininq takes place to 
the next write text command. 



IBM 2260 LOCAL CHANNEL PROGRAMS 

Tn local mode the channel proqrams simply read data or write data, as 
the case may be. 



CHANNEL PROGRAMS FOR IBM 7770 (DIAL) 



Head Initial Channel Proqram 












Operation 


Address 


Flaqs 


Tp 


Code 


C 


Disable 




CC/SLI 


11 




1 


Enable 




SLI 


06 




1 


Write CPU ID (if ID is 


T entry 


CCSLI 


OB 




X 


specified) 












Read response 


Buffer 


CD, SI- 1 


04 




2 


TIC 


Buffer 











Count 



The read initial channel proqram disables and then enables the line. 
The CPU ID is written if this is specified, and then the proqram 
chains to a read response. The X count value is the lenqth of the CPU 
TD specified in the invitation list. 

Write Initial Channel Proqram 

This proqram simply writes data to the 7770. 
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CC,SLI 


11 


1 




SIT 


06 


1 


T entry 


CC,SLI 


OB 


X 


Buffer 


CD,SII 


04 


2 


Buffer 









CHANNEL PROGRAMS EOR TTY MODELS 33 AND 35 TWX LINES 



Read Initial Channel Program 

Operation Address Flaqs Tp Code Count 

Disable 
Enable 

Write CPU ID 
Read response 
TIC 

The read initial channel proqram disables the line and sets the enable 
latch within the line adapter. This permits the terminal to dial the 
CPU. The write CPU ID command writes the CPU identification, which is 
assigned by the invitation list for the line. A read response command 
is then issued, followed by a TIC to a read text in the buffer. X is 
the length of the CPU ID specified in the invitation list. 

Write Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Disable CC,SLI 11 1 

Dial T entry CC,SII 11 X 

Read ID LCB SLI IE Y 

The write initial channel proqram disables and then dials the 
specified terminal. If the identification received is valid, the 
proqram restarts on the idles loop and writes data. If the ID is 
invalid, the channel proqram is terminated. X represents the number 
of dial diqits for the terminal and Y represents the lenqth of the CPU 
TD specified in the invitation list. 



CHANNEL PROGRAMS EMPLOYING THE AUTO POLL FEATURE 



The devices that use this feature are the fcllowinq: 

IBM 1030 

IBM 1050 (nonswitched) 

IBM 1060 

IBM 2740 (with station control) 

IBM 2740 (with station control and checking) 

BSC Multipoint 
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Operation 




Address 


Flags 


Tp 


Code 


C 


Write EOT 


sequence 


Table 


CC,SLI 


01 




X 


Poll 




List 


CC,SLI 


11 




y 


TIC 




A 










TIC 




B 










Poll 




List 


CC,SII 


11 




z 


TIC 




A 










Head 




Buffer 


CD, SIT 


04 




2 


TIC 




Buffer 











Count 



This feature employs the read initial type of channel program. First, 
a write EOT sequence command is sent, followed by a poll of the 
addresses in the invitation list. If no positive responses are 
returned, the program TICs to a poll of another list. If there are 
positive responses, the read initial program TICs to read response 
command, and from there chains to a read text in the buffer. X 
represents the number of EOTs dependent on the type of terminal (1 for 
BSC, 3 for all others) , Y represents the position in the invitation 
list, and Z is the length in bytes of the invitation list. 



CHANNEL PROGRAMS FOR IBM BSC MULTIPOINT LINES 



Read Initial Channel Program 










Operation 


Address 


Flags 


TP 


Code 


C 


Write EOT seguence 


Table 


CC,SLI 


01 




3 


Write polling 


List 


CC,SLI 


03 




2 


characters 












Read response 


Buffer 


CD,SII 


04 




2 


TIC 


Buffer 











Count 



The read initial channel program places the line in control mode by 
sending the EOT seguence, polls the terminal, and then reads the 
response. The read response command has a data count of 2. This 
reduces the ccunt to zero and causes data chaining to read the rest of 
the data until an ETB or ETX is received or the count is zero. A 
negative response causes channel end and device end with unit 
exception and wrong length indicated. Line End Appendage finds the 
polling restart Tp code, reinitializes for the next terminal to be 
polled, and returns control to IOS for execution of the CCWs. 

Read Continue Channel Program 



Operation Address 

write ACK or NAK Table 

response 

TIC Buffer 



Flags TP Code Count 
CC,SLI 16 2 
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Address 


Flags 


TP Code 


Count 


Table 


CC,SIT 


01 


3 


T entry 


CC,S1I 


07 





Operation 


Address 


Read response 


LCB 


TIC 


Buffer 



^he read continue channel programs writes the appropriate response to 
a block of data and then chains to read data. 

Write Initial Channel Program 

Operation 

Write EOT sequence 
Write addressing 

characters 
Head response LCB 08 9 

The write initial channel program places the line in control mode, 
addresses a terminal, reads the response (ACK-1) , and then begins 
transmission of data. 



Write Continue Channel Program 

Flags TP Code Count 

CC r SII 0A 9 

The write continue channel prcgram reads the response to the last 

message block. If the response is positive, chaining takes place to 
the next write text command. 



CHANNEL PROGRAM S FOR BSC DEVICES (BINARY SYNCHRONOUS COMMUNICATION) 

The devices supported under BSC channel prcgrams are the following: 

IBM 2770 
-IBM 2780 

IBM 1130 Computing System 
IBM System/36C, all models 20 and higher 



CHANNEL PROGRAMS FOR S/360 to S/360 POINT TO POINT 

Read Initial Channel Program 

Operation Address Flags Tp Code Count 

Prepare CC,SLI 11 1 

Read inguiry LCB 0C 11 

Write ACK-0 Table CC,SLI 15 2 

TIC Buffer 
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""he read initial channel proqram prepares the control unit to receive 
an inquiry signal, which is read by the read command. The proqram 
then writes an ACK-0 and TICs to a read command in the buffer. 



^ead Continue Channel Prcgr am 

Operation Address Flaqs Tp Code Count 

Write ACK cr NAK Table CC r SLI 16 2 
TIC Buffer 

The read continue channel proqram writes a response (ACK or NAK) and 
'"TCs to a read data command in the buffer. 



Write Initial Channel Prcqrajt 

Operation Address Flaqs Tp Code Count 

Write inquiry Table CC,SLI OD 1 
Read response LCB SLI 08 2 

^he write initial channel proqram writes an inquiry, reads the 
response (ACK-0) , and then beqins transmission of data. 

Write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Read response LCE SLI 9 

The write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, RVT) and restarts on a write data 

command. 



CHANNEL PROGRAMS FOR S/360 TO 1130 POINT TC FCINT 

Read initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Prepare 
Read inquiry 
Write ACK-0 
TIC 

The read initial channel proqram prepares the control unit to receive 
an inquiry siqnal, which is read by the read command. The proqram 
then writes an ACK-0 and TICs to a read command in the buffer. 
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Address 


Flaqs 


Tp 


Code 


C 




CC,SLI 


11 




1 


LCB 




0C 




11 


Table 


CC,SLI 


15 




2 


Buffer 











Operation 


Address 


Flaqs 


Write inquiry 


Table 


CC,SLI 


Bead response 


LCB 


SLI 



Bead Continue Channel Program 

Operation Address Flaqs Tp Code Count 

Write ACK or NAK Table CC r SLT 16 2 
TIC Buffer 

The read continue channel proqram writes a response (ACK or NAK) and 
^ICs to a read data command in the buffer. 

Write Initial Channel Prcqram 

Tp Code Count 

1 

08 2 

The write initial channel proqram writes an inquiry, reads the 
response (ACK-0) , and then beqins transmission of data, 

write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Pead response LCB SLI OA 9 

The write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, BVI) and restarts on a write data 
command. 



CHANNEL PROGRAMS FOB S/360 TO 2770 POINT TO POINT 

Bead Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Prepare 
Bead inquiry 
Write ACK-0 
TIC 

The read initial channel proqram prepares the control unit to receive 
an inquiry siqnal, which is read by the read command. The proqram 
then writes an ACK-0 and TICs to a read command in the buffer. 



Address 


Flaqs 


Tp 


Code 


C 




CC,SLI 


11 




1 


LCB 




0C 




11 


Table 


CC,SLI 


15 




2 


Buffer 
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*ead Continue Channel Prcqram 



Operation 


Address 


Flaqs 


Tp Code 


Count 


Write ACK or NAK 


Table 


CC,SLI 


16 


2 


TIC 


Buffer 









OD 


1 


OE 


2 


07 


X 



The read continue channel proqram writes a response (ACK or NAK) and 
TTCs to a read data command in the buffer. 

Write Initial Channel Prcqram 

Operation Address Flaqs Tp Code Count 

Write inquiry Table CC,SII 

Read response LCB SLI 

Write escape sequence T entry CC,SIT 

(STX,ESC or CC,ETE) 

Read response LCB SIT 08 2 

The write initial channel proqram writes an- inquiry, reads the 
response to that inquiry (ACK-0) , writes an excape sequence, reads the 
response (ACK-1) , and then beqins transmission of data f X represents 
the lenqth of the addressinq sequence specified in the terminal entry. 

Write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

*ead response LCB SLI 9 

The write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, RVI) and restarts on a write data 
command. 



CHANNEL PROGRAMS FOR S/360 TO 2780 POINT TO POINT 

Pead Initial Channel Program 

Operation Address Flaqs Tp Code Count 

Prepare 
Read inquiry 
Write ACK-0 
TIC 

The read initial channel proqram prepares the control unit to receive 
an inquiry siqnal, which is read by the read command. The proqram 
then writes an ACK-0 and TICs to a read command in the buffer. 



Address 


Flaqs 


Tp 


Code 


C 




CC,.SLT 


11 




1 


LCB 




0C 




11 


Table 


CC,SLI 


15 




2 


Buffer 
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Table 


CC,SLT 


OD 


1 


LCB 


SLI 


OE 


2 


T entry 


CC r SLT 


07 


X 



Read Continue Channel Program 

Operation Address Flaqs Tp Code Count 

Write ACK or NAK Table CC,SLI 16 2 
TIC Buffer 

The read continue channel proqram writes a response (ACK or NAK) and 
TTCs to a read data command in the buffer. 



Write Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write inquiry 
Read response 
Write escape 

sequence STX,ESC 

or DC,ETB 
Read response LCB SLI 08 2 

m he write initial channel proqram writes an inquiry, reads the 
response (ACK-0) , writes the escape sequence, reads the response to 
the escape sequence (ACK-1)', and then beqins transmission of data. X 
represents the lenqth of the addressinq sequence specified in the 
terminal entry. 

Write Continue Channel Proqram 

Operation Address "Flaqs Tp Code Count 

Head response LCB SLI 9 

The write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, RVI) and restarts on a write data 

command. 



CHANNEL PROGRAMS FOR S/360 to S/360 DIAL 

Read Initial Channel Pxoqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Disable 




CC,SLI 


11 




1 


Enable 




CC,SLI 


06 




1 


Read ID inquiry 


LCB 


SLI 


18 




16 


Write ID (if ID is 


List 


CD, SLI 


OB 




X 


specified) 












Write ACK-0 


Table 


CC,SLI 


15 




2 


TIC 


Buffer 
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The read initial channel program disables the line and enables the 
control unit. The proqram then reads the inquiry (and writes the CPU 
id, if specified) . It then writes an ACK-0 and chains to a read text 
command in the buffer. X represents the length in bytes of the user- 
specified IP in the invitation list. 

Read Initial Channel Proqram with Connection Established 



Operation 


Address 


Flaqs 


Tp 


Code 


Count 


Read inquiry 


LCB 




oc 




17 


Write ACK-C 


Table 


CC,SLI 


15 






TIC 


Buffer 











The read initial channel prcqram reads the inquiry, writes an ACK-0, 
and then chains tc a read data command. 

^ead Initial Channel Proqram - CPU Yields the Eight to Transmit 



Operation 


Address 


Flaqs 


Tp 


Code 


Count 


Write EOT 


Table 


CC,SLI 


01 




1 


^ead inquiry 


LCB 




OC 




17 


Write ACK-0 


Table 


CC r SLI 


15 




2 


TIC 


Buffer 











The read initial channel proqram writes an EOT character and then 
reads the inquiry from the station. The read initial channel program 
then writes an ACK-0 and continues to read data from the station. 



Read Continue Channel Prcqram 

Operation Address Flaqs Tp Code Count 

Write ACK or NAK Table CC,SLI 16 2 
TIC Buffer 

The read continue channel proqram writes a response (ACK or NAK) and 
TICs to a read data command in the buffer. 



write Initial Channel Prcqram 

Count 



Operation 


Address 


Flaqs 


Tp 


Code 


C 


Disable 




CC,SLI 


11 




1 


Dial 


T entry 


CC,S1I 


11 




X 


Write CPU ID (if ID is 


list 


CD r SLI 


OB 




Y 


specified) 












Write inquiry 


Table 


CC,SLI 


0D 




1 


Read ID ACK-0 


LCB 


SLI 


11 




17 
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The write initial channel proqram disables the line and dials the 
station. The proqram writes the CPU ID, if specified, and writes an 
ENQ character. The response is read and the ID is checked. The 
buffers are tposted to MH, and the channel proqram restarts at a write 
command. X represents the number of dial diqits for a terminal, and 
Y is the lenqth of the CPU ID. 

Write Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Bead response ICB SLI OA 9 

^he write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, BVI) and restarts on a write data 
command. 



CHANNEL PBOGBAKS FOP' S/360 TO 1130 DIAL 
"Read Initial Channel Proqram 



Operation 


Address 


Flaqs 


Tp Code 


C 


Disable 




CC r SLI 


11 


1 


Enable 




CC r SLI 


06 


1 


Bead ID inquiry 


LCE 


SLI 


18 


16 


Write ID (if ID is 


List 


CD, SLI 


OB 


X 


specified) 










Write ACK-0 


Table 


CC,SLI 


15 


2 


TIC 


Buffer 









Count 



The read initial channel proqram disables the line and enables the 
control unit. The proqram then reads the inquiry (and writes the CPU 
TD, if specified) . It then writes an ACK-0 and chains to a read text 
command in the buffer. X is the lenqth of the CPU ID. 

Head Initial Channel Proqram with Connection Established 

Operation Address Flaqs Tp Code Count 

Bead inquiry LCB 0C 17 

Write ACK-0 Table CC,SLI 15 2 

TIC Buffer 

The read initial channel proqram reads the inquiry, writes an ACK-0, 
and then chains tc a read data command. 
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Fead Initial Channel Program - CPU Yields the Eight to Transmit 



Operation 


Address 


Flags 


Tp 


Code 


Count 


Write EOT 


Table 


CC,SLI 


01 




1 


Head inquiry 


LCB 




OC 




17 


write ACK-0 


Table 


CC, SLI 


15 




2 


TIC 


Buffer 











^he read initial channel proqram writes an EOT character and then 
reads the inguiry from the station. The read initial channel program 
then writes an ACK-0 and continues to read data from the station. 

"Read Continue Channel Program 

Operation Address Flags Tp Code Count 

Write ACK or NAK Table CC,SLT 16 2 
TIC Buffer 

The read continue channel program writes a response (ACK or NAK) and 
TITs to a read data command in the buffer. 

Wr : .te Continue Channel Program 

Operation Address Flags Tp Code Count 

Head response LCE SLI 0A 9 

The write continue channel program checks the response to the last 
block of data (ACK-0, ACK-1, RVI) and restarts on a write data 
command. 



CHANNEL PHOGFAMS FOR S/360 TO IBM 2770 DIAL 

Fead Initial Channel Program 

Count 



Operation 


Address 


Flags 


Tp 


Code 


C 


Disable 




CC,SLI 


11 




1 


Enable 




CC, SLI 


06 




1 


Fead ID inguiry 


LCB 


SLI 


18 




16 


Write ID (if ID is 


List 


CD, SLI 






X 


specified) 












Write ACK-0 


Table 


CC,SLI 


15 




2 


TIC 


Buffer 











^he read initial channel program disables the line and enables the 
control unit. The program then reads the inauiry (and writes the CPU 
ID, if specifi€d) . It then writes an ACK-0 and chains to a read text 
command in the buffer. X is the length of the CPU ID. 
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^ead Initial Channel Proqram with Connection Established 
Operation 



Address 


Flaqs 


Tp 


Code 


Count 


ICE 




OC 




17 


Table 


CC r SLI 


15 






Buffer 











Head inquiry 
Write ACK-0 
TIC 

The read initial channel program reads the inquiry, writes an ACK-0, 
and then chains tc a read data command. 

Head Initial Channel Proqram - CPU Yields the Biqht to Transmit 



Operation 


Address 


Flaqs 


Tp Code 


Count 


Write EOT 


Table 


CC,SLI 


01 


1 


Head inquiry 


LCB 




OC 


17 


Write ACK-0 


Table 


CC,SLI 


15 


2 


TIC 


Euff er 









^he read initial channel proqram writes an EOT character and then 
reads the inquiry from the station. The read initial channel proqram 
then writes an ACK-0 and continues to read data from the station. 



*?ead Continue Channel Proqram 

Operation Address Flaqs Tp Code Count 

Write ACK or NAK Table CC r SLI 16 2 
TIC Buffer 

The read continue channel proqram writes a response (ACK or NAK) and 

TICs to a read data command in the buffer. 



Write Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Disable 

Dial diqits 

Write CPU ID (if ID 

is specified) 
Write inquiry 
Head ID ACK-0 
Write escape 

sequence 
Head ACK-1 LCB 08 9 

The write initial channel proqram disables the line and dials the 
station. The proqram writes the CPU ID, if specified, and writes an 
ENQ character. The response is checked. The buffers are tposted to 
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CC,SLI 


11 


1 


T entry 


CC,SLI 


11 


X 


List 


CD,SLT 


OB 


Y 


Table 


CC,SLI 


0D 


1 


LCB 


SLI 


1A 


17 


T entry 


CC,SLI 


07 


Z 



Address 


Flaqs 


Tp Code 


Count 


LCB 


SLI 




9 



mh, and the channel proqram restarts at the write escape sequence. 
^he ACK-1 is read by the proqram and then the proqram chains to a 
write command. X represents the number of dial diqits for a terminal, 
Y is the lenqth of the CPU ID, and Z is a device dependent variable. 

Write Continue Channel Proqram 

Coeration 

Read response 

^he write continue channel proqram checks the response to the last 
block of data (ACK-0, ACK-1, RVI) and restarts on a write data 

command. 



CHANNEL PROGRAMS FOP S/360 TO IBM 2780 DIAL 

^ead Initial Channel Proqram 

Operation Address Flaqs Tp Code Count 

Disable 

"Snabl e 

Read ID inquiry 

Write ID (if ID is 

specified) 
T « T rite ACK-0 
tic 

^he read initial channel proqram disables the line and enables the 
control unit. The proqram then reads the inquiry (and writes the CPU 
ID, if specified) . It then writes an ACK-0 and chains to a read text 
command in the buffer. X is the lenqth of the CPU ID, 

p ead Initial Channel Proqram with Connection Established 



Address 


Flaqs 


Tp 


Code 


C 




CC,SLI 


11 




1 




CC,SLI 


06 




1 


LCB 


SLI 


18 




16 


List 


CD, SLI 






X 


Table 


CC,SLI 


15 




2 


Buffer 











Operation 


Address 


Flaqs 


Tp 


Code 


Co 


Read inquiry 


LCB 




oc 




17 


Write ACK-0 


Table 


CC,SLT 


15 




2 


TIC 


Buffer 











The read initial channel proqram reads the inquiry, writes an ACK-0, 
and then chains tc a read data command. 



1234 



Read Initial Channel Program - CPU Yields the Right to Transmit 



Operation 


Address 


Flags 


Tp 


Code 


Count 


Write EOT 


Table 


CC,SLI 


01 




1 


Read inquiry 


LCB 




OC 




17 


Write ACK-0 


Table 


CC r SLI 


15 




2 


TIC 


Buffer 











^he read initial channel program writes an EOT character and then 
reads the inguiry from the station. The read initial channel program 
then writes an ACK-0 and continues to read data from the station. 

*?ead Continue Channel Program 

Operation Address Flags Tp Code Count 

Write ACK or NAK Table CC,SLI 16 2 
TIC Buffer 

^he read continue channel program writes a response (ACK or NAK) and 
T T Cs to a read data command in the buffer. 



Write Initial Channel Program 



Operation 




Address 


Flags 


Tp Code 


C 


Disable 






CC,SL! 


11 


1 


Dial digits 




T entry 


CC, SLI 


11 


X 


Write CPU ID 


(if ID 


List 


CD, SLI 


0E 


Y 


is specified) 










Write inguiry 




Table 


CC, SLI 


0D 


1 


Read ID ACK-0- 




ICE 


SLI 


1A 


9 


Write escape 




T entry 


CC,SLI 


07 


Z 


seguence 












Read ACK- 1 




LCB 




08 





Count 



^he write initial channel program disables the line and dials the 
station. The program writes the CPU ID, if specified, and writes an 
ENO character. The response is checked. The buffers are tposted to 
MH, and the channel program restarts at the write escape seguence. 
^he ACK- 1 is read by the program and then the program chains to a 
write command. X represents the number of dial digits for the 
terminal: Y represents the length of the CPU ID specified in the 
invitation list; and Z represents the length of the addressing 
seguence in the terminal entry. 
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SPECIAL CHAtfflll. PROGRAMS 

In BSC on a read continue operation, when a temporary time delay (TTD) 
sequence (STX ENO) is received the channel proqram is as follows: 



Operation 


Address 


Flaqs 


Tp Code 


Count 


Write NAK 


Table 


CC,SLI 


16 


2 


TIC 


Buffer 









When, in response to a text request, TCAM receives two RVIs in 
succession, a WACK character (except for buffered terminals) , or an 
invalid response, TCAM qenerates the followinq channel proqram to 
correct the problem. 

Operation Address Flaqs TP Code Count 

Write ENO Table CC,S1I 5B 1 
^ead Response LCB OA 9 

For two RVIs or an invalid response, TCAM retries this channel 
proqram seven times. For a WACK character, TCAM performs no retry 
operation. 
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MESSAGE CONTROL PROGRAM 



WTOR Interpreter 



IEDQOB 



INTRO Macro Expansion 



• Save the user's registers in a save area pointed to by register 13. 

• Chain the program save areas together. 

• Set register 13 to point to the MCP save area, which is the first 18 words of 
the AVT. This establishes register 13 as the program base register. 

• Store register 1 of OS Job Management at AVTSPLPT in the AVT. 

• Link to the Link routine. 



V 



Next sequential instruction 



(This should be user code to examine the return code: if the return 
code is not equal to zero, terminate the MCP; otherwise, continue to 
process the MCP.) 




Link routine 



IEDQOA 



Open Message Queues DCB 
(See Chart 2) 



LEGEND: 



Control flow through 



i/-)C / is^ v-onrroi now rnrougn 

' the Operating System (OS) 



Control flow through a 

branch or sequential instructions 



• Link to WTOR Interpreter. 

• Interrogate the return code. If it is not zero, write the appropriate error 
message and return immediately; otherwise continue. 

• Link to the Password Scrambler. 

• Link to the INTRO Getmain routine. 

• Examine the return code, as before. 

• Link to Termname Table Sort routine. 

\ 

• Examine the return code, as before. 

• Link to the Attach routine. 

• Return to the INTRO macro expansion. 





• If the pointer to the TCAM Dispatcher at CVT+240 is not equal to zero, 
return with an error code. 

• Conduct a conversation with Write-to-Operator-with-Reply (WTOR) to 
override certain INTRO parameters that were set at assembly time. 



IEDQE6 



• Scramble the input password and store the result at AVTPASWD in the AVT.' 



IEDQOG 



• Examine the AVT and issue GETMAINs for main storage for buffers, CPBs, and 
Trace Tables. Clear and format these areas according to AVT specifications. 



IEDQOM 



• Sort the Termname Table entries into alphabetical order and adjust the AVT 
offsets . 

• Perform validity checking and corrections on the Terminal Table. 

• Set a return code in register 15 to indicate whether all functions were 
successfully completed. 



IEDQOS 



• Attach the Operator Control, On-Line Test, and FE Common Write tasks. 

• Load the System Delay subtask if the system delay interval is greater than 
zero. 

• Load the Operator Awareness Message Router if the system console is not the 
primary operator control terminal. 



Chart 1. Initialization of a Message Control Proqratu 
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MESSAGE CONTROL PROGRAM 



INTRO 

OPEN Message Queues DCB 

OPEN Checkpoint DCB 



System 

Open 

Executor 



IGG01930 



OS 



& 



Calculate the number of extents on this data set from the Data Set Control Block (DSCB). 

Obtain main storage for and initialize the Data Extent Block (DEB). 

Branch via an XCTL instruction to the next nonzero entry in the system Where-to-Go Table- 
IGG01931. 



IGG01931 



OS 



SZ 



Complete the initialization of the DEB and of any DEB extents. 

Obtain and initialize main storage for an Input/Output Block (IOB) for each extent. 

Branch via an XCTL instruction to the next nonzero entry in the system Where-to-Go Table- 
IGG01934. 



IGG01934 



OS 



SI 



• Load the TCAM Dispatcher, and place a pointer to the AVT address in the CVT. 

• Load the EXCP Driver and Disk. End Appendage. 

• Load the Reusability-Copy subtask, if it is required. 

• Branch via an XCTL instruction to the next nonzero entry in the system Where-to-Go Table. 



Dscr 



No. of extents 



DEB 



| TCB 



4 next DEB 



| DCB 



No. of extents 



No. double words 



<f UCB 



IOB 



| ECB 



\ DCB 



LEGEND: 

T Pointer or address 

^OS/=0 Control Flow through OS 

fc Data Reference 



Chart 2. Functions of Open Disk Messaqe Queues Data Set 
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MESSAGE CONTROL PROGRAM 



Checkpoint Open Routine 



IGG01941 



INTRO 

OPEN Messages Queues DCB 

OPEN Checkpoint DCB — -/ 

OPEN Line Group DCB 

READY 



OS/^> 



• Issue a GETMAIN for a checkpoint work area. The size is determined by the number of 
CKREQ queues and environment checkpoint records specified in the AVT. 

• Put the address of the checkpoint work area at AVTCKGET in the AVT. 

• Load the Checkpoint Disk End Appendage and put its address in the DEB. 

• Initialize the checkpoint work area by building an IOB and CCWs in it. 

• Examine the JFCB to determine the disposition of the checkpoint data set. 




Cold Start or Old and Cold Restart: 



Old and Warm or Continuation Restart 



OS 



OS 

i 

Checkpoint/Restart from Environment Record Routine 



IGG01943 



• Determine which environment checkpoint record to use to reconstruct the MCP 
environment. 

• Read the environment record segments and fill in the MCP tables. 

• Branch via an XCTL to the next nonzero entry in the system Where-to-Go Table -IGG01944. 



J 



Checkpoint/Restart from Incident and CKREQ Records Routine 



IGG01944 



• Read the incident and CKREQ records from the checkpoint data set and update the 
MCP tables. 

• If this is a continuation restart, set up to activate the Continuation Restart routine. 
Issue an XCTL to IGG01945. 

• Branch via an XCTL to the next nonzero entry in the system Where-to-Go Table -IGG0190S, 



Checkpoint Disk Allocation Routine 



IGG01949 



Scan- the TCAM tables to determine the size of the environment checkpoint record and the number of disk records to contain it. 

Determine the number of tracks in the checkpoint data set. 

Determine the size of the incident and CKREQ records. 

Branch via an XCTL to the next nonzero entry in the system Where-to-Go Table - IGG01942. 



Checkpoint Disk Initialization Routine 



I 
i 



IGG01942 



• Initialize the disk checkpoint data set into specific areas for a control record, environment records, CKREQ records, and incident records. 

• Branch via an XCTL to the next nonzero entry in the system Where-to-Go Table - IGG0I90S. 



Continuation Restart Routine 



IGG01945and IGG019Q8 



EXCP Driver 



IGG019RC 



Perform the disk I/O 



/q$ / — ^ > • If this is a warm start with no scan of the message queues, locate the last message placed on each FEFO queue before the last checkpoint and zero the FEFO chain 
field of all messages placed on the queue subsequent to that checkpoint; then issue an XCTL. 

If this is an OS synchronized restart, scan the FIFO message queues for the specified process entry and recreate a FEFO queue in FIFO order to include all messages 
placed on the FEFO queue after the last checkpoint. Otherwise, scan each FIFO message queue and recreate a FEFO queue in FIFO order of all complete, 
unserviced, and uncanceled messages. 



• Update the sequence numbers and recreate the queue-back chain. 

• Branch via an XCTL to the next nonzero entry in the system Where-to-Go Table - IGG0190S. 



LEGEND: 

/OS/=f> Control flow through OS 

H^ Control flow through branch instructions 



Chart 3. Functions of Checkpoint Open 
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MESSAGE CONTROL PROGRAM 
INTRO 

OPEN Message Queues DCB 
OPEN Checkpoint DCB 
OPEN Line Group DCB 
READY 



=/° S /= 



LEGEND: 



i^ Control flow through OS 



IGG01935 



• Determine the number of lines in the line group by examining the Task I/O Table (TIOT). 

• For each line group, obtain main storage for a line Data Extent Block (DEB) and initialize it with the Unit Control Block address 
from the TIOT. 

• Ascertain that there is graphics or telecommunications equipment on each line and that the devices are compatible with the options 
specified in the UCB. 

• jssue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table - IGG01936. 



"OS 



IGG01936 



£ 



• Provide the number of CCWs required for a minimum channel program for all devices on each line. 

• Provide for additional CCWs as determined by the optional feature bits in the UCB and a typical DCT entry for each device. 

• Obtain main storage for one LCB for each line in the line group. 

• Place the Send Scheduler STCB in the STCB chain of the Destination QCB. 

• Issue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table - IGG01937. 



^OS 



IGG01937 






• Initialize an LCB for each line in the line group. 

• Put the Send Scheduler STCB in the STCB chain of the LCB if send priority is specified. 

• Issue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table - IGG01938. 



JT, 



IGG01938 $, 




• Build channel programs in each LCB. 




• Reset the error tab in each UCB. 




• Issue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table 


- IGG01939. 



IGG01939 



^OS^ 



• Load the TCAM Dispatcher and place a pointer to the AVT address in the CVT. Update the OS Contents Directory usage count. 

• Load the appropriate receive schedulers, the Start-up Message routine (if requested), and the TSO Attention routine (if requested). 

• Issue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table - IGG01940. 



OS 



• Load the PCI Appendage (if requested), the Send Scheduler (if there are no buffered terminals in the group), and the device 
dependent special characters required for initial I/O operations. 

• Load the SCT from the SYS1 .SVCLIB data set. 

• Build and initialize the SCB for buffered or dial terminals. 

• Load the appendages and store addresses in the proper locations in the DEB. 

• Issue EXCP to the line. 

• Issue an XCTL to branch to the next nonzero entry in the system Where-to-Go Table - IGG01948. 



IGG01948 



I 



• Initialize any appropriate Cross Reference Table entries. 

• Ascertain that each line has an I/O interrupt to indicate that it is ready. If a line is not complete, observe a 28-second 
delay and retest. If still not complete, send a message to the system console to indicate that this line is unavailable. 

• Issue an XCTL to branch to IGG01934, which transfers control to the READY macro expansion. 



Chart 4. Functions of Line Group Open 
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MESSAGE CONTROL PROGRAM 



INTRO 

OPEN DCB 
OPEN DCB 
READY 



READY Macro Expansion 



• Link to the Ready routine. 

• Put the address of AVTSAVE2 in register I . This establishes a parameter list for the TCAM Dispatcher. 

• Obtain the address of the Dispatcher from AVTSAVE2+68. 

• Turn on the "READY completed" bit (AVTBIT1) in the AVT. 

• Branch to the TCAM Dispatcher. 



Ready Routine 



IEDQND 



J OS t 




V 

TCAM Dispatcher 



• Attach the Checkpoint Executor subtask if there is an open checkpoint DCB. An open checkpoint DCB is 
indicated by the presence of an address in AVTCKGET in the AVT. Also, put a checkpoint request element on 
the ready queue so that an environment checkpoint will be taken when the Dispatcher is activated. 

• Put all incident checkpoint records (except Start and Stop Line) in the operator control work area for processing. OS 
post the Operator Control ECB. 

• Put any Destination QCB that has the CLOCK= or INTVL= operand on the time delay queue. 

• If On-Line Test is specified, ascertain that there is enough main storage available for the test functions to be 
performed . 



• Return to the READY macro expansion. 






IGC0110D 



• Process the records in the work area. 

• Post the TCAM ECB. 



LEGEND: 

> 



Control flow through OS 

Control flow through branch instructions or sequential flow 



Chart 5. Functions of the READY Macro Expansion and Routine 
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Subt ask A ^ 

• Perform a tpost by putting the address of the new QCB in the RCB of the element. 

• Branch to the TCAM Dispatcher at DSPPOST. 



TCAM Dispatcher 



• Put the address of the element into the ready queue chain by priority. 



• Merge the disabled onto the enabled ready queue by priority, if there are any elements on the 
disabled ready queue. 



• Remove Element X from the ready queue by placing its address in register 1 . 

• Update the ready queue by placing the link field of Element X in the ready queue. 

• Examine the element pointed to by register 1. 

a. If the QCB points to an STCB that has an MCPL of X'OO', there is no work to be done; therefore, 
issue an OS WAIT. 

b. If the element represents an attached task (MCPL = X'02'), post the ECB for that task complete so 
that the task can vie for control when a TCAM WAIT is issued. 

c. If the MCPL is neither X'OO' nor X'02', get the entry point for the highest priority subtask 
represented on the STCB chain of the QCB. Branch to that subtask. 



QCB 1 
Element X 



STCB A 



QCB 1 



Element X 



Ready Queue 



Element X 



QCB 2 | 



Link 



Ready Queue 




Element X 
QCB 2 | 



c 



Subtask A code 



/ Element X 



\ 


QCB 2 \ 




N * 


Link 






STCB A 




/ 


MCPL 




( 






> 


Subtask A code 



Disabled Ready Queue 



First Element 



t 



Last Element f 




Element Y 




Element 1 



-¥ 


Register 




QCB 2 






Element 


t 








STCB 2 


t 



c 



Subtask 2 code 



^^ Control flow through 
branch commands 

-► Original data linkage 



fe Data movement 



Chart 6. Summary of the Dispatching Functions of the TCAM Dispatcher 
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READY 

Macro 

Expansion 



TCAM Dispatcher 



IGG019RB 



Occur only during the first 
pass through the Dispatcher 



• Save the user's registers in AVTSAVE1 of the AVT. 

• Retrieve the data in AVTSAVE2 of the AVT and store it for 
Dispatcher use. 

• Perform action according to the entry point designated by the 
returning routine. 



r 



-A. 



DSPDISP 



DSPLIST 



DSPCHAIN 



DSPWAIT 



DSPBYPAS 



DSPDLETE 



DSPPOST (DSPPOSTR) 



DSPTSTQ (DSPTSTQR) 



DSPUNAV (DSPUNAVR) 



DSPPRIO (DSPPRIOR) 



DSPLIFO (DSPLIFOR) 



^ 



Indicates that the 
subtask returning to the 
Dispatcher has no 
elements to add to the 
ready queue. 



Indicates that the 
elements (RCBs) that 
the returning subtask 
wishes to add to the 
ready queue have 
pointers stored in a 
parameter list pointed 
to by register 1 . The 
high order byte of the 
last pointer contains 
X'80' to indicate the 
end of the chain. 



Indicates that the 
elements that the 
returning subtask 
wishes to add to the 
ready queue are 
chained together, and 
the first one is pointed 
to by register 1. The 
link field of the last 
item in the chain 
contains X'XXOOOOOO' 






Indicates that the 
returning subtask 
wishes to process an 
element from the 
element chain of the 
QCB. If there is no 
element present, the 
subtask twaits for an 
RCB to be tposted to 
the element chain. 



RCB 



Indicates that the 
Subtask returning to 
the Dispatcher wants 
the Dispatcher to 
immediately process 
the next STCB in the 
STCB chain of the 
QCB being examined. 



Rl 



RCB 



List RGBs 





♦ 


-H 1 1 




\ 


*r i i 




\ 


- i 


80 


\ 


-H 1 1 



l 



RCBs 



r 



QCB 





t 








t 




QCB 














| STCB ^ 



Q 



STCB 









Link 



L 








\ Subtask Code 



Delete the Start-up 
Message routine and 
then perform the 
DSPCHAIN entry 
point functions. 



Indicates that the 
subtask returning to 
the Dispatcher wishes 
to have one element 
tposted to the ready 
queue. Register 1 
contains the address 
of the element 
(RCB) to be tposted. 



Indicates that the 
subtask returning to 
the Dispatcher wishes 
to see whether its 
STCB is twaiting in 
the STCB chain of a 
QCB pointed to by 
register 3. If it is 
not, the Dispatcher 
is to chain the STCB 
into that QCB's 
STCB chain. 



Indicates that the 
subtask returning to 
the Dispatcher 
wishes to have its 
STCB removed from 
the QCB chain it is 
in and placed in the 
STCB chain of a QCB 
pointed to by 
register 3. 



Indicates that the 
returning subtask 
wishes the Dispatcher 
to place the RCB 
pointed to by register 
1 into a chain 
pointed to by register 
7. The item is to be 
placed in the chain 
by priority. 



Indicates that the 
returning subtask 
wishes the Dispatcher 
to place the RCB 
pointed to by register 
1 into the first spot 
(in a chain pointed) 
to by register 7. 



Rl 



I 



RCB 



/ 


QCB 
















R3. 



""-— 


3 QCB 


















Y 

• If the returning routine did not have an "R" as the last letter of its 
name, processing continues through the Dispatcher; otherwise, 
control returns to the returning routine once the queue management 
functions are complete. 

• Merge any elements on the disabled ready queue on to the enabled 
ready queue by priority in FIFO order. 

• Remove the element from the top of the ready queue. 

• Examine the element just removed. If this is a "dummy" element with 
an STCB MCPL field of zero, the ready queue is empty, so issue a 
system WAIT. If the element is for an attached subtask, OS post 

the attached task complete and branch back to examine the next item 
on the ready queue. If neither of the above situations applies, compute 
the subtask entry point and exit to that subtask. 



J 



Chart 7. Summary of the Queuing Functions of the TCAM Dispatcher 
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Buffer 



MHR 



INHDR 



INBUF 



INMSG 



MHR 



OUTHDR 



OUTBUF 



OUTMSG 



Destination QCB 
(Main Storage or Disk) 



Buffer 



Buffer 



Buffer 



Destination QCB 
(Main Storage or Disk) 



Buffer 



Buffer 



Buffer 



Outgoing to Application 
Program 



MHR 



OUTHDR 



OUTBUF 



OUTMSG 



Incoming from Application 
Program to MCP 



MHR 
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INBUF 



INMSG 



Read-Ahead QCB 



Buffer 



Buffer 



Buffer 
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Work Area 
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BUFFERING 



MHR 



QUEUING 



MHR 
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I/O Interrupt 



LEGEND: 



Receive Scheduler 



IGG019Q1, IGG019RD, IGG019R1, or IGG019R3 



Tpost the ERB to obtain buffer untis to the Buffer Request QCB. 



Buffer Request Routine 



IEDQGA 



Obtain buffer units from the buffer unit pool. Allocate the buffers. 

Branch via a BALR instruction to Buffer Association. 

Tpost the ERB with the buffers chained from the chain field of the ERB to the Activate QCB. 



Activate- I/O Generator Subtask 







Suffer Association 


IEDQGD 


■■»• 


• Build Read CCWs in the buffers. 




t 







IEDQKA, IEDQKB, IEDQKC, IEDQKD, or IEDQKE 



• Build the initial contact channel program to poll the invitation list. 

• Check the line and define the terminal to poll. 

• Issue EXCP to accept a message. 



Line End Appendage 




I/O Supervisor 



IGG019R0, IGG019Q2, IGG019Q3, IGG019Q4, or IGG019Q5 



' S ^ Yes 

there a ^> >> • Tpost the buffers to the STARTMH QCB for message handling in an incoming subgroup, 

message 



No 



V 



Tpost the LCB to the Buffer Disposition QCB to have the buffers and the line freed. 



T 



STARTMH 
► Subtask 
(IEDQAA) 



Control flow through the TCAM Dispatcher 
Z^ Control flow through a branch instruction 



Buffer Disposition Subtask (IEDQBD) 



OS A^ Control flow through OS 



Chart 9. Functional Flow in a deceive Operation 
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I/O Interrupt 



LEGEND: 



♦ Control flow through the TCAM Dispatcher 



Z& Control flow through a branch instruction 



'qs/ — [> Control flow through OS 



Send Scheduler 



IGG019RDor IGG019R4 



Tpost the ERB to the Disk l/O QCB to get the buffers of a message from a message queue. 



CPB Initialization Routine 



IEDQFA 



• Start getting the message from the message queue of the destination and tpost the ERB with the full buffers to the Activate QCB. 



Activate- I/O Generator Subtask 



IEDQKA, IEDQKB, IEDQKC, IEDQKD, or IEDQKE 



• Build a send channel program. 

• Issue EXCP to address the terminal. 



l/O Supervisor 



Line End Appendage 




IGG019R0, IGG019Q2, IGG019Q3, IGG019Q4, or IGG019Q5 




Positive 



=^« Tpost the buffers to the STARTMH QCB for outgoing message handling. 



Negativ 



V 



• Tpost the buffers with an error indicator to the STARTMH QCB in order to return control to the outgoing subgroup for error handling. 
If there is a hardware error, initiate error recovery procedures. 



T 



STARTMH Subtask (IEDQAA) 
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Line Group Receive Operation 



Receive Scheduler 



• Get the ERB from the LCB. 

• Tpost the ERB to the Buffer Request QCB. 



Buffer Request Routine 



IEDQGA 



• Check the DCB to get the number of units in one buffer. 

• Get the units for the required number of buffers from the buffer unit pool. (If the units are not available, chain the 
ERB by priority into the element chain of the Buffer Return QCB and exit. Otherwise, continue.) 

• Chain the units off the chain pointer in the third word of the ERB. 

• Reconstruct the buffer unit pool chain. (See Figure 25.) 

• Branch via a BAL instruction to Buffer Association. 



Tpost the ERB to the Activate QCB. This is notification that the request has been satisfied and the system is ready to 
receive. 



Activate Subtask 



Register 1 



IEDQKA 



• Establish initial contact with the line for a receive operation. 



LEGEND: 



♦ Control flow through the TCAM Dispatcher 
^> Control flow through a branch instruction 
-► Data flow 



Buffer Request QCB 



Buffer Unit Pool ^ 



STCB^ 



(^ Buf 



Buffer Request STCB 



Register 1 




Buffer Unit Pool f 



STCB | 




Buffer Request STCB 



Buffer Association 



Buffer Unit Pool 



Receive Scheduler ERB 



Count 



Count 



ERB 




QCB | 



Chain 4 



Count 



Count 




IEDQGD 



• Build a Read CCW and a TIC in each 12-byte unit control area and chain the units together by the TIC commands. 
(See Figure 26.) 

• Return via a BR 14 instruction. 



ERB 



QCB | 



Chain T 



Activate QCB 




STCB 



Buffers 




Activate STCB 



Chart 11. Functions of an Initial Buffer Bequest in a Receive 
Operation 



Method cf Operation Charts 1257 



Line Group Send Operation 
Send Scheduler 



IGG019R4 



The Send Scheduler STCB is in the STCB chain of the Destination QCB for the line. This routine needs to get buffers in order 
to read from the message queues data set to the line. The buffers must handled by outgoing MH and then set to the line. 

• Gain control of the line. 

• Tpost the ERB with a count of the required buffers to the Disk I/O QCB. 



CPB Initialization 



IEDQFA 



• Refer to the line DCB to get the number of units per buffer. 

• Put the ERB on the no-CPB queue to get the CPBs from the CPB free pool. 

• Initialize the SCB with the address of the record to read from the message queues data set (SCBSCSEG). 

• Get the CPBs from the CPB free pool. 

• Build Seek Search Read CCWs in the CPBs. 

• Chain the CPBs off the EXCP Driver input queue. 

• Branch to EXCP Driver. 



.EXCP Driver 



IGG019RC 



Add Seek Search CCWs to the CPBs, if necessary, and chain the CCWs together. 
Branch via BAL to the MBBCCHHR Convert routine. 



• Place the CPB on the proper IOB input queue by CC priority. 

• Build command chain and chain data flags. 



• Issue an EXCP command to initiate channel activity. 

• Branch to the TCAM Dispatcher. 



LEGEND: 



Destination QCB 



ERB 



STCB | 



Vfc Se 



Send Scheduler STCB 



Disk I/O QCB 



STCB | 




CPB Initialization STCB 



MBBCCHHR Convert Routine 



IEDQFP 



*> . 



Convert the message queues data set address to MBBCCHHR format. 



^ Control flow through the TCAM Dispatcher 



V 

TCAM Dispatcher 



^^ Control flow through a branch instruction 



"► Data flc 




ERB 



QCB | 



Cha 



■".♦ 




X'02 



Chart 12. Functions of an Initial Buffer Bequest in a Send 
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LEGEND: 



=^OS/=C> Control flow through OS 

mi^mmmm^^ Gontrol flow through the TCAM Dispatcher 



=^ Control flow through a branch instruction 



Channel End/Device End on a Disk Operation - IOS issues a BALR to Disk End Appendage 

OS 
Disk End Appendage ^ IGG019R2 



^L 



• Locate the appropriate DEB. 

• Move the CPBs that are on the EXCP queue (IOBSTART) to the Disk End queue. 

• Tpost the CPB Cleanup QCB to itself and put it. on the disabled ready queue. 

• OS post the TCAM ECB to indicate that the I/O operation is complete. 

• If there are no CPBs on the IOB retry queue, return to IOS with channel activity stopped; otherwise, 
chain the CPBs onto the EXCP queue and return to channel restart in IOS. 



-os. 



IOS 



CPB Cleanup QCB tposted to itself on top of the enabled ready queue 
CPB Cleanup Routine A 



IEDQFQ 



• Process the CPBs on the input queue to return them to the CPB free pool. 

• Since these are read CPBs, for each CPB get a unit from the buffer unit pool, place it in the ERB buffer 
chain, and move the CPB data to the unit. 

• Branch to CPB Initialization when the last CPB is processed. 



CPB Initialization 



lz 



IEDQFA 



Tpost the ERB with full buffers to the Activate QCB. 



Activate Subtask , 




IEDQKA 


• Build the initial contact channel program and issue an EXCP. 

... 



I/O Interrupt 
OS 



Line End Appendage 



1 



Tpost the full buffers to the STARTMH QCB. 



V 

TCAM Dispatcher 



Chart 12. functions of an Initial Buffer Fequest in a Sena 
Operation (Part 2 of 2) 



Method cf Operation Charts 1261 



ERB tposted to the Buffer Request QCB when there are no buffers available during an initial 
request for a line, an application program request, or a PCI. 



Buffer Request Routine 



IEDQGA 



• Exit to DSPPRIO to put the ERB in the element chain of the Buffer Return QCB. 



Receive Operation: 

1 . At Buffer Disposition, unused buffers are tposted to the Buffer Return QCB. 

2. At Line End Appendage, or PCI, buffers are deallocated (not freed) from the channel 
program. 

3. When the buffer is tposted to the Destination QCB, the buffer is chained to the CPB and 
the unit is tposted to the Buffer Return QCB. 



Send Operation: 

After a buffer is sent on a line, PCI Appendage tposts the buffer to the Buffer Return QCB. 



Buffer Return Routine 



IEDQGB 



Chain the buffer units off the element chain of the Buffer Request QCB - this is the buffer 
unit pool . 




:£> • Exit to DSPDISP in the TCAM Dispatcher. 



Yes 



V 

• High Priority ERB (initial request, first PCI, disk request) - complete the request as in an 
initial buffer request by entering IEDQGA. 

• Low Priority ERB (subsequent PCI) - enter Buffer Association (IEDQGD), which builds CCWs 
' in each buffer unit and includes the buffer in the channel program by including it in the 

CCW chain for the LCB. 




• Rechain the ERB by priority into the element chain of the Buffer Return QCB. 

• Return to the TCAM Dispatcher. 



Yes 



• Release the ERB to be used by another request. 

• Drop the ERB from the element chain of the Buffer Return QCB. Rely on PCIs for additional 
buffers . 

• Return to the TCAM Dispatcher. 



TCAM Dispatcher 



Chart 13. Functions of Buffer Beturn 
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TCAM Dispatcher 



STARTMH Subtask 



IEDQAA. 



Place the address of the buffer in the AVTADBUF field 
of the AVT. 



Place the number of reserved characters in the LCB and 
in the buffer prefix. 



Branch to the address in 
LCBRCQCB ^== 





Outgoing 



=> Routine "X" 



=C> INHDR 



V 

OUTHDR 



Is \. Yes 

this a hpniW^i — ]S« The functional routines 

buffer?/ — and subroutines indicated 

by user-coded MH macros 
No handle the buffer. 



C: 



OUTBUF 



The functional routines and subroutines indicated by 
user-coded MH macros handle the buffer. 



OUTMSG ►• Incoming/Outgoing Message Delimiter Routine IEDQA4 




• Branch to Buffer 

Association in the Buffer 
Management mnHule 



• Tpost buffer to the correct Read-Ahead QCB. 



TCAM Dispatcher 



^> Control flow through a branch or sequential instructions 
Control flow through the TCAM Dispatcher 
'r\^/—y Control flow through OS 




Is 
this a "N ^ No 

.header buffer,. 



Yes 



The functional routines and subroutines 
indicated by the user-coded MH macros 
handle the buffer. 



The functional 
routines indicated 
by the user-coded 
macros handle the 
buffer. 



>INMSG 



-+■ Incoming/Outgoing IEDQA4 

message Delimiter Routine 




Tpost the buffer 
to the Buffer 
Disposition QCB. 



Tpost the buffer to its Destination QCB. 



I 



Buffer Disposition Subtask 



IEDQBD 



no 



TCAM Dispatcher 



Buffer Association 



Build CCWsahd TICs 
in the buffer units. 



T~ 



OS 



i 

>sage i 
) Inter 



The message is sent. 
I/O Interrupt 



Line End Appendage 



• At end of message, tpost the 

buffer to the Buffer Disposition QCB. 



'Buffer Disposition Subtask 



IBDQBD 




Tpost the unused buffers to the Buffer Return QCB. 




• Tpost the buffer to its 
Destination QCB. 

• Tpost any unused buffers 
to the Buffer Return QCB. 

• Examine the next user-coded 
macro. 



• Set up to execute the routine for the 
■^ next macro. 



Get the routine address from an AVT 
table of addresses. 





• Tpost the LCB to the IEDQBD02 entry 
point of Buffer Disposition. 



• Tpost the ERB to the Disk 
I/O QCB. 

• Set LCBRCQCB to point to 
Buffer Disposition 

• Exit to the TCAM Dispatcher. 




Tpost the ERB to the Disk 
I/O QCB to get a recalled 
header. 

Set LCBRCQCB to point to 
the Multiple Routing subtask. 



Exit to the TCAM 
Dispatcher, ^^z 



CPB Initialization 



IEDQFA 



• Get a recalled header buffer. 



Multiple Routing Subtask 



IEDQBA 



• If the input element is an ERB, get the current buffer address. 
>• Link to the Forward routine to scan for the destination name. 




Tpost the ERB to the Buffer 
Disposition QCB and indicate 
the end of a receive operation. 

Tpost the buffer to the Buffer 
Return QCB.= = 



Tpost the ERB to the Disk I/O 
QCB to get another buffer. 



• Set LCBRCQCB to point to the 
multiple Routing subtask. MMi 



Tpost the buffer to the Destination 
QCB to be sent. 



• Exit to the TCAM Dispatcher 



MH Functional Routine 



0\ • Perform the 

functions indicated 
by the macro. 

If a recalled header 
buffer was not 
required, tpost the 
ERB to the Buffer 
Disposition QCB 
and exit to the 
TCAM Dispatcher. ■ 

Tpost the buffer to 
the Destination 
QCB. 

Set LCBRCQCB to 
point to Buffer 
Disposition. 



o 



TCAM Dispatcher 



^ The header is obtained and 
Disk End Appendage returns 
to the Multiple Routing 
subtask. 



Chart 14. Flow of Buffers through a 'Message Handler 
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Incoming MH Group 



• Tpost the first message segment to its Destination QCB. t 



Destination Scheduler 



I 



IEDQHM 



1 . Locate the message queues data set address for the first unit by examining QCBDNHDR 
in the Destination QCB. 

2. Store this value of address in the buffer prefix (PRFCRCD) and in the SCB (SCBCHDR). 

3. Place the AVTNADDR value in the next-message field (QCBDNHDR) in the Destination 

QCB, in the buffer prefix (PRFNHDR), and in the SCB (SCBNHDR) to indicate the location for the 
first buffer of the next message to be received. 

4. Update AVTNADDR by adding one. 

5. Determine if there are more units (additional records) in the message segment. 
IF there are: 

a. Place the AVT value of address in PRFTRA in the buffer prefix to queue 
the first unit. 

b. Assign contiguous values of address to the other units until all are queued. 
The only pointer required to locate the additional records is the first unit. 

c. Update the AVT value of address by adding the total number of additional units. 




a. Assign the current AVT value of address as the next-buffer location by placing 
the address value from PRFNTXT in the buffer prefix and in SCBNTXT in the SCB. 

b. Update the AVT value of address by adding one. 




Yes 



a. Assign SCBNTXT as the location for the first unit of this segment by placing 
SCBNTXT in PRFCRCD in the buffer prefix. 

b. Put the address of the first unit of this message in the buffer prefix by placing 
SCBCHDR in PRFCHDR. 

c. Queue any additional records, as in 5. 



f 



8. Set up the queue-back chain. 

9. Tpost the buffer to the Disk I/O QCB. 



CPB Initialization 



IEDQFA 



Use CPBs to write the buffer out on the disk message queues data set. 



oO ^ 1 > 



AVT 



AVTNADDR 



^ ( 5c ) Add the number of 

^"~ — -. __ \^__^/ additional units 



I I Destination QCB 



Gc:-.-_--._„ 



»© 



QCBDNHDR 



LEGEND 



, Control flow through the 
TCAM Dispatcher 




3 N 




\ / /Buffer 1 Prefix 



x 1 1 




PRFXTRA 




PRFNTXT 


-V V * 


PRFCRCD 


* 


PRFNHDR 




PRFCHDR 






^^ — 








/ / Buffer 2 Prefix 
/ / 

/ / 



■f^ Control flow through a branch 
or sequential instructions 

-^ Data flow 



PRFNTXT 



►Data movement 

Note: The nUmbers in the data 
layout correspond to the numbers 
in the Destination Scheduler box. 



\ ^ 

\ *\ PRFCRCD 

\ 
\ 



PRFXTRA 



PRFNHDR 



PRFCHDR 




Chart 15. Nonreusable Disk Queuinq Functions of the Destination 
Scheduler Routine 
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e 



RECEIVE START - an LCB tposted to itself on top of the ready queue indicates that a line is free. At open time, the Receive Scheduler STCB has the highest priority on the STCB chain of the LCB. 



Receive Scheduler 



• Recognize that there is a free line so that a receive operation can be started. 

• Refer to the DCB for the line to get the number of initial buffers requested. 

• Complete the ERB in the LCB by adding a count of the initial buffers requested. 

• Tpost the ERB to the Buffer Request QCB. 



Buffer Request Routine 



IEDQGA 



Determine that this is an initial request by checking the ERB priority field. 



$ 



• Refer to the line DCB to determine the number of units per buffer. 

• Get the units for the required number of buffers from the buffer unit pool. 




No 



Chain the ERB into the element chain of the Buffer Return QCB 
by priority. Exit to the TCAM Dispatcher. 



Branch via a BALR instruction to Buffer Association. 



<F 



Tpost the ERB to the Activate QCB. 



Activate Subtask 



I 



Buffer Return 



IEDQGB 



Build and chain buffers off the ERB until the request is satisfied by entering IEDQGA. 



Buffer Association 



IEDQGD 



Build a Read CCW and TIC in each unit control area. 
Return via a BR 14 instruction. 



IEDQKA 



• Build the initial contact CCWs to poll the invitation list. 

• Refer to the DCT to get the channel characteristics. 

• Check the line to poll the terminal. 

• Issue EXCP to start receiving on the line. 



I 




TCAM Dispatcher 

Control flow through OS 

Control flow through the TCAM Dispatcher 

Control flow through a branch or sequential instructions 



Chart 16. Functional Flow when fleceivinq from a tine (Part 1 of 4) 
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Note: PCI Appendage is serviced first if channel end and PCI occur at the same time. If the response to poll is positive, PCI Appendage gains control. 
Line End Appendage gains control from a negative response, that is, when an EOT is received. 



First PCI Interrupt 
OS, 



PCI Appendage 



IGG019RN 



iz 



• Tpost an ERB to the Buffer Request QCB to request buffers to fulfill BUFMAX. 

• OS Post the TCAM MCP. 

• Branch via a BR 14 instruction to IOS. 



V 

IOS 



OS 



Line End Appendage 



lz 



Test for a positive response 
to polling. 



TCAM Dispatcher 



The ERB from PCI Appendage is on top of the ready queue. 



Buffer Request 



IEDQGA 



ii 



• Determine that this is a first PCI request by checking the ERB priority field. 

• Get the units for the required number of buffers from the buffer unit pool. 




Chain the ERB into the element chain of the Buffer Return 
"^ QCB by priority. Exit to the TCAM Dispatcher. ■■■■— 



Yes 



V 

Branch via a BALR instruction to : Buffer Association. 



V 



Return to the TCAM Dispatcher. 



V 

TCAM Dispatcher 



Buffer Return 



IEDQGB 



Build and chain buffers off the ERB until the request is satisfied by entering IEDQGA. 



Buffer Association 



IEDQGD 



• Build a Read- CCW and TIC in each unit control area. 

• Include the buffers in the CCW of the line LCB for a continuous operation. 

• Return via a BR 14 instruction. 



Chart 16. Functional Flow when Beceivinq from a Line (Part 2 of 4) 
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PCI Appendage 



Subsequent PCI or I/O Interrupt 
OS 



Iz 



For BSC devices, branch to the Line End Appendage. 



IGG019RN 



Line End Appendage 



• Tpost the previous buffers to the STARTMH QCB. 

• Tpost the ERB to the Buffer Request QCB to request enough buffers to replace the buffers just freed. 

• OS post the TCAM MCP ECB. 

• Branch via BR 14 to IOS. 



• Initialize for transparent mode, if present. 

• Return to IOS. 



TCAM Dispatcher 



IOS 




STARTMH 



IEDQAA 



• Process the I NHDR subgroup, if appropriate. 

• Process the INBUF subgroup. 




Yes 



No 



• Tpost the buffer to the appropriate Destination QCB. 



Send Scheduler 



ii 



Buffer Disposition 



IEDQBD 



• Perform recalled header processing. 

• Tpost the buffer to the appropriate Destination QCB. 

• Tpost any unused buffers to the Buffer Return QCB. 

• Perform LOCK and multiple routing processing. 



- OR - 



Bypass control to the Destination Scheduler. 



If the Get Scheduler STCB is in the STCB chain, the QCB 
is for an application program. If it is not the last buffer of a 
message, return; otherwise, begin message retrieval. 



Chart 16. Functional Flow when Beceivinq from a Line (Part 3 of 4) 
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Destination Scheduler 



1 



IEDQHM 



• Build chains in the buffer prefix. 

• Assign a value of disk relative record address to each unit. 

• Tpost the buffer to the Disk I/O QCB. 

• When all buffers are processed, branch via a BALR instruction to the Send Scheduler. 



CPB Initialization 



IDEQFA 



• Put the input element on the no-CPB queue in FIFO order. 

• Process the first element on the no-CPB queue - assume that this is the element just received. 

• Build CPBs for the units of the buffer. 

• Put the CPB on the input queue for the EXCP Driver. 

• Swap the CPB units and the buffer units. Tpost the freed buffer units to the Buffer Return QCB. 

• Branch to EXCP Driver. 



EXCP Driver 



IGG019RC 



17 



• Complete the CPBs for the buffer. 

• Chain the buffers together. 

• Branch to the MBBCCHHR Convert routine.: 



f 



• Locate the IOB and put the CPBs on the IOB new queue. 

• Put at least one CPB on the retry queue. 

• Issue an EXCP instruction to start channel activity. 



Disk End Appendage 



I/O Interrupt 
"OS^ 



IGG019R2 



• Put CPBs on the Cleanup queue. 

• Tpost the CPB Cleanup QCB on the disabled ready queue. 



V 

IOS 



TCAM Dispatcher 



CPB Cleanup 



^ 



IEDQFQ 



Put the CPBs back into the CPB free pool. 
Branch to CPB Initialization. 



Recycle to process any elements remaining on the no-CPB queue due to a lack of CPBs. 



Send Scheduler 



Move the Send Scheduler STCB from the STCB chain of the Destination QCB to that 
of the LCB. 

If the LCB is free, tpost the LCB to itself and place it on the ready queue via DSPPOSTR. 



MBBCCHHR Convert Routine 



IEDQFP 



Convert the record address to the absolute MBBCCHHR. 
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SEND START - an LCB tposted to itself on top of the ready queue Indicates that a line is free. A send operation can be initiated when 
the Send Scheduler STCB has top priority in the STCB chain of the LCB. At open time the Send Scheduler STCB is on the STCB chain of 
the Destination QCB to await a full message. When the Receive Scheduler has no messages to receive, the Send Scheduler STCB is 
moved to the STCB chain of the LCB. It remains on the LCB to send messages until there is no message free to' send. At this time, the 
Send Scheduler moves its STCB to the STCB chain of the Destination QCB. 



Send Scheduler 



• Refer to the line DCB to get the number of buffers to request. 

• Build an ERB with a count of the required buffers. 

• Tpost the ERB to the Disk I/O QCB. 



CPB Initialization 



IEDQFA 



• Put the ERB on the no-CPB queue in FIFO order to get the CPBs from the CPB free pool. (Assume that this is the element to process now.) 

• Refer to the line DCB to get the number of units per buffer. 

• Put in the SCB the address of the record to read from the message queues data set. 

• Get the CPBs from the CPB free pool. 

• Build Seek Search Read CCWs in the CPBs. 

• Chain the CPBs off the EXCP Driver input queue. 

• Branch to EXCP Driver. 



EXCP Driver 



IGG019RC 



• Add Seek Search CCWs to the CPBs, if necessary, and chain the CPBs together. 

• Branch via a BAL instruction to the MBBCCHHR Convert ■•"■■«■■■'"» ■ 



• Place the CPB on the proper IOB queue by CC priority. 

• Build command chain and chain data flags. 

• Issue an EXCP command to initiate channel activity. 



•LEGEND: 



MBBCCHHrTConvert Routine 



IEDQFP 



^ • Convert the message queues data set address to the MBBCCHHR format. 



1" 



— 7 OS/^ Control flow through OS 

Control flow through the TCAM Dispatcher 
Z^ Control flow through a branch or sequential instrucrions 



TCAM Dispatcher 



Chart 17. Functional Flow when Sending to a Line (Part 1 of 3) 
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Channel End/Device End on a Disk Operation - IOS issues a BALR to Disk End Appendage 
Disk End Appendage Ob. 



JL 



IGG019R2 



• Locate the appropriate DEB. 

• Move the CPBs that are on the EXCP queue (IOBSTART) to the disk end queue. 

• Insert the CPB Cleanup QCB on the disabled ready queue by priority. 

• OS post the TCAM ECB to indicate that the I/O operation is complete. 

• If there are no CPBs on the IOB retry queue, return. to IOS with channel activity stopped; otherwise, 
chain the CPBs onto the EXCP queue and return to channel restart in IOS. 



T 
i 

IOS 



CPB Cleanup QCB tposted to itself on top of the enabled ready queue 
CPB Cleanup Routine 



ay s 

1 



IEDQFQ 



• If these are write CPBs, process the CPBs on the input queue to return them to the CPB free pool. 

• If these are read CPBs, for each CRB get a unit from the buffer unit pool, place it in the ERB buffer 
chain, and move the CPB data to the unit. 

• Branch to CPB Initialization when the last CPB is processed. 



CPB Initialization 



H 



IEDQFA 



• If the ERB request is not satisfied, recycle from point A to complete the request. ; 

• If the ERB request is satisfied, tpost the ERB with full buffers to the Activite QCB. 



Activate Subtask 



=oQ 



IEDQKA 



• Build the initial contact channel program and issue EXCP. 



IOS Channel End 



Line End Appendage 



i 



• Check for a positive response to addressing. 

• If this is the initial message buffer for the line, tpost the buffer to the STARTMH QCB for outgoing message processing. 

• Return to IOS 



V 

IOS 



TCAM Dispatcher 



The RCB for the buffer that is to receive outgoing MH processing is on top of the ready queue: 



STARTMH Subtask 



IEDQAA 



• Process the OUTHDR subgroup, if appropriate. 

• Process the OUTBUF subgroup. 

• At the beginning of the OUTMSG subgroup - 




Yes 



^ Tpost the buffer to the Read-ahead QCB and exit to the TCAM Dispatcher. 



Branch to Buffer Association. 



Buffer Association 



IEDQBD 



• Build Write and Write idles CCWs in the CPBs. 

• Locate the IOB. 

• Put the CCWs in the activated channel program chain. 

• Exit to,-the TCAM Dispatcher. 



V 

TCAM Dispatcher 

Chart 17. functional Flow when Sending to a Line (Part 2 of 3) 
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PCI Appendage 



First PCI 
OS 



Subsequent PCI 

J" 

OS 



IGG019RN 



PCI Appendage 



• Build the ERB with a count of the required buffers. 

• Tpost the ERB to the Disk I/O QCB. 



:£ 



IGG019RN 



Tpost the buffers to the Buffer Return QCB. 

If more buffers are needed, build the ERB with a count of the required buffers. 

Tpost the ERB to the Disk I/O QCB. 



I 



IOS 



Repeat the cycle from point A to here until an EOM is sent. 



IOS Channel End/Device End Interrupt 



Line End Appendage 



Tpost the last buffer to the Buffer Disposition QCB. 



F 



IOS 



TCAM Dispatcher 



The RCB for the last buffer is on the top of the ready queue. 



Buffer Disposition 



ii 



IEDQBD 



• The message is completely sent; therefore, perform OUTMSG processing. 

• Flag the message serviced. 

• Tpost the LCB to itself. 



Send Scheduler 



<1 




Yes 



:^ Tpost the ERB to the Disk I/O QCB to process the next message. Leave the Send Scheduler' 
STCB in the LCB STCB chain by priority. 



Free the Line. Move the Send Scheduler STCB to the STCB chain of the Destination QCB. 



I!- 



TCAM Dispatcher 

Chart 1*7. Functional Flow when Sending to a Line (Part 3 of 3) 
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Operator Control 



Operator Control Control Module 



fecollOD 



Stop Line Routine IEDQCV 



• Stop all active 
lines in the TCAM 
system. 



• Load the MCP Closedown Processing routine 



V 

MCP Closedown Processing Routine 



IEDQC0 



^ • Issue a WAIT on the Operator Control ECB. 



• Set closedown switches in the Address Vector Table. 

• Issue a WAIT macro to return control to the MCP. 

• Stop all active lines. 



Check for any open DCBs in the application programs 
by examining the PCB use counts. 



Yes ^ Issue a WTO message 
and wait on the 
Operator Control ECB. 




y es Tpost the environ- 

- ^ ment checkpoint 

request element to 
the ready queue. 



Tpost the closedown 
completion element to the 
ready queue. 



V 



• Return to Operator Control. 



V 



Operator Control issues a RETURN when it has no 
other work to do. 



• Checks "Closedown" bit in the Address Vector Table, .^z 
If the bit is on, issue a return to OS. 




LEGEND: 



_i^ Control flow through a branch or 
sequential instructions 



=/OS^=> Control flow through OS 



Chart 19. Functional Flow for MCPCLOSE and Closedown Completion 
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MESSAGE CONTROL PROGRAM 
READY 



CLOSE Line Group 



CLOSE Checkpoint 



CLOSE Message Queue 



RETURN' 



System Close 
Module 



Line Group Close Routine 



OS 

i 



XCTL 



IGG02035 




Yes 



-r^m Schedule any active application programs for 
an abend. 



No 



V 



Issue EXCP on each line in the line group to perform OBR-SDR error recording. 



Line Group Close Routine 



J 

OS 

i 



XCTL 



IGG02036 



• Purge I/O requests associated with the DCB. 

• Disable the lines unless they are connected to a Type III adapter. 

• Free the LCBs. 

• Clear the associated Cross Reference Table entries. 

• Zero the AVT pointer to the DCB and free the Cross Reference Table when all DCBs are closed. 



Checkpoint Close Routine 



T 

OS 

i 



XCTL 



IGG02041 




Normal 



ABEND 



Free the checkpoint work area. 
Delete IGG019RA. = 



:£> • Set a closedown indicator in the checkpoint 
control record. 

• Write the control record on disk. 

• Free the checkpoint work area. 



Message Queues Close Routine 



J 

OS 



XCTL 



IGG02030 



• Free the DEB, all lOBs, all CPBs, buffers, and any main storage message queues data sets. 

• Zero the AVT pointer to the DCB. 

• Remove the AVT address pointer from the CVT. 



y XCTL 
OS 



i 



System Close 
Module 



J<*M 



=0 ERP Routines 



• Perform OBR-SDR error recording 



lV°s/= 



LEGEND: 

■=/OlJb=5> Control flow through OS 



1^ Control flow through a 

branch or sequential instructions 



Chart 19. Functional Flow of the DCB Closedown Procedure 
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Application Program 



OPEN DCB = 




GET/PUT and READ/AWRITE Open Executor 



IGG01946 




:£> Set an "unsuccessful open" flag in the DCB and exit to the OS Open module. 



• Get the "queuename" that was coded on the DD card from the Job File Control Block in the DCB work area. 

• Invoke the Binary Search routine in the MCP through IEDQUI .1 



(F 



• Issue a GETMAIN for an access method work area and a DEB. 

• Issue SVC 102 to tpost a special element that contains a pointer to the Terminal Table process entry to the Open/Close subtask in the MCP. 

• Issue an OS WAIT on the application program FCR. 



r 



Check the status flag in the process entry for successful execution of the Open/Close subtask in the MCP. 
Successful ^ ™° 




^> Set an "unsuccessful open" flag in the DCB and exit to the OS Open module. 



• Link the access method work area to the process entry work area and to the DCB. 

• Initialize the DEB and enqueue it on the TCB DEB chain. 

• Load the appropriate access method module for this DCB - GET/READ or PUT/WRITE. 

• Issue XCTL to IGG01 947. 






V os A 



OS 



IGG01947 



If this is not an input DCB, exit; otherwise, continue. 




O Move the Get Scheduler StCB from Read-ahead QCB to the Destination QCB. 



• Initialize and tpost an ERB for message buffers to the Disk I/O QCB in order to initiate the read-ahead process in the MCP. 

• If this is locate mode, get space for a work area and put its address in the DEB. 

• Set the "successful open" flag in the DCB. 

• Issue XCTL to the system Open module. 



J? 

Ids, 

System Open Module 



Message Control Program 



Binary Search 



IEDQA1 



Use the "queuename" parameter to search the Termname Table for the corresponding process entry. 



Open/Close Subtask 



IEDQEU 



• Allocate main storage in the MCP for this application program: LCB, process entry work area, and one or more SCBs. 

• Increment the use count in the PCB by one. The use count is a count of the open DCBs for this PCB. 

• Load the appropriate scheduler (send or receive). 

• Link the scheduler to its Destination QCB. 

• Set the "good open" flag in the process entry. 

• OS post the application program ECB complete. 



LEGEND: 

■^OsJ=f> Control fiow through OS 

^^^^^■^^ Control flow through the TCAM Dispatcher 



^ Control flow through a branch or sequential instructions 



Chart 20. Initialization Functions in an Application Program 
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Application Program 

CLOSE DCB^ OS ^X 

GET/PUT and READ/WRITE Close Executor 



1GG02046 



• Tpost a special element that contains the address of the Terminal Table process entry for this application progran 
to the Open/Close subtask in the MCP (via SVC 102). . 



Issue an OS WAIT on the application program ECB. : 



I 



• Free the DEB and the access method work area. 

• Free the locate mode work area, if one is present. 

• Delete any loaded GET/PUT modules. 

• Restore the DCB to its pre-open status; turn off the DCB open flag. 

• Branch via an XCTL to IGG02047. 



GET/PUT AND READ/WRITE close Executor 



J 

OS 



Open/Close Subtask 



IEDQEU 



^03/= 



=£> • Free the process entry work area and the SCB. 

• Decrement the use count in the PCB. 

• Unlink and delete the scheduler. 

• Deactivate the Destination QCB for this application program. 

• Turn off the open flag in the process entry. 

• Free the LCB if the PCB use count is equal to zero. 

• OS post the application program ECB complete (via SVC 102). 



y°^ 



IGG02047 



• Find any LCB that is locked to the DCB being closed, unlock the associated line, and free the LCB 
(via an SVC 102 tpost). 

• Branch via an XCTL to the next close module indicated in the Where-to-Go Table. 



OS 

i 

Next Close Module 



LEGEND: 
r^/oS/^O Control Flow through OS 



Chart 21. Termination Functions in an Application Proqraro 
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MESSAGE CONTROL PROGRAM 



When the buffer of a message is tposted to the Destination QCB for an application program, the Get Scheduler STCB precedes the 
Destination Scheduler STCB in the STCB chain of the Destination QCB. Upon receiving control, the Get Scheduler bypasses control to 
the Destination Scheduler. 



Destination Scheduler 



1 



IEDQHM 



Queue the buffer on the message queues data set. 



No 




zj> Exit to the TCAM Dispatcher. 



V 

Pass control to the Get Scheduler. 



I 



Get Scheduler 



IEDQEW 



Build and tpost a special element to the Read-ahead QCB. 

Move the Get Scheduler STCB to the Read-ahead QCB STCB chain. 

Return control to the Destination Scheduler. 



I 



Destination Scheduler 



IEDQHM 



• Exit to the TCAM Dispatcher. 



T 



When the special element reaches the top of the ready queue, the TCAM Dispatcher activates the Get Scheduler. 



Get Scheduler 



IEDQEW 



• Recognize the special element and, as a result, tpost the ERB with a count of the required buffers for the last message to the Disk 
I/O QCB. 



CPB Initialization 



1 



IEDQFA 



• Read the message from the message queues data set and chain the full buffers off the ERB element chain. (This is a normal buffer 
request in a send operation.) 

• Tpost the ERB to the Read-ahead QCB. 



I 



Get Scheduler 



IEDQEW 




Buffer Return 



Tpost the empty buffers to the Buffer Return QCB. If one of 
the buffers was an EOM/ tpost the buffers from the pre-MH 
queue to the STARTMH QCB, up to an EOM, and at EOM 
turn off the MHO k flag. 



Put the buffers on the pre-MH queue. If the MHOK flag (bit 6 in PEWAFLG 
in the process entry work area) is on, tpost the first message on the pre-MH 
queue (PECBUF in the process entry work area) to the STARTMH QCB and 
turn off the flag. 



V 

If a buffer has just been tposted to the STARTMH QCB for outgoing processing, OS post the application program 
GET/READ ECB to indicate that buffers are ready to be read. This allows the application program to gain control at B 
when the MCP enters a wait state. 



STARTMH Subtask 



IEDQAA 



• "Process the macros in the outgoing group for this application progran 



Incoming/Outgoing Message Delimiter Routine 



IEDQA4 



• Tpost the buffers to the Read-ahead QCB for this application program. 



I 



Get Scheduler 



IEDQEW 



Enqueue the buffers on the element chain of the Read-ahead QCB. 

More 

t the^^ Yes 

^> Tpost the ERB to the Disk I/O QCB and reenter this processing cycle at A. 




No 



V 



Move the Get Scheduler STCB to the STCB chain of the Destination QCB to wait for more buffers. 



V 

TCAM Dispatcher 



APPLICATION PROGRAM 
GET or READ macro 
GET/READ Routine 




IGG019RG 



Examine the element chain of the associated Read-ahead QCB in the MCP. 




V 

• Read buffers until either the application program work area is full, all the available buffers are read, or an EOM buffer is 
encountered. 

• Build a special element that contains the number of buffers just read. This element is in the access method work area. 

• Tpost (via SVC 102) the special element to the Read-ahead QCB in the MCP. 

• Jf one of the buffers read contains EOM, turn on the MHOK flag to indicate to the Get Scheduler that a complete message has 
been read by the application program and a new message can begin to be processed by outgoing MH in the MCP. 




Yes 



-•v. Pass control to the next sequential instruction in the application 
program. 



OS post the MCP ECB to allow more buffers to be read. If the request is a GET, OS wait until enough buffers are available to 
satisfy the request. If the request is a READ, delay the wait until the CHECK macro is encountered. 



LEGEND: 

z ^OS / ^ = v> Control flow through OS 

^^^M^^^^ Control flow through the TCAM Dispatcher 

^ Control flow through a branch or sequential instructions. 

Chart 22. ?unctional ?low of How Data is Passed from the MCP 
to an Application Program 
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APPLICATION PROGRAM 



MESSAGE CONTROL PROGRAM 



PUT or WRITE macro 



PUT/WRITE Routine 




IGG019RI 



• Initialize the access method work area with data from the DCB/DECB. 

• Build a special element (RCB) that has the address of the data in the application program work area. 

• Use SVC 102 to tpost the special element to the Put Scheduler QCB in the MCP. SVC 102 also OS 
posts the MCP ECB complete so that the MCP can regain control of the system. 

• Issue an OS WAIT to allow the MCP to regain control for the Put Scheduler to empty the application 
program work area. 



Destination Scheduler 



IEDQHM 



Build chains in the buffer prefix. 

Assign message queues values of address to queue the buffers. 

Tpost the buffer to the Disk I/O QCB. 

If the Send Scheduler STCB is in the STCB chain of this Destination QCB, the last buffer has been 
handled by IEDQHM; so, branch to the Send Scheduler- ■ 



CPB Initialization 



I 



IEDQFA 



Send Scheduler 



• Put the message buffers on the message queues data set. 

• Exit to EXCP Driver for the actual I/O operation. 



When a special element that contains the address of data in an application program reaches the top of the 
ready queue, the TCAM Dispatcher activates the Put Scheduler. 



Put Scheduler 



I 



IEDQEC 



• Build an ERB to request buffers to contain the application program data. 

• Tpost the ERB to the Buffer Request QCB. 



Buffer Request Routine 



IEDQGA 



• Get empty buffers from the buffer unit pool and chain the buffers off the ERB. (This is the same as a 
normal buffer request in a receive operation.) 

• Tpost the ERB to the Destination QCB for the application program. 



Put Scheduler 



IEDQEC 



• Get the address of the empty buffers on the ERB. 

• Get the application program work area address and fill the buffers with data from that work area. 




No 



^^Continue to fill buffers, one at a time, 
until this decision has a YES answer. 



• Tpost the full buffers to the STARTMH QCB for this application program for incoming message processing, 

• Tpost any empty buffers to the Buffer Return QCB. 

• Use SVC 102 to OS post the application program ECB complete, so that the application program can 
regain control at its next sequential instruction whenever the MCP enters the wait state. 



STARTMH Subtask 



I 



IEDQAA 



• Process the buffers through the macros in the incoming group for this application program. 



Incoming/Outgoing Message Delimiter Routine ^7 



IEDQA4 




Yes 



_*s Tpost the buffer to the Buffer Disposition QCB 



No 



V 



Tpost the buffer to the Destination QCB for the indicated destination 
of the message . 



• Locate the LCB with the same relative line number as the Destination QCB. 

• If the line is free, tpost the LCB to itself to start a send operation. 

• Move the Send Scheduler STCB to the STCB chain of the LCB. 



Buffer Dispostion Subtask 



IEDQBD 



• Tpost any unused buffers to the Buffer Return QCB. 

• Examine and process the OUTMSG macros. 

• Tpost the buffer to the Destination QCB. 



TCAM Dispatcher 



Chart 23. 



Functional Flow of How Data is Passed from an 
Application Proqram to the ^CP 
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APPLICATION PROGRAM 



MESSAGE CONTROL PROGRAM 



MR E LEASE 

MCPCLOSE 

STARTLN 

STOPLN 

CLOSEMC 

RELEASEM 



CQTAM only 



The user issues one of these 
macros to enter Operator 
Control from the application 
program . 



Operator Control / Application Program 
Interface Routine 



IEDQET 



• Initialize the Command Input Buffer (CIB) control block with the type of command and other pertinent data. 

• Set the SVC 102 parameters necessary to move the CIB to the Process Control Block (PCB) in the MCP. 

• Set up the SVC 102 parameters necessary to tpost the CIB to the Operator Control QCB. 

• Issue SVC 102 to move and tpost the CIB. 




No 



=0 



Issue an OS WAIT to allow the MCP 
to gain control ■ 



Yes 



OS 



-fs The TCAM Dispatcher processes the elements on the ready queue until the CIB 

that was tposted to the Operator Control QCB has top priority.. At this point, the 
Dispatcher relinquishes control to the Operator Control task. 



OS 



OPERATOR CONTROL 
Operator Gjntrol Control Module 



ii 



• Process the operator control command indicated in the CIB. 

• Store a return code in register 15. 

• Use SVC 102 to OS post the ECB for the application program complete 



o 



Continue processing the next sequential instruction in the application program. 



=/os/= 



LEGEND: 
r=/os/=C> Control flow through OS 

-^ > Control flow through a branch instruction 



Chart 24. Application Proqraro Interface with Operator Control 
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APPLICATION PROGRAM 



SYSTEM NUCLEUS 



MESSAGE CONTROL PROGRAM 



Termname Table 



TCOPY 
ICOPY 
QCOPY 
TCHNG 



The user issues one of these macros to initiate the application program network 
control facilities. 



• For TCOPY, QCOPY, TCHNG - locate the Termname Table and scan to locate the specified entry. 

• For ICOPY - locate the specified invitation list. 

TCHNG 




:£> Move data from the application program's work area to the 
specified MCP location. 



TCOPY 
ICOPY 
QCOPY 



V 



Read data from the specified MCP location into the application program work area. 



CVT 




AQCTL SVC 102 



IGC102 



■ / ,. Move data from the application program work 

£ area to the specified MCP location. 



=/os/= 



V 



Next sequential application program instruction. 



Work Area 




LEGEND: 



-► Data Flow 

:£> Control Flow through a branch instruction 



~^f Os/^5> Control Flow through OS 

Chart 25. Application Proqram Network Control Facilities 
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SOURCES OF OPERATOR CONTROL COMMANDS 



MESSAGE CONTROL PROGRAM 



OPERATOR CONTROL TASK 



Link Routine 



IEDQOA 



INTRO 



OPEN <3= 



Operator Control Terminal 



Operator enters an Operator Control command. 



I 

READY 



— -^STARTMH 



/ 



/ 



/ 



/ 



INHDR 



CODE 



Application Program 




© 



User issues any regular Operator Control command 
and puts it to a QCB in the MCP Just like any other 
message. 

STARTLN, STOPLN, MRELEASE, RELEASEM, ICHNG, 
MCPCLOSE, or CLOSEMC macro: 



/. 



Operator Control/Application Program 
Interface Routine IEDQET 



Build a "dummy" CIB. 

Tpost the CIB to the Operator Control QCB. 

Issue an OS WAIT. 



Not Operator 



Control 




System Console 



Operator enters an Operator Control 
command. 



• • • 

Link to the Attach Routine. 

• • • 



Attach Routine 



IEDQOS 



• • • 

Attach the Operator Control task. 

• • • 



Translate Buffer Routine 



IEDQAW 



• Translate the message buffer to EBCDIC. 



Operator Control Interface Routine 



IEDQAQ 



Examine the buffer to determine whether it is an Operator 
Control command. If it is not, return to MH. 
II 



TCAM Command Schedu 


er 




IGC1303D 


• 


Build a CIB and place it 


on the Communication 


Parameter 




List CIB chain. 








• 


Post the ECB for the 


Operator Control task. 






If the buffer is Operator Control, tpost the buffer to the 
Operator Control QCB. 



TCAM Dispatcher 



Recognize that the element is tposted to the QCB of an 
attached task. 

Post the ECB for the attached task. 



Operator Control Control Module 



1GC0110D 



• Examine the GIBs on the Communication Parameter List 
CIB chain, & link to the processing routines. Issue a 
response via WTO. 

• Examine the commands on the Operator Control QCB, and 
link to the processing routines. If the element is a 
"dummy" CIB, enter a return code, tpost the CIB to the 
Destination QCB for the application program and Post 

the application program ECB complete. Otherwise, build 
the response and tpost it to the Destination QCB. 

• After all commands have been processed, issue a WAIT 
on the Operator Control ECB. 



LEGEND: 



Control flow through a branch or sequential 



instructions. 
7 ™ / P Control flow through OS 



>Line Control 



Chart 26. Functional Flow of Operator Control 
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MESSAGE CONTROL PROGRAM 



ENTRY POINTS: 



IEDQND 



READY Routine 



IGG019RP 



OPERATOR CONTROL 



Reusability - 
Cop/ Subtask 



IEDQHG 



HALT- 



=% 



Time Delay 
Subtask 



V • Turn on a bit in the "total checkpoint request" element in the AVT to 
indicate which module is requesting the checkpoint. 

• For all cases except READY, remove the "total checkpoint request" 
element from the time delay queue. 

• Tpost the "total checkpoint request" element to the Checkpoint QCB. 



MCP Closedown Processing Routine 



IEDQC0 



• Tpost the "Operator Control checkpoint request" element to the Check- 
point QCB, which is in the AVT. 

• Terminate Operator Control by issuing a RETURN. 



tV 



/, 



OS 



INMSG 
OUTMSG 



CHECKPT = YES 



Buffer Disposition Subtask 



IEDQBD 



• Recognize that a checkpoint is requested at the end of the processing 
of a complete message. 

• Tpost the LCB, which is serving as the "checkpoint request" element 
to the Checkpoint QCB. 




-/os/i 



• Build a Command Control Block. 

• Tpost the "Operator Control checkpoint request" element to the Check- 
point QCB and issue an OS WAIT. 



/os>L 



Next Operator Control Command 
APPLICATION PROGRAM 
Q TCHNG = 



=/<*/= 



% 



Application Program/Checkpoint Interface Routine 



IEDQNB 



• Build the "application program checkpoint request" element in the PCB 
to indicate a TCHNG request. 

• Tpost this element to the Checkpoint QCB. 



^OS^- 



7 U 7 



CKREQ: 



Application Program/Checkpoint Inrertace Routine 



IEDQNB 



• Build a CKREQ "application program checkpoint request" element in 
the PCB. 

• Tpost this element to the Checkpoint QCB. 



• Branch to the next application program instruction. 



/«/ 



MCPCLOSE 
Operator Control/ Application Program Interface Routine 



IEDQET 



• OS post the Operator Control ECB. 



=/os / > 



=/o S/ 4 



Environment Checkpoint Routine 



IEDQNK 



• Get the "checkpoint request" element from the Checkpoint QCB in the 
AVT. 

• Build an environment checkpoint disk record. 

• "lurn off the AVT "total checkpoint request" element bit that indicates 
which module requested the checkpoint. 

• Tpost the "total checkpoint request" element to the time delay queue, 
or if the request is from Operator Control, tpost the "closedown 
completion request" element to the ready queue. 

• Write the checkpoint control record. 

• Issue an OS WAIT. 



Incident Checkpoint for MH Routine 



IEDQNG 



• Recognize that the request element is an LCB and build ap incident 
checkpoint record for disk from the Option Table. 

• Tpost the LCB to the QCB for the Chain routine. 

• Issue an OS WAIT. 



Incident Checkpoint for Operator Control Routine 



IEDQNJ 



• Recognize the "Operator Control checkpoint request" eLement and build 
an incident record from the Command Control Block. 

• OS post the Operator Control ECB and wait. 



Incident Checkpoint for TCHNG Routine 



IEDQNH 



Recognize the TCHNG "application program checkpoint request" 
element and build an incident record from the Terminal Table 
and Option Table. 

OS post the application program ECB and wait. 



Build CKREQ Disk Record Routine 



IEDQNM 



Recognize the CKREQ "application program checkpoint request" 
element and build a CKREQ record from the Terminal Table, QCB, and 
Option Table. 

Post the application program ECB and wait. 



Entry by an MCP condition 

(3 Entry by a HALT operator control command 

Entry by the INMSG or OUTMSG macro in the MCP 

(5) Entry by a VARY, MODIFY, HOLD, or RELEASE operator control 
command 

Entry by a TCHNG macro in an application program 
Entry by the CKREQ macro in an application program 
Entry by the MCPCLOSE macro in an application program 



=> OS 



LEGEND: 




Control flow through a branch or sequential 
instructions 

Control flow through OS 

Control flow through the TCAM 

Dispatcher and OS: 

The TCAM Dispatcher gains control when a 
request element is tposted to the checkpoint 
QCB. The Dispatcher recognizes that the 
element is for an attached task and chains the 
request element off the Checkpoint QCB. The 
Dispatcher then OS posts the Checkpoint ECB 
and releases control to OS via an OS WAIT 
instruction. 



Chart 27. Functional Flow of the Checkpoint Routines 
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Checkpoint Executor 



Checkpoint Disk l/O routine's ECB is posted complete 
an l/O operation has just completed. 



Checkpoint Notification and 
Disposition Routine 



• Examine the key field of the record just written: 

• If the last segment of a checkpoint: 

- Free the record building area. 

- Zero the current EXCP field. 

- Turn off the AVT checkpoint request bits. 

- Remove the request element from Checkpoint QCB. 

- If this is an environment checkpoint request from MCPCLOSE, 
tpost the "closedown completion request" element to the ready 
queue. If the request is not from MCPCLOSE, tpost the 
"environment checkpoint request" element to the time delay queue 

• If not the last segment of a checkpoint: 

- Place the offset of the record building routine for the record 
just written in register 15. 





Environment Checkpoint Routine 



LEGEND: 



-^ Control flow through a branch or sequential instructions 



^ Control flow through the Checkpoint Executor 



/OS / — > Control flow through OS 



No I/O operation has just completed and a record is 
on the checkpoint disk I/O queue. 



Checkpoint Disk 
I/O Routine 



• Remove the disk record from the checkpoint 
disk l/O queue (if first segment). 

Build the CCWs and an I OB. 

Issue EXCP. 

• Place the main storage address of the record in 
the current EXCP field. 




If the record just written is the last segment of 
an environment checkpoint, rewrite the control 
record. 



▼ 
OS 



The environment checkpoint request element is on the 
Checkpoint QCB. 



Environment Checkpoint Routine 



• Issue a GETMAIN. 




-^ • Place the offset of the No 
Available Core routine in 
register 15. - 



• Build one segment of the environment checkpoint record. 



Nc V • Place the offset of the 
Checkpoint Disk I/O 




routine in register 15. 




• Place the offset of the Checkpoint Queue Manager in register 15. 



Checkpoint Queue Manager 



No Available Core Routine 




Yes 



• Issue an error message. 

• Place the offset for the Checkpoint 
Notification and Disposition routine 
in register 15. 



♦ Checkpoint 
Executor 



Checkpoint Notification^ and Disposition Routine 



Remove the unsatisfied request element 
from the Checkpoint QCB. 



Checkpoint Disk I/O Routine 



Checkpoint Executor 



V 



• Chain the checkpoint disk record on the checkpoint 
disk l/O queue. 

• If the disk record is for an environment checkpoint, 
free any incident records on the queue and turn on 
"incident overflow" bit in any incident checkpoint 
request element on the Checkpoint QCB. 



Checkpoint Executor 



Chart 28. Control Flow of the Environment checkpoint Routines 
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Chart 29. Linkage among the Start-Stop EEP Modules 

Chart 30. Linkage among the BSC EPP nodules 
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GLOSSARY 



Acces s method (ACSMET Hi work area: a storage space in an application 
program. This work area contains data necessary for the interface 
between the application program and the MCP. 

Additional records; the units, other than the first unit, of a buffer 
that is beinq placed on a messaqe queue. 

Address: in reference to disk queuinq, this term refers to the disk 
relative record number used to queue a unit of a messaqe segment. In 
reference to main storaqe queuinq, the address is the actual location 
of a unit of a messaqe seqment. 

Address Vector Table -(AVT) : in TCAM , a local constant area. 

Appli cation program : a proqram that processes the text portions of 
messaqes. Application proqrams run asynchronously with the message 
control proqram, and are usually located in another partition or 
reqion. 

Attac hed- task -: a unit of work that is created by another task by means 
of the ATTACH macro and that competes independently for control of the 
CPU. In TCAM, Checkpoint, Operator Control, On-line Test, and FE 
Common Write are attached tasks. 

Auto- Poll-: a hardware feature or a TCtJ that processes an invitation 
list, pollinq the terminals in order and handling negative responses 
to polling without interrupting the CPU. At the end of the list, 
polling is resumed ■ -at the beginning of the list. 

Bi nary -synchronous IBSC) line : a line on which the data transmission 
or character synchronism is controlled by timing signals generated at 
the sending and receiving stations. 

Block: that portion of a message terminated by line control 
characters, EOB, ETB, ETX, or EOT. 

B uffer : a main storage area into which a message segment is read or 
from which a message* segment is written. A buffer is a temporary 
holding area that is used to compensate for a difference in the rate 
of flow of information between input/output devices and the CPU. The 
size of the buffers is designated by the user. In TCAM, a buffer is 
made up of one or more units, in which the total number of bytes 
satisfy the user-specified buffer size. 

Buffer prefix -: a control area at the beginning of each buffer. The 

first buffer of a message in TCAM has a 30-byte prefix, while the 

prefix for each subseguent buffer of a messaqe is 23 bytes long. A 

buffer prefix is contained within the userspecified buffer length and 
TCAM places control information in the prefix. 
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Buffer unit: see unit. 

Buffer unit pool: a chain of all the buffer units that are not 
currently beinq used by TCAM. This chain is the element chain of the 
Buffer Request CCE. At assembly time, the buffer unit pool contains 
the number of units that is equal to the sum of the inteqers specified 
by the LNUNITS and MSUNITS operands of the INTRO macro. 

Buffered -terminal: a terminal that has a hardware buffer. When the 
user specifies the BFDELAY operand of a TERMINAL macro for a buffered 
terminal, the MCP sends messaqes to that terminal, seqment-by-seqment. 
After a seqment is sent, the MCP pauses to allow the terminal to empty 
its buffer. Durinq this pause, the MCP may send messaqe seqments to 
the other stations on the line. 

Calling: a procedure by which a first party attempts to establish a 
connection with a seccnd party throuqh a central exchanqe. Also 
termed dialinq. 

Cascade entry: a Terminal Table block of information that is 
associated with a cascade list. 

Cascade list: a list of pointers to sinqle, qroup, or process entries. 
TCAM queues messaqe for the first valid entry with the fewest messaqes 
queued for it in the list. 

Channel Command Word- fCCW) : a doutleword definition of an operation to 
be performed by the I/O channel. One or more CCWs constitute a 
channel proqram. 

Channel Program Block {CPB) : a control area that contains an I/O 
channel proqram and a pointer to the buffer that it is to process. A 
CPB is used in the transfer of data between buffer units and disk 
messaqe queues. The CPB operand of the INTRO macro specifies the 
number of CPBs in the TCAM system. 

Checkpoint data set: a set of checkpoint records that are maintained 
and stored en a direct access storaqe device. When the 
Checkpoint/Restart facility is used, TCAP uses these records to 
restructure the MCP environment after closedown or system failure. 

Checkpoint request record: a checkpoint taken in response to the 
issuance of a CKREQ macro in an application proqram. This record 
contains the status of a sinqle destination queue for the application 
proqram issuinq the macro. Durinq restart TCAM uses the latest 
checkpoint request record for a message queue -to start sendinq the 
application proqram the messaqe following the last message sent at the 
time that the checkpoint request record was written, 

Checkpoint/Restart : a TCAM facility that records the status of the 
telecommunications network at desiqnated intervals or followinq 
certain events. Followinq system failure cr closedown, this facility 
uses the records it has taken to restart the system without loss of 
messaqes. 
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CKREQ checkpoint reco rd; see Checkpoint request record * 

Cold. start: a TCAM MCP start-up in which TCAM reinitializes the 
system. 

Command Input Buffer (CIB) : a communication parameter list that is 
used by Operator Control to process a command. It describes the 
command sent from the console and contains the command code r the 
console identification, and the data in the command. 

Communication Parameter List: the interface between TCAM Operator 
Control and the Master Scheduler for commands entered from the system 
console. 

Communication- Vector Table (CVT) ; a part of the resident nucleus in 
the Operatinq System (OS) that provides the means whereby nonresident 
routines may refer to information in the nucleus of the control 
proqram. 

Comp atible QTAM : the ability to operate a QTAM application proqram 
under a TCAM MCP. 

Component-: a point in a communications system at which data can enter 
or leave; an input/output device. A component is always attached to 
a terminal control unit. 

C ontinuation restart: a TCAM MCP restart that follows termination of 
the MCP due to system failure. The TCAM Checkpoint/Restart facility 
restores the MCP environment as nearly as possible to its condition 
before system failure. 

Control record (checkpoint) : a disk checkpoint data set record that 
contains information about the format of the checkpoint data set. 

CPB f ree pool-: a chain of the CPBs that are not currently in use by 

the TCAM MCP. 

Cross^-partition data - mov ement: the situation in which data is moved 
from one partition or reqion in main storaqe to another. 

Data- Control Block (DCB) : an area of main storaqe that serves as a 
loqical connector between the problem proqram and a data set. The 
data control block can also be used to provide control information for 
any transfer of data. In TCAM a DCB must be specified for each TCAM 
data set except a main-storaqe messaqe queues data set; a DCB macro is 
used to create a DCB. 

Data Event Control Block (DECB) : a control block that contains 
information about an input or an output operation requested by a READ 
or WRITE macro instruction. 

Data - Ex tent Block (DEB) : a control block that describes the extents of 
the data set with which it is associated. 



Glossary 1309 



Data Set - Control Block <DSCB) -: a collection of information that 
describes the attributes of a data set in direct-access storage. 

Dead- letter queue; the destination queue for the station or 
application program named by the DLQ operand of the INTRO macro. If 
TCAM detects an invalid destination in a message header and no user 
exit is specified in the FORWARD macro, TCAM sends the message to the 
dead-letter gueue. 

Delimiter- macro instruction: a TCAM macro that classifies and 
identifies sequences of functional macrc instructions and directs 
control to the appropriate seguence of functional macro instructions. 

Destination: a place to which a message being handled by a TCAM 
Message Handler is to be sent. A destination may be either a station 
defined by a TERMINAL macro, a group of stations defined by a TLIST 
macro, or an application program defined by a TPROCESS macro. One or 
more destinations may be specified in a message header, or a single 
destination may be specified for all messages handled by an Inheader 
Subgroup. 

D estinati on offset : a two-byte index to the Termname Table entry of a 
destination or station. 

Destination queue : a chain of messaqe segments that are to be sent to 
a specific terminal, qroup of terminals, or application program. TCAM 
builds this queue after the message segments are processed by the 
Incoming Group of an MH. 

Device Characteristics Tab le: (DCT) : a collection of entries that 
describes the characteristics of the terminals (or devices) in the 
system. 

Dial-out queue: a chain of QCBs each of which is for a dial terminal 
to which a message has been tposted when the line for the terminal is 
unavailable. 

Disabled ready queue: a chain of elements, in FIFO order, that are to 
be processed by TCAM and that are from the disabled appendages. 

Disk que uing-: the process of maintaining the TCAM message gueues on a 
direct access storaqe device. 

Dispatching; the process of providing a routine with an element and 
giving the routine control to process the element. 

Distribution entry: a Terminal Table block of information that is 
associated with a distribution list. 

Distribution list: a group of terminals, each of which is to receive 
any message directed to the group. 
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Duplicate^header message: a message that is identical to the one sent 
previously, as in multiple routing. 

Element: an individual part of a system resource; for example, a 

buffer. 



Element - Bequest Block <ERB) : a control 
requests for buffers for a line qrcup. 



area that is used to make 



Enabled ready queue: a chain of elements in priority-FIFO order that 
are to be processed by TCAM and that are from the enabled TCAM 
modules. 

Enabling a line: the process cf conditioning the transmission control 
unit to accept incoming calls on a line. 

End_iQf address (EOA) - character : 

1. A control character or characters transmitted on a line to 
indicate the end of non-text characters (for example, addressing 
characters) . 

2. A TCAM character that must be placed in a message if the system is 
to accomodate routing cf that iressage to several destinations; the 
character must immediately follow the last destination code in the 
message header, and must also be specified by the EGA operand of 
the FOBWAEE macro for the message. 

Environment checkpoint record: a record that contains information on 
the total TCAM operating environment at a single point in time. At 
restart time, TCAM updates the environment record with the contents of 
more recent incident checkpoint records in order to reconstruct the 
MCP environment as it existed before closedown or system failure. 

Error "Recovery Procedure (EBP) : a set of TCAM routines that attempt to 
recover from transmission errors. 

Event Control- Block- - -(ECB) : the communication medium between the 
various components of the control program, as well as between 
processing programs and the control program. An ECE is the subiect of 
WAIT and POST macro instructions. 

EXCP: execute channel program. 

EXCP queue: a chain of one CPB for the cylinder that is currently 
ready for I/O operations in one extent of a disk message gueues data 
set. 

FEFQ : first-ended-f irst-cut. 

FEFQ- gueuing: a situation in which messages that ended (EOT received) 
first are sent before messages that began transmission f irst, TCAM 
provides FEFO gueuing within priority groups. That is, TCAM sends 
higher-priority messages before lower-priority messages. When two 
messages on a queue have egual priority, TCAM sends the message, the 
last segment cf which was received first. 
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FIFO: f irst-in-f irst-out . 

FIFO -. queuing: the situation in which equal-priority messages on a 
destination queue are sent out in the order in which their first 
segments arrived en the gueue. 

First buffer prefix: a 30-byte control area at the beginning of the 
first buffer of a message. 

Flush -closedown : a TCAM MCP closedown during which incoming message 
traffic is suspended and queued outgoing messages are sent before 
closedown completed. That is, unsent messages are "flushed" from the 
message gueues. 

Functional macro instructions: TCAM macros that perform the specific 
operations reguired for messages directed to the Message Handler (see 
delimiter macro instructions) . 

Functional routine: a routine that is associated with a specific MH 
macro and that is activated from the expansion of that macro. 

Functional subroutine: a routine or subroutine that is activated by a 
functional routine. 

"Good Morning" message: a user-generated message (through an exit 
specified in the FEADY macro) to be sent to all or to selected 
terminals (user-determined) for ccld starts. This message is used to 
notify a terminal operator or operators that the TCAM system is up and 
running. 

Group entry: a Terminal Table block of information that is associated 
with a group of terminals that have the group-code hardware feature. 



Header buffer-: a buffer that contains all or any part of a 
header. 



message 



Held._ terminal: a terminal that cannot accept messages because of the 
effect of a HCID macro. 

Hold gueue: a chain of messages sent to a terminal or terminals that 
are not currently accepting messages because a HOLD macro was issued 
in MH for this terminal. 

Idle ^ character: a character that is transmitted on a line and that 
does not print or punch at the output component of the accepting 
terminal. 

Incident : checkpoint record: a disk checkpoint data set record of a 
specific event or incident during TCAM operation. An incident record 
logs a change in station or line status or in the contents of an 
option field. At restart time, TCAM uses incident records to update 
the information in the environment checkpoint record. Thes'e 
checkpoint records are written as a result of operator control 
commands or TCHNG, ICHNG, or CHECKFT macros. 
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Incoming group: that portion of a Message Handler that is designed to 
handle messages arriving for processing by "the message control program 
(see Outgoing Group) . 

Incoming message: a message that is being transmitted from a station 
to the computer. 

Initiate, mode-: causes message segments to be sent from a destination 
queue to the proper destination as soon as possible after they are 
placed on the queue. Normally the segments are not sent until a full 
message is on the gueue. Initiate mode is provided by a functional 
macro instruction in an incoming MH. 

Input: of or related to a message transmission that involves entering 
data at a terminal or receiving data at the computer. 

In-souroe- chain: a chain off the QCBINSRC field of a Destination QCE 
of all source LCBs that are currently sending initiate mode messages 
to the associated station. 

Invitation: the process in which the computer makes contact with a 
terminal in order to give the terminal the opportunity to transmit a 
message (if it has one ready) . Polling and enabling are forms of 
invitation. 

Invitation characters: see Polling characters* 

Invita tion li st : a sequence of polling characters or identification 
seguences associated with the terminals on a line. The order in which 
the characters are specified determines the order in which the 
terminals are invited to enter a message. 

T/Q Block - {IOB) : the communication medium between a routine that 
reguests an I/O operation' and the I/O Supervisor, All the information 
reguired by the ' I/O Supervisor to execute an I/O operation is 
contained in the IOB, or is pointed to by the IOB. 

I/O Sup erviso r <I OS) : an Operating System task that controls all the 
I/O operations in the system. 

Job Control Language (JCL) : a collection of statements used to 
identify a -yot and its reguirements to the Operating System. 

Job ..-.pile Control Block {JFCB) : a system control block constructed by 
iob management routines to contain information about a specific data 
set in the system. There is one JFCB for each DCE that is opened. 
The information in the JFCE may be modified during open time. 

Line control : the scheme of operating procedures and control signals 
by which a telecommunications system is controlled. 

Line Control Block (LCB) : an area of main storage that contains 

control information for operations on a lire. TCAM maintains one LCE 
for each line in the system. 
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Line group: a set of one or more communications lines of the same 
type, over which terminals with similar characteristics can 
communicate with the computer. 

Locate mode: the manner in which a record is given to (or taken from) 
the user's program where TCAM provides the work area for a work unit 
and passes the address of the area to the user in register 1 , and the 
user may work en the work unit in place. 

Log: a collection of messages that provides a history of message 
traffic; either message segments or complete messages can be logged. 

Logging: the process of recording messages on a storage medium to 
maintain a history of message traffic for accounting or other 
purposes. 

Logical buffer: see buffer. 

Logtype -entry: a Terminal Table block of information that is 
associated with a gueue for logging complete messages. 

Macro expansion: the assembler-generated output from an instruction in 
a source language. 

Main^storage queuing; a situation in which TCAM message gueues are 
maintained in main storaqe. 

Maste r jQCB : the basic format of a Destination QCB - 40 bytes of 
destination specific data. 

M CPL -: an STCB entry code field that identifies the type of STCB; 
therefore, the method necessary to activate the corresponding subtask. 

Message -: a combination of letters, digits, and symbols whose 
termination point is marked by: 

1. an end of transmission character (EOT) for start-stop devices; 

2. an end of transmission seguence (ETX EOT) for BSC devices; or 

3. if end-of-block checking is specified by the CONV operand of 
the STABTMH macro, by an ETX, ETE, or EOB character. 

Message Control Program (MGP) : a series of TCAM routines that identify 
the telecommunications network to the System/360 Operating System, 
establish line control, and handle and route messages. 

Message data: transmitted characters that are recorded as part of a 
message. A message data area is the area in a buffer that receives 
message data. 

M ess a ge Handl er (MH) : a seguence of user-specified macro instructions 
that examine and process the control information in message headers, 
and perform functions necessary to prepare message segments for 
forwarding to their destinations. One Message Handler is reguired for 
each line group that has special message- handling reguirements. 
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Message header; the part of a messaqe containing control information, 
such as the destination cede (as distinct from the text of the 
messaqe) . 

Message log data set: a set of messaqes or message segments that are 
maintained on secondary storage for accounting or other purposes. 

Messaqe queue-: a chain of messaqes for a destination (a line, 
terminal, application prcqram, or loqqinq medium) . 

Messaqe queues data -set: a collection of the chains of messaqes for 
the destinations that are desiqnated to be queued in the same manner; 
that is, on reusable disk, on nonreusable disk, or in main storage. 

Messaqe retrieval function: allows the user to retrieve a previously 
sent messaqe by specifyinq a combination of the messaqe destination 
and the input (or output) sequence number of v the message. The 
sequence number is assiqned by the SEQUENCE macro. 

Messaqe se gment : that portion of a messaqe that fits in the message 
data area of a buffer. 

M ess aqe switching: a telecommunications application in which a message 
is received at a central location, possibly stored until the 
appropriate time, and then transmitted to its destination. 

MET: multiprogramming with a fixed number of tasks. 

Module: a program unit (with one or mere entry points) that is 
discrete and identifiable with respect to compiling, combining with 
other units, and loading. 

M odul o: the remainder after any division has been performed. In TCAM 
the absolute record number modulo the total number of records is equal 
to the relative record number. 

Multidrop terminal: a terminal on a multipoint line 

Multiple - routing: the method of sending a message where more than one 
destination is specified in the header of the message. 

Multiple-buffer- header : a message header that occupies more than one 
buffer. 

MVT-: multiprogramming with a variable number of tasks. 

Netw ork control : the management of a series of points interconnected 
by communications channels. 

Next ^-buffer l ocation : the value of address (disk relative record 
number) to be used for the first unit of the next buffer of the 
message that is currently being placed on the related message queue. 
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Next-message location; the value of address (disk relative record 
number) to be used for the first unit of the first buffer of the next 
messaqe received for the related message queue. 

New .jgueue: a chain of CPEs for all cylinders in an extent of a disk 

messaqe queues data set other than the cylinder currently ready for 
I/O and the cylinder iust after it. 

No-buff er.-_ queue: the chain of Channel Program Blocks (CPBs) for READ 
operations when no buffers are in the buffer pool. 

No-CPB queue: the chain of elements that are to be processed by CPB 
initialization. 

Nonreusable disk queuing: the situation in which each record of a disk 
messaqe queues data set may be used only once. 

Opera tor - awareness message: an unsolicited status message from the 

TCAM system to the primary operator contrcl terminal operator. This 
is to make the operator aware of seme potential problem in TCAM. 

Operator - Control : a TCAM facility that allows the system operator to 
issue commands to examine or alter the status of his 
telecommunications network. 

Operator Control Address Vector Table (AVT) : an MCP area that contains 
parameters for the Operator Ccntrcl control module. 

Option Table-: a collection of information provided by the user in 

OPTION macro instructions. 

Outgoing group: that portion of the message handler that processes 
messages beinc sent from the message ccntrcl program to any of the 
lines, line groups, or application programs (see Incoming Group) . 

Outgoing messaqe: a message that is being sent from the message 
control program to its destination. 

Output : of or related to a message transmission that involves 
accepting data at a terminal or sending data from the computer. 

Path- switch: an option field setting used as a switch to indicate the 
order of or the conditional execution of MH macros. 

Polling: a flexible, systematic, centrally controlled method of 
permitting terminals to transmit without contending for the line. The 
computer contacts terminals according to the crder specified in the 
invitation list; each terminal contacted is invited to send messages. 

Polling characters: a set of characters peculiar to a terminal and the 
polling operation; response to these characters indicates to the 
computer whether the terminal has a message to enter. 
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Post: a siqnal of the completion cf an event in the Operatinq System. 

Priority QCE: an area in which the queuinq data for a qiven priority 
level of a messaqe for a Destination QCE is stored. 

Process Control Block (PCB) : an MCP stcraqe area for data that is 
necessary for communication between the MCP and an application 
proqram. 

Process - entry: a Terminal Table block cf information that is 
associated with an application proqram. 

Process entry work_ : area: a work area in the MCP. It contains data 
pertinent to the presence of an application interface with the MCP. 

Program-Controlled Interruption (PCI) : an interruption caused by the 

channel when starting the execution of a CCw with the PCI flaq set. 
This interruption is used in TCAM to notify TCAM of pendinq or 
completed data transfer between TCAM and a particular terminal or 
terminals. This knowledqe is used for buffer and data handlinq. 

Purge - I/O: an SVC issued at close time tc remove all traffic from 
teleprocessinq lines. 

Queue: a chain of items waitinq for service by the system. 

Queue-back chain: a time sequential record of the sendinq and 
receivinq messaqe traffic for the terminal or terminals cf a specific 
Destination QCE. 

Queue Control- Block (QCB) : a storaqe area used to associate elements 
with appropriate subtasks. 

Quick closedown: a TCAM MCP closedown that entails stoppinq the 
messaqe traffic on each line as soon as any messaqe beinq sent or 
received at the time of the closedown request is transmitted. 



Bead-ahead — QCB: the queue control block used by TCAM as an 
intermediate step between the Destination QCB for an application 
proqram and an application proqram request for data. In TCAM it is 
used to anticipate a request for data and to avoid the overhead 
required in retrievinq the data from the Destination QCE at the time 
of the request. 

Ready -queue: a chain of elements that represent the work to be 
performed in the TCAM system. 

•Recall: a method of retrievinq a particular messaqe or a part of a 
messaqe in order to reprocess it or to redirect it. 

B ecalled- header buffer: the first buffer cf header information for a 
recalled messaqe 

Begion Control Task <RCT) : a TSO task that determines which task is to 
occupy a particular TSO reqion. There is one BCT for each reqion. 
The BCT is activated by the TSIP SVC. 
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Relative line- number {rln) : number of a line in the line qroup 
relative to all others in the line qroup. 

Resource: any system facility that is required by a job or task; for 
example, main storaqe, I/O devices, data sets, buffer pool. 

Resource Control Block (RGB) : an eiqht-byte prefix to an element. 

Restart: to restructure the execution of a routine or system, usinq 
the data recorded at a checkpoint. 

"Restart - in Progress" message: a user-generated message (through an 
exit specified en the READY macro) to be sent to all or selected 
terminals (user-determined) . This message is used to notify a 
terminal operator or operators that the TCAM system is up and running. 

Retrieve mode: the method of operation used during the time the GET 
Scheduler is recallinq buffers to satisfy a retrieve request by the 
application program. 

Retry: an error recovery procedure in which the current block of data 
is re-sent a prescribed number of times or until accepted. 

Retry gueue: a chain of one CPB for the cylinder on which to have I/O 
in an extent of a disk message gueues data set after the CPEs on the 
EXCP gueue are processed. 

Reusable disk queuing: a situation in which messages are queued to a 
wrapped message gueues data set; that is, serviced messages are 
overlaid by new messages entering the system. 

Rollout/Rollin. (RORI) : an optional feature of the MVT control program 

configuration that enables an additional reqicn (or reqions) of main 
storaqe to be temporarily reassiqned from one job step to another. 

Routine: an ordered set of instructions with a single entry point. 

Save- a rea : a block of main storaqe that is used to hold certain data 
(for example, reqister values) while the location in *hich the data 
was originally stored is used for ether purposes. 

Secondary: .destination: a destination to which a message is to be sent 
if the primary destination is unable to accept the message. 

Segment: that portion of a messaqe contained in a sinqle buffer. 

Selection-: the process by which the computer makes contact with a 
terminal in order to send it a messaqe (includes addressinq and, for 
switched lines, callinq) . 

Sequential Access Met hod (SAM) : a proqram that performs I/O operations 
on a data set one record at a time from beqinninq to end. 

Sinqle entry: a Terminal Table block of information that is associated 
with one terminal or terminal component. 
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Source of f set : the index value into the Termname Table for the source 

terminal. 

Special- Characters .Table (SCT) : a collection of entries that contain 
the special characters required for device I/O for each terminal »or 
device) in the system. 

Start-stop- line: a line on which each character of data transmission 
is preceded by a special control siqnal that indicates the beqinninq 
of the sequence of data bits for a character. Each character is 
followed by ancther control siqnal that indicates the end of the data 
bit sequence. 

Station: a computer or a terminal. 

Station Control Block (SCB) : a loqical extension of the QCB for each 
station. The SCB contains information used by TCAM to control 
bufferinq. 

Subsequent buffer prefix: a 23-byte control area at the beqinninq of 
each buffer of a messaqe after the first buffer. 



Subtask Control Block (STCE) : a storaqe area used to contain the 
information necessary to activate a particular routine. 



Subtask: a task that is created by ancther task by means of the ATTACH 
macro instruction. 



T a sk Control Elock 
related to a task. 
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Task - I/O Table (TIOT) -: a control block constructed by -job management 
to provide I/O support routines (OPEN, CIOSE, EOV) with pointers to 
JFCBs and allocated devices. 

TCAM/TSQ buffer: a buffer residing in the TCAM region in which the 
PBFTSEUF bit in the Buffer Prefix is en indicatinq that the buffer 
contains a TSO messaqe. 

Telecommunications: any transmission or reception of siqnals, writinq, 
sounds, or intelliqence cf any nature, by wire, radio, visual methods, 
or electromaqnetic systems. Often used interchangeably with 
"communications." Synonym: teleprocessinq. 

Telecommunications Access - Method (TCAM) : a hiqh-level access method 
that controls data transfer between main stcraqe and remote stations. 

Terminal: a point in a system at which data can enter, leave, or enter 
and leave. A terminal can also be a control unit to which one or more 
input/output devices can be attached (see Component ) . 

Terminal - entry: a sinqle block of device-dependent information in the 
Terminal Table on a terminal, qrcup of terminals, or application 
proqram. 



Glossary 1319 



Terminal -I/O- Co ordi nator - (TIQC) : the interface between the TSO 
subsystem and the version of TCAM that supports TSO, 

Terminal Table; an ordered collection of information consisting of 
blocks of device-dependent information en each terminal from which a 
message can originate, and on each terminal, qroup of terminals, and 
application prcqram to which a messaqe can te sent, 

^ermname Table: a table that contains the name of all the terminals in 
the system in collatinq sequence. 

Text: that part of the messaqe of concern to the party ultimately 
receivinq the messaqe (that is, the messaqe exclusive of the header or 
control information) . 

Text - buffer: a buffer that contains no part of a messaqe header. 

TIG: Transfer in Channel. 

Time- delay: a halt of a specific operation for a pre-specif ied amount 
of time. 

^ime sharing: a method of usinq a computinq system that allows a 
number of users tc execute proqrams concurrently and to interact with 
them durinq execution. 

Time- Sharing - Option <T50) : an optional cenfiquration of the Operating 
System providinq conversational time sharing from remote terminals. 

TIQC buffer: a buffer residing in the ISO region, 

Tpost: the technigue in TCAM by which an element is passed from one 
gueue to another. The TCAM routines specify the element and the 
queues and the TCAM Dispatcher actually performs the action. 

Translation Table: a collection of the information necessary to 
convert data from one transmission code to another. 

Transparent. ,_mcde : a mode of BSC transmission in which all the data, 
includinq normally restricted data-link control characters, are 
transmitted only as specific bit patterns. Control characters that 
are to be effective as such are preceded by a DIE character. 

Twait: the TCAM technique in which a suttask waits for an element to 
process by havinq the STCB for that subtask placed in the STCB chain 
of the OCB to which the needed element will be tposted, 

Unit-: the basic buildinq blocks from which TCAM buffers are 

constructed. All units in a specific TCAM system are the same length; 

the user specifies this length in the KEYLEN operand of the INTEO 
macro. 

Unit control area: a twelve-byte control area prefixed to each TCAM 
buffer unit. 
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Unit Control Block (UCB) : a system control block that describes the 

characteristics of the device to the I/O Supervisor and is used by the 
iob scheduler durinq allocation of the device. 

Use - count-: in a PCB, a count of the open DCBs associated with this 

PCE. 

yCQN: V-type address constant used to reserve storaqe for the address 
of an external symbol that is used for effecting tranches to other 
programs. 

Warm start: a restart in which TCAM reconstructs the environment that 
existed before closedown. 

Write -to-Qperator (WT O) : an optional user-coded service whereby a 
messaqe may be written to the system console operator informinq him of 
errors and unusual system conditions that may need correcting. 

Write-to-Qperatcr with F.eply <WTOR) : an optional user-coded service 
whereby a messaqe may be written to the system console operator 
informinq him of errors and unusual system conditions that may need 
correctinq. The operator must key in a response to this message. 

Zone boundary-: the middle of a quarter of a reusable disk message 
queues data set. 

23-byte prefix: see subsequent buffer prefix. 

30-byte prefix: see first buffer prefix. 
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